Trouble writing to registry in Windows 7

[SlowCoder74]

Here's my code:

UpdateAutoLogon(1,"Mylogin","MyPassword","MyDomain")

Func UpdateAutoLogon($iEnabled,$sAutoLogonUserName,$sAutoLogonPassword,$sAutoLogonDomain)
local $ErrorNum = 0
local $sHive

$sHive = "HKLM"
if @OSArch = "X64" or @OSArch = "IA64" then $sHive = "HKLM64"
;
RegWrite($sHive & "\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon","AutoAdminLogon","REG_SZ",$iEnabled)
if @error<>0 then $ErrorNum = @error
RegWrite($sHive & "\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon","ForceAutoLogon","REG_SZ",$iEnabled)
if @error<>0 then $ErrorNum = @error
RegWrite($sHive & "\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon","DefaultUserName","REG_SZ",$sAutoLogonUserName)
if @error<>0 then $ErrorNum = @error
RegWrite($sHive & "\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon","DefaultPassword","REG_SZ",$sAutoLogonPassword)
if @error<>0 then $ErrorNum = @error
RegWrite($sHive & "\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon","DefaultDomainName","REG_SZ",$sAutoLogonDomain)
if @error<>0 then $ErrorNum = @error
return $ErrorNum
EndFunc

It works great in XP. But when I try to use it in Windows 7, I get an error 1, which means it can't find the key.

I added the

if @OSArch = "X64" or @OSArch = "IA64" then $sHive = "HKLM64"

to see if that was the problem. I don't even know if it's relevent. In any case, it didn't fix the problem.

Any ideas?

[BrewManNH]

Which one is failing? Do you have write access to the registry?

[SlowCoder74]

Which one is failing? Do you have write access to the registry?

They all fail. Yes, I am administrator on the machine, and can manage registry data through regedit.

[BrewManNH]

I found this reference which mentions this issue, and some suggestions that might work for you. Specifically the mention of this key HKEY_LOCAL_MACHINESOFTWAREWow6432NodeMicrosoftWindows NTCurrentVersionWinlogonDefaultUserName on x64 systems.

[DeathRow]

Yes,some keys are different or don't exist anymore in Win7/Vista. And for x64 bits machines, some registry keys are different too, and some system folders too,so be carefull

[SlowCoder74]

I found this reference which mentions this issue, and some suggestions that might work for you. Specifically the mention of this key HKEY_LOCAL_MACHINESOFTWAREWow6432NodeMicrosoftWindows NTCurrentVersionWinlogonDefaultUserName on x64 systems.

Coming back to this after a while ...

I read through that, and pulled up nothing valuable. Maybe I don't know how to read.

I've compiled my code as 32 bit and 64 bit, tried HKLM and HKLM64, and WOW6432Node, and continue to get a failure.

Note, that I can read the data fine using

$sHive = "HKLM"
if @OSArch = "X64" or @OSArch = "IA64" then $sHive = "HKLM64" ;if 64bit system, modify hive location
$RegAutoLogon = regread($sHive & "SOFTWAREMicrosoftWindows NTCurrentVersionWinlogon","AutoAdminLogon")

[JLogan3o13]

This works fine for me on Win 7 when I add #RequireAdmin at the top of the script.

[SlowCoder74]

This works fine for me on Win 7 when I add #RequireAdmin at the top of the script.

Son ... Of ... A ... Bleep ...

Yes, I see it works for me also. This means it's an access problem, even though I am a network admin, as well as explicitly in the local Administrators group on the PC. No way to get past that without it prompting me if it's ok?

[JLogan3o13]

Unfortunately, short of turning UAC off, you're stuck with it in Win 7.

[SlowCoder74]

Unfortunately, short of turning UAC off, you're stuck with it in Win 7.

Ugh ... grrr ... pffff ... Well, that stinks. But it's better than nothing. Thank you.