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
|
