Pb d'ActiveX avec VBS

Bonsoir,
Je code sous infopath avec visualbasic script!
Ce script sert a creer un user dans l'OU test du domaine de l'active directory test.local! En l'exécutant tout seul (en exécutant un fichier .vbs) ca marche nickel! Mais sous infopath, ici je connecte mon script à un bouton quand je click dessus!
Mais j'ai l'erreur suivante :
Un composant ActiveX ne peut pas créer un objet : 'GetObject'.
J'ai cherché sur le net mais bon j'ai pas trouvé grande info!

Voici mon code :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 Sub CTRL1_5_OnClick(eventObj) Const ADS_PROPERTY_APPEND = 3 Set myOU=GetObject("LDAP://ou=Test, dc= test, dc=local") myOU.SetInfo Set myUser = myOU.Create("User", "cn=Baptiste Sim2") myUser.Put "sAMAccountName", "Istos" myUser.Put "Description", "Cree par Admin" myUser.Put "sn", "NomDeFamille" myUser.Put "givenName", "Prénom" myUser.SetInfo myUser.SetPassword "superpassword123@" myUser.AccountDisabled = False myUser.SetInfo End Sub
Merci d'y jeter un petit coup d'oeil
Bonne soirée!