VBA：管理者としてコマンドプロンプトを開き、cscriptを使用してVBSを呼び出す方法は？

Question

管理者としてコマンドプロンプトを開き、CScriptを使用して.VBSファイルを実行しようとしています。

はまたポストを見つけvbNormalFocus

、

シェル "たpowershell.exe - コマンド" &はChr（34）& "-VerbのRunAs cmdを起動し、プロセス"：

は私が管理者としてcmdを実行するためのポストを見つけました

SFilename = "ます。Cscript" & chrです（34）& "C：\ Tempに\ Run.vbs" & chrです（34）& "" & pParam1 & "VBSファイルを実行するため「& pParam2

シェルSFilename、vbNormalFocus

しかし、誰かが両方の物事は、単一のCMDウィンドウで成し遂げるために私を助けることができますか？

私は両方のシェルの文章をマージしてみました。

Answer 1

@ Noodlesの回答をコピーすると答えが次のようになります。 oShell = CreateObject（ "Shell.Application"）：oShell.ShellExecute "cscript.exe"、 "// nologo c：temp \ run.vbs "、" runas "、1つはcmd oShell.ShellExecute" cmd.exe "、"/k cscript // nologo c：temp \ run.vbs "、" runas "、1に変更されました。 Thanks @Noodles !!