Regisry update error 1

[joeschoe]

I need to update a registry entry from 1 to 2.
I get a return code of 5 which translates as ERROR_CANTWRITE .
I can update the entry manually without problem but I need it in a setup procedure.
Here is my specific code

  r = RegOpenKeyEx(HKEY_LOCAL_MACHINE, _
    "SOFTWARE\Microsoft\MSSQLServer\MSSQLServer", 0, KEY_READ, hKey)
    r = SetValueEx(hKey, "LoginMode", 4, 2)
    If r = 0 Then
        MsgBox "successful update"
    Else
        MsgBox "update returned code of " & Str(r)
    End If

Any suggestions?

 

[mattKnight]

r = RegOpenKeyEx(HKEY_LOCAL_MACHINE, _
    "SOFTWARE\Microsoft\MSSQLServer\MSSQLServer", 0, KEY_READ, hKey)

I'd look at parameter number 4 (KEY_READ) - the clue might be in the name...

Take Care

Matt
If at first you don't succeed, skydiving is not for you.

 

[joeschoe]

Thanks Matt,
You pointed me in the right direction.
I looked at

http://msdn.microsoft.com/library/d...e/registry_key_security_and_access_rights.asp

where all became clear.
Problem solved.

 

[mattKnight]

Glad to help

Take Care

Matt
If at first you don't succeed, skydiving is not for you.