Integrer du code dans une page web
webnavanonyme
Messages postés
3
Statut
Membre
-
rashel -
rashel -
Bonjour,
j'aimerai integrer un script sur ma page web qui ce lance quand on clique sur un boutton lancer (le script c'est du VBscript) :
merci de vos réponses.
j'aimerai integrer un script sur ma page web qui ce lance quand on clique sur un boutton lancer (le script c'est du VBscript) :
'Faire disparaitre un compte utilisateur à l écran d'accueil
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
merci de vos réponses.
A voir également:
- Integrer du code dans une page web
- Code ascii - Guide
- Supprimer une page dans word - Guide
- Comment traduire une page web - Guide
- Intégrer une vidéo dans un powerpoint - Guide
- Capturer une page web complète - Guide