Soyez le premier à donner votre avis sur cette source.
Vue 14 485 fois - Téléchargée 1 290 fois
'HideUser 'Cacher l'utilisateur de l'écran de bienvenue de Windows XP Option Explicit 'Declare variables Dim WSHShell, n, p, itemtype, MyBox, User, Title, Prompt 'set variables p = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList\" itemtype = "REG_DWORD" n = 0 Prompt = "Entrez le nom d'utilisateur que vous souhaitez cacher." Title = "Cacher un utilisateur sur l'écran d'accueil" User = InputBox(Prompt, Title,"") If User = "" Then Title = "Erreur!" Prompt = "Vous n'avez rien saisi." MyBox = MsgBox(Prompt,4096,Title) Else p = p & User Set WSHShell = WScript.CreateObject("WScript.Shell") WSHShell.RegWrite p, n, itemtype Title = "Succès" Prompt = User & " est maintenant caché sur l'écran d'accueil." MyBox = MsgBox(Prompt, 4096, Title) End If Set WshShell = Nothing '///////////////////////////////////////////////////////////////////////////////// 'ShowUSer 'Montrer l'utilisateur de l'écran de bienvenue de Windows XP Option Explicit 'Declare variables Dim WSHShell, n, p, itemtype, MyBox, User, Title, Prompt 'set variables p = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList\" itemtype = "REG_DWORD" n = 1 Prompt = "Entrez le nom d'utilisateur que vous souhaitez montrer." Title = "Montrer un utilisateur sur l'écran d'accueil" User = InputBox(Prompt, Title,"") If User = "" Then Title = "Erreur!" Prompt = "Vous n'avez rien saisi." MyBox = MsgBox(Prompt,4096,Title) Else p = p & User Set WSHShell = WScript.CreateObject("WScript.Shell") WSHShell.RegWrite p, n, itemtype Title = "Succès" Prompt = User & " n 'est plus caché sur l'écran d'accueil." MyBox = MsgBox(Prompt, 4096, Title) End If Set WshShell = Nothing
21 déc. 2010 à 10:42
comment fait on si on ne connait pas le nom de la session cachée.. Ce sont mes enfants qui l'ont créé pour jouer en cachette. est ce que je peux la supprimer ?
merci d'avance.
7 oct. 2008 à 19:37
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.