Powershell 写入 vbscript 控制台（cscript.exe）

Question

我需要通过 vbscript(cscript.exe) 在静默模式下运行 powershell 脚本。

脚本的基本步骤如下。

vbscript

WScript.StdOut.WriteLine "Welcome..."
WScript.StdOut.WriteLine "First Step..."
WScript.Sleep Int(2000)
Set objShell = CreateObject("Wscript.Shell"): objShell.Run "powershell -nologo -file D:\basic\child.ps1" ,0,true
WScript.StdOut.WriteLine "Script Completed."
WScript.Sleep Int(5000)

powershell 脚本

Write-Host "Some Text Printed"
Start-Sleep -s 2

此时，我喜欢将 powershell 脚本写入 vbscript(cscript.exe) 控制台。

我正在运行如下的 vb 脚本。

cscript d:\basic\script.vbs

是否有解决此要求的方法。

Answer 1

正如我作为可能重复链接的问题的答案中所述，您可以执行以下操作：

WScript.StdOut.WriteLine "Welcome..."
WScript.StdOut.WriteLine "First Step..."
WScript.Sleep Int(2000)
res = getCommandOutput("powershell -nologo -file D:\basic\child.ps1")
WScript.StdOut.Write res
WScript.StdOut.WriteLine "Script Completed."
WScript.Sleep Int(5000)

Function getCommandOutput(theCommand)

    Dim objShell, objCmdExec
    Set objShell = CreateObject("WScript.Shell")
    Set objCmdExec = objshell.exec(thecommand)
    getCommandOutput = objCmdExec.StdOut.ReadAll

end Function