Quantcast
Channel: Indigo Rose Software Forums - Forums
Viewing all articles
Browse latest Browse all 2105

Cannot change registry settings....Please help!!

$
0
0
Hi there
I have this code that I have used without fail pre Win10 that changes the registered owner & organisation, but it is no longer working.
The code in question is:
Code:
sFullName = Input.GetText("Fullname");
sOrgan = Input.GetText("Organisation");

if sFullName == "" then
Dialog.Message("Enter PC Details...", "Your Full Name CANNOT be left blank!", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
Input.SetText("Organisation", "");

Page.Jump("ChangeOwner");
Input.SetSelection("Fullname", 1, -1);
end

sChangeDetails = Dialog.Message("Enter PC Details...", "Do you want to set your name to: "..sFullName.."\r\nAnd your company to: "..sOrgan, MB_YESNO, MB_ICONINFORMATION, MB_DEFBUTTON1);
if sChangeDetails == IDNO then
    Input.SetText("Fullname", "");
    Input.SetText("Organisation", "");
    Input.SetSelection("Fullname", 1, -1);
end

if sChangeDetails == IDYES then
    Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\Microsoft\\Windows NT\\CurrentVersion", "RegisteredOwner", sFullName, REG_SZ);
    Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\Microsoft\\Windows NT\\CurrentVersion", "RegisteredOrganization", sOrgan, REG_SZ);
    Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\WOW6432Node\\Microsoft\\Windows NT\\CurrentVersion", "RegisteredOwner", sFullName, REG_SZ);
    Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\WOW6432Node\\Microsoft\\Windows NT\CurrentVersion", "RegisteredOrganization", sOrgan, REG_SZ);
    Dialog.Message("Thank-You!", "Thank you for providing this information!\r\n\r\n You is now registered on this PC!", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
    end
    
Page.Jump("SysInfo");
But on opening Regedit, the information dont get changed, can anyone help me please?
Thanks in advance.

Viewing all articles
Browse latest Browse all 2105

Trending Articles