add to registry

[tsolrm]

I want to add my script to start up and i'm trying to use registry to do this

RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "TEST.exe", "REG_SZ", @WindowsDir&"\TEST.exe")

However when I open that folder in registry using regedit, i'm not seeing any changes. What am I doing wrong?

[Skitty]

You're probably using vista or windows seven under a guest or non admin account or UAC is enabled.

Try adding #RequireAdmin to the top of your script and report back here with results.

Edited April 26, 2012 by ApudAngelorum

[tsolrm]

I've already included the requireadmin bit and yes i am using W7

[Skitty]

I've already included the requireadmin bit and yes i am using W7

So you're 100% sure that the script is running with administrator privileges and the write operation is not working still?

This is an incredible anomaly.

Maybe if you're using a x64 bit system and running the script using the x32 x64 bit interpreter, you might give this a try?

RegWrite("HKLM64SOFTWAREMicrosoftWindowsCurrentVersionRun", "TEST.exe", "REG_SZ", @WindowsDir&"TEST.exe")

Edited April 26, 2012 by ApudAngelorum

[tsolrm]

Right you've definitely showed me the right direction.

I've removed "#AutoIt3Wrapper_UseX64=n" from my code and the changes have happened.

However without this bit of code people running the x32 system will be unable to run the script. Anyway around this?

[Skitty]

There are ways to make the script work on both architectures, research a little, it's not too hard to do.

Correction: It's not hard at all. Just make sure you use the right base key depending on the interpreter architecture and the machines architecture.

Func _CheckBaseKey($HKType)
    Local $CHECK = False
    If (@OSArch <> "X86") And @AutoItX64 Then
        If Number(StringTrimLeft($HKType, StringLen($HKType) - 2)) <> 64 Then
            #cs
                Jon once said somewhere that if running a compiled autoit script with an x86 interpreter
                the x64 OS will manually correct the key destination unless running with the x64 interpreter
                the system will assume the destination is correct, so just in case, we will attempt a correction
                manually in this area just for the heck of it..
                Also note: If no match is found, we will throw an error because this shouldn't be written anywhere else.
            #ce
            Local Const $KeyVal[4][2] = [ _
                    ["HKCU", "HKCU64"], _
                    ["HKLM", "HKLM64"], _
                    ["HKEY_LOCAL_MACHINE", "HKEY_LOCAL_MACHINE64"], _
                    ["HKEY_CURRENT_USER", "HKEY_CURRENT_USER64"] _
                    ]
            For $I = 0 To UBound($KeyVal, 1) - 1
                If StringInStr($KeyVal[$I][0], $HKType, 2) Then
                    $HKType = $KeyVal[$I][1]
                    $CHECK = True
                    ExitLoop
                EndIf
            Next
            If Not $CHECK Then Return SetError(1, 0, False)
        EndIf
    EndIf
    Return SetError(0, 0, $HKType)
EndFunc   ;==>_CheckBaseKey

Edited April 26, 2012 by ApudAngelorum

[tsolrm]

Thanks!

[Chimaera]

Have a look here there is a UDF for this

[guinness]

Cheers Chimaera, was about to suggest that too.

Edited April 26, 2012 by guinness