Dans le cadre de la migration de mon domaine 2000 vers un domaine 2003
existant, je me heurte au problème suivant :
- Dans mon domaine (2000), le "cn" est égal au nom affiché, soit "Nom
Prénom"
- Dans le domaine cible (2003), le "cn" est égal au login ou
"sAMAccountName"
Afin de faciliter la migration, est-il possible de renommer en masse tous
les "cn" de mon domaine avec le "sAMAccountName" ? Puis je utiliser csvde
par exemple ?
if uCN <> uSAM then oTopLevelContainer.MoveHere oobj.AdsPath, "cn=" & uSAM oObj.Setinfo End If
' Si c'est une OU ou un conteneur par défaut, on boucle jusqu'à atteindre des objets Users Case "organizationalUnit" , "container" ConvertUsers(oObj)
End select ' Va à la prochaine OU enfant Next End Sub
'fin de script
sinon, tu peux toujours utiliser admodify, guide sur mon site : http://jonathan.bismuth.free.fr/Infrastructure/ADModify/Intro.htm
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
"Christophe" a écrit dans le message de news: OJcU%
Bonjour à tous,
Dans le cadre de la migration de mon domaine 2000 vers un domaine 2003 existant, je me heurte au problème suivant : - Dans mon domaine (2000), le "cn" est égal au nom affiché, soit "Nom Prénom" - Dans le domaine cible (2003), le "cn" est égal au login ou "sAMAccountName"
Afin de faciliter la migration, est-il possible de renommer en masse tous les "cn" de mon domaine avec le "sAMAccountName" ? Puis je utiliser csvde par exemple ?
Merci par avance pour vos réponses.
Christophe
Bonjour Chris,
un petit script rapide (va falloir que je penses à le mettre sur mon
site...) pour faire ça :
Set oContainer = GetObject("LDAPdc=domaine,dc=lan")
' Lance la routine de renommage
ConvertUsers(oContainer)
' Nettoyage de mémoire
Set oContainer = Nothing
' affiche un message si l'opération est réussie
MsgBox "Utilisateurs renommés avec succès"
' Close
WScript.Quit
Sub ConvertUsers(oTopLevelContainer)
Dim oObj
' Lance une boucle pour tout user du domaine
For Each oObj in oTopLevelContainer
' Select Case permet d'appliquer des actions différentes suivant le type
d'objet.
if uCN <> uSAM then
oTopLevelContainer.MoveHere oobj.AdsPath, "cn=" & uSAM
oObj.Setinfo
End If
' Si c'est une OU ou un conteneur par défaut, on boucle jusqu'à atteindre
des objets Users
Case "organizationalUnit" , "container"
ConvertUsers(oObj)
End select
' Va à la prochaine OU enfant
Next
End Sub
'fin de script
sinon, tu peux toujours utiliser admodify, guide sur mon site :
http://jonathan.bismuth.free.fr/Infrastructure/ADModify/Intro.htm
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
"Christophe" <ch.lemaire@gmail.com> a écrit dans le message de news:
OJcU%23EU4GHA.2264@TK2MSFTNGP06.phx.gbl...
Bonjour à tous,
Dans le cadre de la migration de mon domaine 2000 vers un domaine 2003
existant, je me heurte au problème suivant :
- Dans mon domaine (2000), le "cn" est égal au nom affiché, soit "Nom
Prénom"
- Dans le domaine cible (2003), le "cn" est égal au login ou
"sAMAccountName"
Afin de faciliter la migration, est-il possible de renommer en masse tous
les "cn" de mon domaine avec le "sAMAccountName" ? Puis je utiliser csvde
par exemple ?
if uCN <> uSAM then oTopLevelContainer.MoveHere oobj.AdsPath, "cn=" & uSAM oObj.Setinfo End If
' Si c'est une OU ou un conteneur par défaut, on boucle jusqu'à atteindre des objets Users Case "organizationalUnit" , "container" ConvertUsers(oObj)
End select ' Va à la prochaine OU enfant Next End Sub
'fin de script
sinon, tu peux toujours utiliser admodify, guide sur mon site : http://jonathan.bismuth.free.fr/Infrastructure/ADModify/Intro.htm
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
"Christophe" a écrit dans le message de news: OJcU%
Bonjour à tous,
Dans le cadre de la migration de mon domaine 2000 vers un domaine 2003 existant, je me heurte au problème suivant : - Dans mon domaine (2000), le "cn" est égal au nom affiché, soit "Nom Prénom" - Dans le domaine cible (2003), le "cn" est égal au login ou "sAMAccountName"
Afin de faciliter la migration, est-il possible de renommer en masse tous les "cn" de mon domaine avec le "sAMAccountName" ? Puis je utiliser csvde par exemple ?
Merci par avance pour vos réponses.
Christophe
Christophe
Merci beaucoup pour ces infos, je vais en faire bon usage !
A+
Christophe
"Jonathan Bismuth" a écrit dans le message de news:
Bonjour Chris,
un petit script rapide (va falloir que je penses à le mettre sur mon site...) pour faire ça :
Set oContainer = GetObject("LDAPdc=domaine,dc=lan")
' Lance la routine de renommage
ConvertUsers(oContainer) ' Nettoyage de mémoire
Set oContainer = Nothing
' affiche un message si l'opération est réussie
MsgBox "Utilisateurs renommés avec succès"
' Close
WScript.Quit
Sub ConvertUsers(oTopLevelContainer) Dim oObj ' Lance une boucle pour tout user du domaine
For Each oObj in oTopLevelContainer
' Select Case permet d'appliquer des actions différentes suivant le type d'objet.
if uCN <> uSAM then oTopLevelContainer.MoveHere oobj.AdsPath, "cn=" & uSAM oObj.Setinfo End If
' Si c'est une OU ou un conteneur par défaut, on boucle jusqu'à atteindre des objets Users Case "organizationalUnit" , "container" ConvertUsers(oObj)
End select ' Va à la prochaine OU enfant Next End Sub
'fin de script
sinon, tu peux toujours utiliser admodify, guide sur mon site : http://jonathan.bismuth.free.fr/Infrastructure/ADModify/Intro.htm
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
"Christophe" a écrit dans le message de news: OJcU%
Bonjour à tous,
Dans le cadre de la migration de mon domaine 2000 vers un domaine 2003 existant, je me heurte au problème suivant : - Dans mon domaine (2000), le "cn" est égal au nom affiché, soit "Nom Prénom" - Dans le domaine cible (2003), le "cn" est égal au login ou "sAMAccountName"
Afin de faciliter la migration, est-il possible de renommer en masse tous les "cn" de mon domaine avec le "sAMAccountName" ? Puis je utiliser csvde par exemple ?
Merci par avance pour vos réponses.
Christophe
Merci beaucoup pour ces infos, je vais en faire bon usage !
A+
Christophe
"Jonathan Bismuth" <jonathan.bismuth@NOSPAM.bsr.ap-hop-paris.fr> a écrit
dans le message de news: OVGuBcU4GHA.512@TK2MSFTNGP06.phx.gbl...
Bonjour Chris,
un petit script rapide (va falloir que je penses à le mettre sur mon
site...) pour faire ça :
Set oContainer = GetObject("LDAPdc=domaine,dc=lan")
' Lance la routine de renommage
ConvertUsers(oContainer)
' Nettoyage de mémoire
Set oContainer = Nothing
' affiche un message si l'opération est réussie
MsgBox "Utilisateurs renommés avec succès"
' Close
WScript.Quit
Sub ConvertUsers(oTopLevelContainer)
Dim oObj
' Lance une boucle pour tout user du domaine
For Each oObj in oTopLevelContainer
' Select Case permet d'appliquer des actions différentes suivant le type
d'objet.
if uCN <> uSAM then
oTopLevelContainer.MoveHere oobj.AdsPath, "cn=" & uSAM
oObj.Setinfo
End If
' Si c'est une OU ou un conteneur par défaut, on boucle jusqu'à atteindre
des objets Users
Case "organizationalUnit" , "container"
ConvertUsers(oObj)
End select
' Va à la prochaine OU enfant
Next
End Sub
'fin de script
sinon, tu peux toujours utiliser admodify, guide sur mon site :
http://jonathan.bismuth.free.fr/Infrastructure/ADModify/Intro.htm
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
"Christophe" <ch.lemaire@gmail.com> a écrit dans le message de news:
OJcU%23EU4GHA.2264@TK2MSFTNGP06.phx.gbl...
Bonjour à tous,
Dans le cadre de la migration de mon domaine 2000 vers un domaine 2003
existant, je me heurte au problème suivant :
- Dans mon domaine (2000), le "cn" est égal au nom affiché, soit "Nom
Prénom"
- Dans le domaine cible (2003), le "cn" est égal au login ou
"sAMAccountName"
Afin de faciliter la migration, est-il possible de renommer en masse tous
les "cn" de mon domaine avec le "sAMAccountName" ? Puis je utiliser csvde
par exemple ?
if uCN <> uSAM then oTopLevelContainer.MoveHere oobj.AdsPath, "cn=" & uSAM oObj.Setinfo End If
' Si c'est une OU ou un conteneur par défaut, on boucle jusqu'à atteindre des objets Users Case "organizationalUnit" , "container" ConvertUsers(oObj)
End select ' Va à la prochaine OU enfant Next End Sub
'fin de script
sinon, tu peux toujours utiliser admodify, guide sur mon site : http://jonathan.bismuth.free.fr/Infrastructure/ADModify/Intro.htm
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
"Christophe" a écrit dans le message de news: OJcU%
Bonjour à tous,
Dans le cadre de la migration de mon domaine 2000 vers un domaine 2003 existant, je me heurte au problème suivant : - Dans mon domaine (2000), le "cn" est égal au nom affiché, soit "Nom Prénom" - Dans le domaine cible (2003), le "cn" est égal au login ou "sAMAccountName"
Afin de faciliter la migration, est-il possible de renommer en masse tous les "cn" de mon domaine avec le "sAMAccountName" ? Puis je utiliser csvde par exemple ?
