Script VBS vérifiant si l'ordinateur fait partie d'un domaine

Bonjour,

Je cherche à faire un script VBS qui me parait pourtant assez simple mais je n'ai toujours pas trouvé la solution.

L'idée est de récupérer les informations de l'utilisateur connecté afin de mettre à jour le nom d'utilisateur dans Word

Code:

---

1 2 3 4 5 6

Set objSysInfo = CreateObject("ADSystemInfo") strUser = objSysInfo.UserName Set objUser = GetObject("LDAP://" & strUser) Set objWord = CreateObject("Word.Application") objWord.UserName = objUser.givenName & " " & objUser.SN objWord.UserInitials = Left(objUser.givenName, 1) & Left(objUser.SN, 1) objWord.Quit

---

Le script fonctionne très bien lorsque je suis sur un domaine, mais dés que je l'utilise hors domaine j'obtiens une erreur :
no mapping between account names and security ids was done
80070534
(null)
J'ai aussi trouvé une méthode pour récupérer les valeurs hors domaine. Mais par contre pour identifier si la machine est à l'intérieur d'un domaine ou non. Je n'ai pas trouvé. Un petit coup de main svp ?