[AD] Script pour créer des profils itinérants - Internet & Réseaux
TomsGuide.com : 700 000 inscrits répondent à toutes vos questions high-tech et informatique.
Pour obtenir de l'aide, inscrivez-vous gratuitement !
 

Ajouter une réponse



Mot :   Pseudo :  
 
Bas de page
Auteur
 Sujet : [AD] Script pour créer des profils itinérants
 
quaresma
Profil : IDNaute
Plus d'informations
n°232318
28-12-2007 à 18:52:18

Bonjour à tous,
savez-vous où je pourrai trouver un ou plusieurs scripts qui me permettrait de créer des profils itinérants pour tous les utilisateurs catalogués dans mon AD ?
Ainsi, qu'un lecteur réseau partagé sur le serveur ?

Pour mieux vous expliquer, je voudrai faire exactement la même chose que cette video : http://tosweb.free.fr/Configuratio [...] e9rant.wmv

Mais tout cela en utilisant un script que je placerai sur le serveur.
Cependant, je ne connais pas du tout les lignes de commandes à mettre dans le fichier .bat

merci pour votre aide.

Liens sponsorisés


Inscrivez-vous ou connectez-vous pour masquer ceci.

maith
Fenrir
Profil : Modérateur
Plus d'informations
n°232324
28-12-2007 à 19:18:46

j'avai fait un script en VBS il y a quelques années qui fait à peu près ça, je te le passe tel quel, il faut le modifier un peu :

Code :
  1. On Error Resume Next
  3. OUdepart = InputBox("Entrez l'UO de départ, elle doit exister !!!", "UO de départ","MonOU" )
  4. OUacreer = InputBox("Entrez l'UO à créer ou à utiliser.", "UO pour les comptes","UO_Temporaire" )
  5. gpacreer = InputBox("Entrez le nom du groupe à créer ou à utiliser", "Groupe","Groupe_temporaire" )
  6. listedecompte = InputBox("Entrez le chemin de la liste des comptes.", "Fichier de comptes","liste.txt" )
  7. typeprofil = InputBox("Entrez le type du profil : 1 pour itinérant.", "Profil","0" )
  8. if TypeProfil = 1 then
  9.     serveur = InputBox("Chemin des profils.", "Chemin","\\serveur\profils$\" )
  10. End If
  11. '=========================================================
  14. '=========================================================
  15. 'Connexion au domaine
  16. '=========================================================
  17. Set racineAD = GetObject("LDAP://rootDSE" )
  19. '=========================================================
  20. 'On entre dans l'UO de base
  21. '=========================================================
  22. Set UOdebase = GetObject("LDAP://" & racineAD.Get("defaultNamingContext" ))
  24. '=========================================================
  25. 'On entre dans l'UO de départ
  26. '=========================================================
  27. Set UO = UOdebase.GetObject("organizationalUnit","ou=" & OUdepart)
  29. if(Err.Number <> 0)then
  30.     wscript.echo "L'UO [" & OUdepart & "] ne semble pas exister, fin du script."
  31.     Err.Clear
  32.     wscript.quit
  33. end if
  35. '=========================================================
  36. 'On créer l'UO
  37. '=========================================================
  38. if OUacreer = "" then
  39.     Set uoacreer = UO
  40.     uoacreer.SetInfo
  41. end if
  43. if OUacreer <> "" then
  44.     Set uoacreer = UO.Create("organizationalUnit", "ou=" & OUacreer)
  45.     uoacreer.SetInfo
  46. end if
  48. if(Err.Number <> 0)then
  49.     wscript.echo "Erreur lors de la création de l'UO [" & OUacreer & "], l'objet semble déjà exister."
  50.     Err.Clear
  51.     wscript.quit
  52. end if
  54. '=========================================================
  55. 'Création du groupe
  56. '=========================================================
  58. ADS_GROUP_TYPE_GLOBAL_GROUP = &h2
  59. ADS_GROUP_TYPE_LOCAL_GROUP = &h4
  60. ADS_GROUP_TYPE_UNIVERSAL_GROUP = &h8
  61. ADS_GROUP_TYPE_SECURITY_ENABLED = &h80000000
  63. Set Groupe = uoacreer.Create("group", "cn=" & GPacreer)
  64.     Groupe.Put "sAMAccountName", GPacreer
  65.     Groupe.Put "groupType", ADS_GROUP_TYPE_GLOBAL_GROUP Or _
  66.     ADS_GROUP_TYPE_SECURITY_ENABLED
  67.     Groupe.SetInfo
  68. if(Err.Number <> 0)then
  69.     wscript.echo "Erreur lors de la création du groupe [" & GPacreer & "]."
  70.     Err.Clear
  71.     wscript.quit
  72. end if
  73. '=========================================================
  74. 'Création des utilisateurs
  75. '=========================================================
  77. '=========================================================
  78. 'Déclaration des variables
  79. '=========================================================
  80. Const avant = 1, defaut = -2, vrai = -1, faux = 0
  81. Dim ObjetFichier, Fichier, Chaine
  82. Set ObjetFichier = CreateObject("Scripting.FileSystemObject" )
  83. Set Fichier = ObjetFichier.GetFile(listedecompte)
  84. Set Chaine = Fichier.OpenAsTextStream(avant, defaut)
  85. '=========================================================
  86. 'Fin déclaration
  87. '=========================================================
  90. '=========================================================
  91. 'On lit les lignes du fichier
  92. '=========================================================
  93. do until Chaine.AtEndOfStream
  94.     login = Chaine.ReadLine
  96. '=========================================================
  97. 'On crée l'utilisateur
  98. '=========================================================
  99.     Set Utilisateur = uoacreer.Create("user", "cn=" & login)
  100.     Utilisateur.Put "sAMAccountName", login
  101.     Utilisateur.SetInfo
  103.     if(Err.Number <> 0)then
  104.         wscript.echo "Erreur lors de la création du compte [" & login & "], il existe probablement déjà."
  105.     End if
  106. '=========================================================
  107. 'S'il n'y a pas eu d'erreur, on applique les propriétés du compte
  108. '=========================================================
  109.     if(Err.Number = 0)then
  110.         Utilisateur.AccountDisabled = True
  111.         Utilisateur.SetInfo
  112.         Utilisateur.Put "pwdLastSet", 0
  113.         Utilisateur.SetInfo
  114. '=========================================================
  115. 'Cas d'un utilisateur itinérant
  116. '=========================================================
  117.         if TypeProfil = 1 then
  118.             Utilisateur.Profile = serveur & login
  119.             Utilisateur.SetInfo
  120.         End If
  121.     End If
  122.     Err.Clear
  123. loop
  124. Chaine.Close
  125. MsgBox "Opération terminée !"



le fichier txt à mettre en entrée est simplement une liste de login
je ne gère pas les mot de passe
les comptes sont créés désactivés


---------------
Pub/piratage/spam/villes virtuelles/... --> BAN, je ne cherche pas à comprendre
Merci d'éditer vos titres (pas de titre en majuscule, [RESOLU] quand c'est le cas)
quaresma
Profil : IDNaute
Plus d'informations
n°232356
28-12-2007 à 20:54:58

OK merci ;)
Et j'ai juste a modifier les lignes que je veux, et renommer le fichier texte en .bat...c'est bien ca ?

maith
Fenrir
Profil : Modérateur
Plus d'informations
n°232360
28-12-2007 à 21:16:56

oui et non
tu modifie ce que tu veux
mais il n'y a pas de .bat ici

ce script est en VBS (.vbs), il doit être exécuté depuis une machine du domaine avec les droits administrateur

pour fonctionner du dois créer un .txt avec la liste des login à créer

sans rien modifier, il ne fait pas ce que tu veux, mais il contient tout ce dont tu as besoin pour en faire un qui colle parfaitement à ce que tu veux faire


---------------
Pub/piratage/spam/villes virtuelles/... --> BAN, je ne cherche pas à comprendre
Merci d'éditer vos titres (pas de titre en majuscule, [RESOLU] quand c'est le cas)
quaresma
Profil : IDNaute
Plus d'informations
n°232377
28-12-2007 à 23:23:11

ok, donc ca n'a rien a voir avec ma question.
Moi je veux faire un script en .bat

merci qd même :)

maith
Fenrir
Profil : Modérateur
Plus d'informations
n°232381
29-12-2007 à 00:22:19

?????? et ça change quoi, si ce n'est qu'avec un ".bat" tu ne pourras par faire la moitié de ce que tu veux ?

c'est l'extension qui te gène ?

n'importe quoi...
++

Message cité 1 fois

---------------
Pub/piratage/spam/villes virtuelles/... --> BAN, je ne cherche pas à comprendre
Merci d'éditer vos titres (pas de titre en majuscule, [RESOLU] quand c'est le cas)
quaresma
Profil : IDNaute
Plus d'informations
n°232394
29-12-2007 à 11:12:24

maith a écrit :

?????? et ça change quoi, si ce n'est qu'avec un ".bat" tu ne pourras par faire la moitié de ce que tu veux ?

c'est l'extension qui te gène ?

n'importe quoi...
++



salut,
non ce n'est pas l'extension qui me dérange.
Seulement, ma prof d'info m'a dit d'utiliser un script avec un fichier en .bat, c'est pour cela que je veux faire un script batch.
La création de l'UO et de l'utilisateur, je vais la faire à la main.
Je veux juste un bout de script que je place dans le dossier des scripts et qui crée un profil itinerant pour l'utilisateur que je rentre dans l'AD... :ange:
Comme sur la video...

maith
Fenrir
Profil : Modérateur
Plus d'informations
n°232415
29-12-2007 à 14:27:41

très limité windows en ligne de commande, je te recommande vraiment (et à ta prof aussi) d'utiliser des langages un peu évolués (vbs, powershell...)

http://technet2.microsoft.com/wind [...] x?mfr=true


---------------
Pub/piratage/spam/villes virtuelles/... --> BAN, je ne cherche pas à comprendre
Merci d'éditer vos titres (pas de titre en majuscule, [RESOLU] quand c'est le cas)
quaresma
Profil : IDNaute
Plus d'informations
n°232469
29-12-2007 à 20:40:46

Ok merci pour ce lien.
Perso j'utilise W2KServer, est-ce que les commandes sont identiques?
Quelle est la commande qui permet de spécifier le chemin du profil itinerant de l'utilisateur sur le serveur dans le script ?
Autres petite question :ange: , sous quelle extension je dois enregistrer le fichier ?

Merci pour ton aide :hello:

maith
Fenrir
Profil : Modérateur
Plus d'informations
n°232471
29-12-2007 à 21:04:33

pour le chemin du profile
dans mon script c'est géré, si tu veux utiliser les commandes du site, c'est écrit sur le site

Code :
  1. -hmdir HomeDirectory
  2. Specifies the home directory location of the user you want to add. If HomeDirectory is given as a Universal Naming Convention (UNC) path, then you must specify a drive letter to be mapped to this path using the -hmdrv parameter.
  3. -hmdrv DriveLetter :
  4. Specifies the home directory drive letter (for example, E:) of the user you want to add..
  5. -profile ProfilePath
  6. Specifies the profile path of the user you want to add.



pour les extensions
si tu parle de mon script, c'est .vbs
si tu parle des commandes du site demi-Kr0 $oft, dans un fichier .bat

Message cité 1 fois

---------------
Pub/piratage/spam/villes virtuelles/... --> BAN, je ne cherche pas à comprendre
Merci d'éditer vos titres (pas de titre en majuscule, [RESOLU] quand c'est le cas)
quaresma
Profil : IDNaute
Plus d'informations
n°232477
29-12-2007 à 21:12:43

maith a écrit :

pour les extensions
si tu parle de mon script, c'est .vbs
si tu parle des commandes du site demi-Kr0 $oft, dans un fichier .bat



Je parlais du site de technet2
c'est quoi le site demi-Kr0 $oft ?

Est-ce que la syntaxe est la même si j'enregistre le fichier en .bat à la place de .vbs ?

maith
Fenrir
Profil : Modérateur
Plus d'informations
n°232482
29-12-2007 à 21:21:34

demi-Kr0 $oft--->cherche un peu :p

pour le reste, j'ai répondu


---------------
Pub/piratage/spam/villes virtuelles/... --> BAN, je ne cherche pas à comprendre
Merci d'éditer vos titres (pas de titre en majuscule, [RESOLU] quand c'est le cas)
quaresma
Profil : IDNaute
Plus d'informations