Exécuter un bat en administrateur depuis un vbs

Bonjour,
Je souhaiterais exécuter un .bat contenant des commandes à éxécuter avec les droits administrateur à partir d'un .vbs.

Voici ce que j'ai essayé en ayant cherché sur internet:

Code:

---

1 2	Set WshShell = CreateObject("WScript.Shell") WshShell.Run "runas /user:Administrateur " & chr(34) & "monFichier.bat" & Chr(34), 0

---

Or, il ne se passe rien quand j'exécute le vbs. De plus, je voudrais que le vbs puisse être exécutés sur n'importe quelle machine en tant qu'administrateur (par exemple si le client est anglais, je ne pense pas que le nom d'utilisateur soit Administrateur" mais plutot "Administrator" non?

Quelle est la meilleure solution svp sachant que les PC des clients peuvent être sous Windows 7, Windows 8 et bientot Windows 10?

Citation:

---

Or, il ne se passe rien quand j'exécute le vbs.

---

Il me semble que la syntaxe doit être :

Code:

---

1 2	Set WshShell = CreateObject("WScript.Shell") WshShell.Run "Cmd.exe runas /user:Administrateur " & chr(34) & "monFichier.bat" & Chr(34), 0

---

ou bien mettre 1 au lieu de zéro(0) pour voir le résultat ensuite rectifier.

Merci pour le retour.

C'est bien juste runas mais il demande le mot de passe Administrateur quand je mets de 0 à 1 pour avoir la console. En fait, je voudrais avoir l'équivalent d'un "Executer en tant qu'Administrateur" (qui ne demande pas de mot de passe).

Est-ce possible?

et si tu essaies ceci :
WshShell.Run "runas /profile /user:Nom_Utilisateur /pwd:mot_de_passe " & chr(34) & "monFichier.bat" & Chr(34), 1 (avec un espace après le mot de passe)

Merci pour la réponse. Je demanderais les logins et mot de passe admin si l'utilisateur n'est pas admin.

Je vais tester et ferais un retour.

Suite à ton aide voici ce que j'ai réussi à faire:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38

isAdministrator = false isAdministratorGroupFound = true   Set objNetwork = CreateObject("Wscript.Network") strComputer = objNetwork.ComputerName strUser = objNetwork.UserName   On Error Resume Next   Set objGroup = GetObject("WinNT://" & strComputer & "/Administrators") If Err.Number <> 0 Then Err.Clear() Set objGroup = GetObject("WinNT://" & strComputer & "/Administrateurs") If Err.Number <> 0 Then isAdministratorGroupFound = false isAdministrator = false End If End If Err.Clear()   If isAdministratorGroupFound Then For Each objUser in objGroup.Members If objUser.Name = strUser Then isAdministrator = true End If Next End If   Set WshShell = CreateObject("WScript.Shell") If isAdministrator Then WshShell.Run chr(34) & "monFichier.bat" & Chr(34), 0 Else adminID=inputBox("Domain\Admin user:","ID") WshShell.Run "runas /user:" & adminID & " " & Chr(34) & "monFichier.bat " & Chr(34), 1 End If   Set WshShell = Nothing

---

Dans ce script je teste donc si un groupe Administrators existe. Si ce n'est pas le cas, je regarde si un groupe Administrateurs existe. Si j'ai trouvé un de ces groupes, je teste si mon utilisateur en fait parti. Si c'est le cas, j'exécute mon bat normalement. Si ce n'est pas le cas, j'exécute mon bat avec runas après avoir demandé l'utilisateur administrateur.

Maintenant voici mon soucis: la commande runas ne permet pas de préciser le mot de passe avec /pwd comme tu l'indiques. J'ai donc mis 1 au lieu de 0 pour avoir la console. Il demande donc le mot de passe dans la console pour l'utilisateur indiqué mais lorsque le bat est exécuté il y a une console qui s'affiche (chose que je ne voudrais pas).

Il semble que ce soit la commande runas qui affiche par défaut la console du bat.

Comme je suis obligé de mettre 1 pour avoir la console afin de pouvoir saisir le mot de passe, voyez-vous un moyen de ne pas l'avoir pour l'exécution du bat (par exemple en mettant un argument pour la commande runas afin qu'elle la cache)?

Edit: jai trouvé un moyen en lancant mes commandes avec "start" (qui permet de ne pas attendre le retour de la commande) dans mon bat puis en faisant exit. Le script est donc exécuté, la console s'affiche très rapidement puis se ferme.