Créer un utilisateur local

Créer un utilisateur local - Win NT/2K/XP - Windows & Software

Marsh Posté le 12-11-2010 à 15:21:56    

:hello:  
 
J'ai un AD
Est-il possible de créer un script via une GPO qui me permettrait de ajouter automatiquement un utilisateur local (avec un mot de passe)aux ordinateurs.


---------------
« Mais j'vous jure, y'a dix minutes, ça marchait très bien... »  
Reply

Marsh Posté le 12-11-2010 à 15:21:56   

Reply

Marsh Posté le 12-11-2010 à 15:48:17    

GPO Préférences, c'est fait pour ça :)

Reply

Marsh Posté le 12-11-2010 à 16:32:29    

Apparemment c'est que sur 2008 et je suis sur 2003


Message édité par Lanstack le 12-11-2010 à 16:34:21

---------------
« Mais j'vous jure, y'a dix minutes, ça marchait très bien... »  
Reply

Marsh Posté le 12-11-2010 à 16:35:17    

non ça marche sous 2003, te suffit juste d'une machine vista/win 7/2008/2008 R2 pour configurer la gpo

Reply

Marsh Posté le 13-11-2010 à 10:16:44    

Ah ok, mais bon j'ai trouvé un script qui me correspond parfaitement à mes attentes
 
Dim objUser
Dim NomUser
set WSHShell = WScript.CreateObject("WScript.Shell" )
Set WSHEnvironment = WSHShell.Environment ("Process" )
strComputer = WSHEnvironment("COMPUTERNAME" )
Const ADS_UF_DONT_EXPIRE_PASSWD = &h10000
 
NomUser = "Eleves"
password = "****"
 
'Création de l'Utilisateur : NomUser
Set colAccounts = GetObject("WinNT://" & strComputer & "" )
Set objUser = colAccounts.Create("User", NomUser )
'objUser.Set
objUser.SetPassword password
objPasswordExpirationFlag = objUserFlags OR ADS_UF_DONT_EXPIRE_PASSWD
objUser.Put "userFlags", objPasswordExpirationFlag
objUser.SetInfo
 
'Inscription du compte : NomUser dans le Groupe : Utilisateurs
Set objUser = GetObject("WinNT://" & strComputer & "/" & NomUser & ",user" )
Set objGroup = GetObject("WinNT://" & strComputer & "/Utilisateurs,group" )
objGroup.Add(objUser.ADsPath)
 
Comme ça en cas de défaillance réseau, ils peuvent se connecter en local.


---------------
« Mais j'vous jure, y'a dix minutes, ça marchait très bien... »  
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed