Généralement l’ensemble les comptes Active Directory d’un domaine sont paramétrés pour utiliser un fichier Logon Script. Les administrateurs n’échappent pas à cette règle mais ils sont amenés à se connecter aux serveurs … et dans ce cas l’exécution d’un fichier Logon Script est à bannir.

Pour cela un petit bout de code en VBScript suffit ! Nous allons vérifier dans la base de registre du système qui exécute le script, la version du système. Si le système est un serveur, on sort du script grâce à la commande WScript.quit

Dim varShell
Set varShell = WScript.CreateObject("WScript.Shell")
If varShell.RegRead("HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions\" _
& "ProductType") <> "WinNT" Then
WScript.quit
Else
End If

Les 2 premières lignes servent à déclarer un objet “WScript.Shell”. Vérifier que vous ne l’avez pas déja fait dans votre script, auquel cas n’hésitez pas à remplacer la variable varShell de la 3ème ligne par celle que vous avez déclarée. Le script deviendrait:

If votrevariable.RegRead("HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions\" _
& "ProductType") <> "WinNT" Then
WScript.quit
Else
End If

Articles similaires