如何從VBScript在命令提示符窗口中使用命令行顯示ECHO

Question

在批處理文件中我有下面的命令：

WScript ABC.vbs 

在ABC.vbs：

Set WshShell = WScript.CreateObject("WScript.Shell") 
WScript.Echo "Hello" 

當我運行該批處理文件中，有一個帶有文本「Hello」的彈出消息。但是我想要的是在命令提示符窗口中顯示消息「Hello」，比如我在ABC.vbs上右鍵單擊，然後選擇「使用命令提示符打開」。

Answer 1

除了使用cscript.exe ABC.vbs作爲命令行的兩條註釋外，下面是一個函數，您可以將它放在.vbs腳本中，以確保它始終與cscript引擎一起運行，無論它如何調用。

Sub checkengine 
    pcengine = LCase(Mid(WScript.FullName, InstrRev(WScript.FullName,"\")+1)) 
' BEGIN CALLOUT A 
    If Not pcengine="cscript.exe" Then 
    Set WshShell = CreateObject("WScript.Shell") 
    WshShell.Run "CSCRIPT.EXE """ & WScript.ScriptFullName & """" 
    WScript.Quit 
    End If 
' END CALLOUT A 
End Sub 

從這個網站：Forcing VBScript Files to Run in CScript Mode

把Call checkengine在您的VBScript的開始。如果它檢測到cscript.exe不在命令行中，它將使用該引擎重新運行該腳本。