VBA: Comment ouvrir l'invite de commande en tant qu'administrateur et appeler un VBS en utilisant cscript?

Question

J'essaie d'ouvrir une invite de commande en tant qu'administrateur ET exécuter un fichier .VBS en utilisant CScript.

J'ai trouvé poste pour exécuter cmd en tant qu'administrateur:

Shell "powershell.exe -Command" & Chr (34) & "Start-Process cmd -verb RunAs", vbNormalFocus

avons également constaté un poste pour l'exécution d'un fichier VBS:

sFileName = "Cscript" & Chr (34) & "C: \ Temp \ Run.vbs" & Chr (34) & "" & & pParam1 " "& pParam2

Shell sFilename, vbNormalFocus

Cependant, quelqu'un peut me aider à obtenir les deux choses dans une seule fenêtre cmd?

J'ai essayé de fusionner les deux statuts Shell et de les exécuter les uns après les autres, mais pas de chance.

Answer 1

Copie @Noodles réponse afin de marquer cette question répond: Set oShell = CreateObject ("Shell.Application"): oShell.ShellExecute "cscript.exe", « // nologo c: temp \ run.vbs "," runas ", 1 changer pour cmd oShell.ShellExecute" cmd.exe ","/k cscript // nologo c: temp \ run.vbs ",," runas ", 1 Merci @Noodles !!