|
|
|
#1 |
|
Messages: n/a
Hébergeur: |
Bonjour,
Existe t'il un logiciel ou utilitaire permettant l'ajout d'utilisateur en masse (environ 400 a 600 utilisateurs d'un coup) a partir d'un fichier ASCII par exemple du genre login:pass:netlogon:...:...:...:...:... Serveur sous Windows 2003 Standard merci -- Les fautes d'orthographes sus-citées sont déposées auprès de leurs propriétaires respectifs. Aucune responsabilité n'est engagée sur la lisibilité du message ou les éventuels dommages qu'ils peuvent engendrer |
|
|
|
#2 |
|
Messages: n/a
Hébergeur: |
un script tout simplement?
Voici un exemple dont j'avais déjà parlé il y a quelques jours, qui lit chaque ligne d'un fichier toto.csv et utilise ";" comme séparateur. Libre à toi d'utiliser ":" et d'autres attributs. '## debut script### Const ForReading = 1, ForWriting = 2, ForAppending = 8 Set objOU = GetObject("LDAP://OU=bsr1,dc=wprod,dc=ds,dc=aphp,dc=fr") dim fso, df1 CSVFile = "toto.csv" Set fso = CreateObject("Scripting.FileSystemObject") Set df1 = fso.OpenTextFile(CSVFile,ForReading,True) Do while Not df1.AtEndOfStream varLigne = df1.readline() NomUser = split(varLigne,";")(0) PrUser = split(varLigne,";")(1) Login = split(varLigne,";")(2) ' on part du principe que Login = CN Desc = split(varLigne,";")(3) Set objUser = objOU.Create("User", "cn="&Login) objUser.Put "sAMAccountName", ""&Login objUser.Put "UserPrincipalName", ""& Login &"@domaine.lan" objUser.Put "givenName", ""&PrUser objUser.Put "sn", ""&NomUser objUser.Put "description", ""&Desc objUser.SetInfo objUser.AccountDisabled=False objUser.SetInfo Loop df1.close WScript.Quit '## fin script### Cordialement, -- Jonathan BISMUTH NET2S Group MVP Windows Server - Directory Services MCSE 2000/ADSI-AutoIT Scripter Transcript (ID: 691839, code: MCSE2000) www.portail-mcse.net pour me contacter http://cerbermail.com/?oAsXWZnZF1 "Channels" <john@doe.com> a écrit dans le message de news: mn.4b967d6ae17838a4.23854@not-for-mail... > Bonjour, > > Existe t'il un logiciel ou utilitaire permettant l'ajout d'utilisateur en > masse (environ 400 a 600 utilisateurs d'un coup) a partir d'un fichier > ASCII par exemple du genre > > login:pass:netlogon:...:...:...:...:... > > Serveur sous Windows 2003 Standard > > merci > > -- > Les fautes d'orthographes sus-citées sont déposées auprès de leurs > propriétaires respectifs. > Aucune responsabilité n'est engagée sur la lisibilité du message ou les > éventuels dommages qu'ils peuvent engendrer > > |
|
|
|
#3 |
|
Messages: n/a
Hébergeur: |
Merci Jonath
Sinon il y a dsadd user en ligne de commande cdsve, ... -- Ludovik DOPIERALA http://www.c2points.com "Jonathan Bismuth" a écrit : > un script tout simplement? > Voici un exemple dont j'avais déjà parlé il y a quelques jours, qui lit > chaque ligne d'un fichier toto.csv et utilise ";" comme séparateur. > Libre à toi d'utiliser ":" et d'autres attributs. > > '## debut script### > Const ForReading = 1, ForWriting = 2, ForAppending = 8 > > Set objOU = GetObject("LDAP://OU=bsr1,dc=wprod,dc=ds,dc=aphp,dc=fr") > > > dim fso, df1 > CSVFile = "toto.csv" > > Set fso = CreateObject("Scripting.FileSystemObject") > Set df1 = fso.OpenTextFile(CSVFile,ForReading,True) > > Do while Not df1.AtEndOfStream > varLigne = df1.readline() > > NomUser = split(varLigne,";")(0) > PrUser = split(varLigne,";")(1) > Login = split(varLigne,";")(2) > ' on part du principe que Login = CN > Desc = split(varLigne,";")(3) > > Set objUser = objOU.Create("User", "cn="&Login) > objUser.Put "sAMAccountName", ""&Login > objUser.Put "UserPrincipalName", ""& Login &"@domaine.lan" > objUser.Put "givenName", ""&PrUser > objUser.Put "sn", ""&NomUser > objUser.Put "description", ""&Desc > > objUser.SetInfo > > objUser.AccountDisabled=False > objUser.SetInfo > > Loop > df1.close > > > WScript.Quit > '## fin script### > > Cordialement, > -- > Jonathan BISMUTH > NET2S Group > MVP Windows Server - Directory Services > MCSE 2000/ADSI-AutoIT Scripter > Transcript (ID: 691839, code: MCSE2000) > www.portail-mcse.net > pour me contacter http://cerbermail.com/?oAsXWZnZF1 > > > "Channels" <john@doe.com> a écrit dans le message de news: > mn.4b967d6ae17838a4.23854@not-for-mail... > > Bonjour, > > > > Existe t'il un logiciel ou utilitaire permettant l'ajout d'utilisateur en > > masse (environ 400 a 600 utilisateurs d'un coup) a partir d'un fichier > > ASCII par exemple du genre > > > > login:pass:netlogon:...:...:...:...:... > > > > Serveur sous Windows 2003 Standard > > > > merci > > > > -- > > Les fautes d'orthographes sus-citées sont déposées auprès de leurs > > propriétaires respectifs. > > Aucune responsabilité n'est engagée sur la lisibilité du message ou les > > éventuels dommages qu'ils peuvent engendrer > > > > > > > |
|
![]() |
| Outils de la discussion | |
|
|