Erreur sur un JOIN...

Erreur sur un JOIN... - VB/VBA/VBS - Programmation

Marsh Posté le 21-07-2005 à 09:44:32    

Bonjour,
j'ai un VB Script d'ouverture de session et au début, je récupère quelques informations comme décrit ci-dessous. Lors de l'ouverture d'une session appartenant au groupe ADMIN, ça fonctionne nickel. Si j'essaie avec une session n'ayant pas les droits ADMIN, il se plante sur "strGroups = LCase(Join(CurrentUser.MemberOf))
"
 


Const ADMIN_GROUP    = "cn=admins du domaine"
 
'Récupération des informations client
'------------------------------------
Set ADSysInfo = CreateObject("ADSystemInfo" )
Set CurrentUser = GetObject("LDAP://" & ADSysInfo.UserName)
strGroups = LCase(Join(CurrentUser.MemberOf))
Wscript.echo strGroups


 
Le message d'erreur est  


Erreur : Type incompatible: 'Join'
Code : 800A000D
Source :  Erreur d'exécution Microsoft VBScript


Reply

Marsh Posté le 21-07-2005 à 09:44:32   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed