从 VBScript 解析命令到 CMD

Question

我正在尝试从 Web 应用程序将命令 echo msg>com4 解析为 CMD。我尝试了不同的方法，但我做不到。在这种情况下，我也想显示结果而不弹出 CMD 运行并关闭它。

这是我的脚本：

<html>
<head>
<script language="vbscript" type="text/Vbscript"> 
Function cmdRun( )
    Dim shell, fileName
    Set shell = CreateObject("WScript.Shell")
    Set proc = shell.Exec("echo msg>com4")
End Function
</script>
</head>

<body>
    <input type="button" onclick="cmdRun()" value="copy" />
</body>
</html>

有时显示错误"VBA Script 424: object required"。当我使用 cscript 时也显示错误。

Answer 1

如果您运行将其作为 Web 应用程序，即从 Internet 打开页面，则您不会运行运行程序或使用可能影响系统的 activex 控件。

在网页上 usesafesubset 为真。

在这里查看我的回答 - What can't I use when UseSafeSubset is true?

此外，VBScript 不再适用于网页。仅在本地页面和内部网站上。

如果您将脚本更改为本地 VBS 文件并运行使用 CScript.exe 并使用 wscript.echo 打印。

cmd /c cscript //nologo MyVbs.vbs > Com4

从 VBScript 解析命令到 CMD

Parse command to CMD from VBScript

vbscript