This is strange I am using jaws 9 and have the opposite issue. Jaws can read from the registry but can't write to it. I can manually modify the registry key using regedit so it is not a rights issue. but the following jaws script doesn't work. Script test () var string path, string entry ;to change an entry in HKEY_CURRENT_USER let path = "Software\\Attachmate\\EXTRA!\\WorkStationUser\\Preferences" let entry = "OldStyleMenu" saystring(GetRegistryEntryString (1,path ,entry )) ;the above line of code returns "yes" SetRegistryEntryString (1, path, entry, "no") ;the above line of code does not appear to work saystring(GetRegistryEntryString (1,path ,entry )) ;the above line of code still returns "yes" EndScript Any ideas? W -----Original Message----- From: jawsscripts-bounce@xxxxxxxxxxxxx [mailto:jawsscripts-bounce@xxxxxxxxxxxxx] Sent: October 18, 2007 19:24 To: jawsscripts@xxxxxxxxxxxxx Subject: [jawsscripts] Re: JAWS bug? SetRegistryEntryString and GetRegistryEntryString can't work together? I reproduced the problem with the JAWS function -- it appears to be a bug. Here is alternative code that works: Let oShell = CreateObject("WScript.Shell") Let result = oShell.RegRead("HKEY_LOCAL_MACHINE\\" + SubkeyPath + "\\" + SubKeyName) Jamal On Thu, 18 Oct 2007, Bryan Garaventa wrote: > Date: Thu, 18 Oct 2007 12:22:24 -0700 > From: Bryan Garaventa <bgaraventa11@xxxxxxxxxxxxxx> > Reply-To: jawsscripts@xxxxxxxxxxxxx > To: jawsscripts@xxxxxxxxxxxxx > Subject: [jawsscripts] JAWS bug? SetRegistryEntryString and > GetRegistryEntryString can't work together? > > I'm not sure if this is a JAWS bug or not, can anyone see what I'm doing > wrong if so? This should work... > > const > SubKeyPath "SOFTWARE\\MyKeyName", > SubKeyName "VariableName" > > Script SetRegKeyVal () > ; This successfully writes VariableName=Testing under > LocalMachine\SOFTWARE\MyKeyName > SetRegistryEntryString (2, SubKeyPath, SubKeyName, "Testing") > EndScript > > Script GetRegKeyVal () > var string Result > ; However, this returns a blank string every time. > let Result = GetRegistryEntryString (2, SubKeyPath, SubKeyName) > CopyToClipboard (Result) > Say (Result, 0) > EndScript __________ View the list's information and change your settings at http://www.freelists.org/list/jawsscripts __________ View the list's information and change your settings at http://www.freelists.org/list/jawsscripts