HI, I'm trying to migrate 2 VBScripts that i found on the internet into one script. The first Scripts checks if the user has Admin Rights and the second script is a Key Changer. But if i migrate this 2 scripts into one script and when i then execute it then it wants to add "relaunch" as a Key.   '-> Begin of the Admin Right Check ScriptSet reg = GetObject("winmgmts://./root/default:StdRegProv")rc = reg.GetStringValue(&h80000003, "S-1-5-19\Environment", "TEMP", val)If rc = 5 Then  If WScript.Arguments.Count = 0 Then    CreateObject("Shell.Application").ShellExecute "wscript.exe" _      , Chr(34) & WScript.ScriptFullName & Chr(34) & " relaunch", "", "runas", 1    WScript.Quit  Else    WScript.Echo "Cannot acquire admin privileges."    WScript.Quit  End IfElse'-> Begin of the Key Changer ScriptOn Error Resume NextIf WScript.Arguments.Count<1 Then  VOL_PROD_KEY = InputBox ("This script will change the product key of:"&vbCr&"Windows XP SP1, SP2 and SP3."&vbCr&vbCr&"Enter a correct CD-Key in the blank field below:","Windows XP Key Changer")  If VOL_PROD_KEY = "" Then    WScript.Quit  End IfElse  VOL_PROD_KEY = WScript.Arguments.Item(0)End IfVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","")for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")  result = Obj.SetProductKey (VOL_PROD_KEY)  If Err.Number = 0 Then    WScript.Echo "Windows XP Product Key was changed successfuly."  End If  If Err.Number <> 0 Then    WScript.Echo "Error entering new product key: "&VOL_PROD_KEY&""&vbCr&vbCr&"Please verify that this Product Key was entered correctly and if it is a valid key."    Err.Number.Clear  End IfNextWScript.Quit