Portail: Clockover.org

Métadonnées du document:
[ Auteur : Clockover ][ Création le : 05/08/2010 ][ Dernière modification le : 11/08/2010 ][ Version : 1.0 ]

Changement de domaine de connexion post-migration ADMT [VBS]

Etat du script: Fonctionnel

Présentation:

Après le changement de domaine d'un poste Windows avec l'outil ADMT (Voir procédure d'utilisation: ici), un poste conserve les données de login de sa dernière connexion.
Ce script va donc changer le domaine au moment du login de l'utilisateur.
Pour cela, il va modifier la donnée dans le registre et redémarrer le poste pour appliquer le changement.
L'outil PsTools GUI peut vous être utile pour lancer ce script en masse à distance.

Le script:

'Changement du domaine de connexion sur un PC après une migration ADMT
'Version 0.1 20090730 by Clockover

'Le nom du nouveau domaine au format pré-windows 2000
vDomaine = "Nom_du_nouveau_domaine"

'Changement du domaine de connexion
Const REG_WINLOGON = "HKLM\Software\Microsoft\Windows NT\CurrentVersion\Winlogon\"
Set WshShell = wscript.CreateObject("Wscript.Shell")
WshShell.RegWrite REG_WINLOGON & "AltDefaultDomainName", vDomaine

'Reboot du PC (testé avec Windows XP seulement)
Set WshNetwork = CreateObject("WScript.Network")
strComputer = WshNetwork.ComputerName
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate,(Shutdown)}!\\" & strComputer & "\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery ("Select * from Win32_OperatingSystem")
For Each objOperatingSystem in colOperatingSystems
	objOperatingSystem.Reboot()
Next

TODO Liste:

-Vide

Historique:

fleche fleche Version 0.1 (2009/07/30)
-Création du script et mis en production avec succès.

Il y a 0 commentaire(s) sur ce sujet.