Script: Cambiare la username nella Logon Screen di Windows
Dopo essersi loggato su un pc come cambiare la username nella Logon Screen dell’utente
Ogni volta che si fanno interventi di manutenzione su pc degli utenti, rimane sempre il proprio nome come ultima login e puntualmente l’utente non si accorge della username nella Logon Screen cambiata e blocca l’account inserendo più volte la password, oppure entra nel panico e chiama l’assistenza chiedendo chi oltre a lui ha utilizzato il computer.
La prima opzione è modificare il file di registro per disabilitare la visione dell’ultimo utente loggato
Reg.exe add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System" /v "dontdisplaylastusername" /t REG_DWORD /d "1" /f
La seconda opzione è modificare queste 2 righe del file di registro rimettendo la user dell’utente che utilizza il pc, personalizzando DOMINIO\User con il nome del dominio AD e la user dell’utente
Reg.exe add "HKLM\Software\Microsoft\Windows\CurrentVersion\Authentication\LogonUI\" /v "LastLoggedOnUser" /t REG_SZ /d "DOMINIO\User" /f Reg.exe add "HKLM\Software\Microsoft\Windows\CurrentVersion\Authentication\LogonUI\" /v "LastLoggedOnSAMUser" /t REG_SZ /d "DOMINIO\User"
La terza opzione è utilizzare questo script direttamente sul pc prima di spegnere o riavviare il computer
' Modifica dell'utente nel Logon Screen di Windows ' ' Andrea Cavazzi www.itmaniac.it ' version 1.0.0 '------------------------------------------------- '-------------- ' Avvio in UAC If WScript.Arguments.length =0 Then Set objShell = CreateObject("Shell.Application") objShell.ShellExecute "wscript.exe", Chr(34) & _ WScript.ScriptFullName & Chr(34) & " uac", "", "runas", 1 Else '-------------- 'Inizio codice dim WSHShell Set WSHShell = Wscript.CreateObject("WScript.Shell") dim strRegKey strRegKey = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Authentication\LogonUI\" StrUser = InputBox("Inserite la username dell'utente", "Ripristino login utente", "UserName") StrDomain = InputBox("Inserite il nome del dominio," & vbCrLf & vbCrLf & "Lasciate vuoto se il pc non fa parte di un dominio", "Ripristino login utente") If StrDomain = "" then StrDomain = "." wshShell.RegWrite strRegKey & "LastLoggedOnUser", StrDomain & "\" & StrUser, "REG_SZ" Else wshShell.RegWrite strRegKey & "LastLoggedOnUser", StrDomain & "\" & StrUser, "REG_SZ" wshShell.RegWrite strRegKey & "LastLoggedOnSAMUser", StrDomain & "\" & StrUser, "REG_SZ" End If WScript.Echo "Modifica effettuata correttamente!" '-------------- 'Fine codice '-------------- 'Fine UAC End If
Potete copiare lo script e incollarlo su notepad e salvarlo con estensione .vbs oppure potete scaricarlo
Le prime 2 opzioni si possono eseguire anche su pc remoti tramite psexec, la terza solo direttamente sul pc. Funzionano solo su Windows 7 32 o 64bit