Aqui hay un truco util, para automatizar el logon en maquinas con winxp, win2k , win2k3
(muy util con las maquinas virtuales), grabar el codigo con extensión .vbs y listo.

‘—————————————————
‘Script para Logon Automatico
‘(c) Marlon Ramos 2006
‘—————————————————
Dim Prompt, oWsh, UserName, UserPass, UserDomain

Set oWsh = WScript.CreateObject(“WScript.Shell”)

‘Usuario

Prompt = “Ingrese el Nombre de Usuario”
UserName = InputBox(Prompt,Title,”")

‘Password

Prompt = “Ingrese el Password para el usuario ” & UserName
UserPass = InputBox(Prompt,Title,”")

‘Dominio

Prompt = “Ingrese el Dominio para el usuario ” & UserName
UserDomain = InputBox(Prompt,Title,”")

‘Setea las llaves en el registry

oWsh.RegWrite “HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\AutoAdminLogon”,”1″,”REG_SZ”
oWsh.RegWrite “HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\DefaultDomainName”,UserDomain,”REG_SZ”
oWsh.RegWrite “HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\DefaultUserName”,UserName,”REG_SZ”
oWsh.RegWrite “HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\DefaultPassword”,UserPass,”REG_SZ”

‘asegurar que el cambio sea persistente

oWsh.RegWrite “HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\ForceAutoLogon”,”1″,”REG_SZ”
–