No pudiste con esta clave?:
Código:
[HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Policies\System]
Supongo que el código para crear un usuario en VBS te resultó algo "extraño", en tal caso te lo pongo en Delphi:
Código Delphi
[-]uses ComObj;
procedure TForm1.Button1Click(Sender: TObject);
var user: OleVariant;
begin
user := CreateOleObject('shell.users');
user := user.create('admin');
user.changepassword('HAclave', '');
user.setting('AccountType') := 3;
end;
PD: no entiendo cual es el problema; en fin
Suerte