Faire apparaitre boite de login ad dans un script

Bonjour a tous !

Voila je tente de developper un petit script (la prog n'étant pas mon fort) qui a pour but d'ajouter un user/group AD dans le groupe administrateur local de la machine.
Jusqu'ici, rien de bien méchant, mon script fonctionne. Cependant, ce script doit etre utilisable depuis un compte administrateur local, et c'est la que ca coince.
Forcement, le compte admin local n'ayant pas de permissions sur les users du domaine, le script met une erreur comme quoi il n'arrive pas a trouver le chemin réseau (alors que sous un compte admin_domain, il y arrive...)

J'ai beau eu cherché, je n'arrive pas a trouver un code ou meme a le développer, qui afficherai une boite de dialogue demandant un login (comme lorsque l'on veut acceder a un partage privé par exemple).
Une fois l'authentification avec un compte admin_domain, le script pourrait fonctionner (dans la logique des choses).

Voici mon code actuel qui permet de rajouter un user AD dans le groupe admin local :

Code:

---

1 2 3 4 5 6 7 8 9

Dim WshNet, computername , strComputer, objGroup, objUser   Set WshNet = CreateObject("Wscript.Network" ) computername = WshNet.ComputerName   strComputer = computerName Set objGroup = GetObject("WinNT://" & strComputer & "/Administrateurs") Set objUser = GetObject("WinNT://MONDOMAINE/MONGROUPE_AD") objGroup.Add(objUser.ADsPath)

---

Merci d'avance pour l'aide que vous m'apporterais ! :)