如何强制vbs脚本在cscript主机上运行

Question

如何强制vbs脚本在cscript主机上运行，​​而不是在WScript主机上运行？

如何可靠地确定vbs是否从XP/Vista/7的命令提示符运行？

此外，如果它没有从命令提示符运行，我将如何让脚本自行启动到命令提示符中？

我正在寻找一小段代码。

Answer 1

没有财产或类似的，你可以设置任何东西，所以你留下丑陋的黑客就像这样：

Function ForceCScript() 
On Error Resume Next 
WScript.StdErr.Write(Chr(7)) 
If Err.Number <> 0 Then 
    Err.Clear 
    On Error GoTo 0 
    set WshSh=WScript.CreateObject("WScript.Shell") 
    sh=WshSh.ExpandEnvironmentStrings("%COMSPEC%") 
    If InStr(sh,"%") = 1 Then sh="cmd.exe" 
    WshSh.Run(sh&" /K cscript /nologo """&WScript.ScriptFullName&"""") 
    WScript.Quit() 
End If 
End Function 

call ForceCScript()