PB avec Create User en VBScript (LDAP)

Bonjour,

Je suis en train de faire VBScript pour créer des utilisateurs dans AD 2003
mais je suis confronté à un probrème de syntaxe à cause d'une virgule alors
qu'avec un autre caractère ça fonctionne.

Message d'erreur : An invalid dn syntax has been specified
renvoyé par le 1er objUser.SetInfo

Voici un extrait du code qui fonctionne pas à cause de la virgule :

strUserLogonName ="user00001"
strFirstName="Bill"
strLastName="GATES"
strDomaine="test.microsoft.ad"
strRootOU="ou=Users,ou=ABCD,dc=test,dc=microsoft,dc=ad"

WScript.Echo " Connexion à l'annuaire Active Directory..."
Set objContainer = GetObject("LDAP://" & strRootOU &"")

Wscript.Echo " Création de l'objet User..."
Set objUser = objContainer.Create("user", "cn=" & strLastName &", "&
strFirstName)
objUser.Put "sAMAccountName", strUserLogonName
objUser.SetInfo

WScript.Echo " Connexion à l'Objet User..."
Set objItem = GetObject("LDAP://cn=" & strLastName & ", "& strFirstName &","
& strRootOU)

Wscript.Echo " Définition du FirstName..."
objItem.Put "givenName", strFirstName
objItem.SetInfo

Voici un extrait du code qui fonctionne avec un autre caractère :

WScript.Echo " Connexion à l'annuaire Active Directory..."
Set objContainer = GetObject("LDAP://" & strRootOU &"")

Wscript.Echo " Création de l'objet User..."
Set objUser = objContainer.Create("user", "cn=" & strLastName &"@ "&
strFirstName)
objUser.Put "sAMAccountName", strUserLogonName
objUser.SetInfo

WScript.Echo " Connexion à l'Objet User..."
Set objItem = GetObject("LDAP://cn=" & strLastName & "@ "& strFirstName &","
& strRootOU)

Wscript.Echo " Définition du FirstName..."
objItem.Put "givenName", strFirstName
objItem.SetInfo


Merci pour votre aide,
Olivier.