我最终如何从vbscript运行批处理文件

Question

i有一个批处理文件，该文件保存在共享驱动器（S:）中，并且我正在尝试使用vbscripts createObject方法创建shell脚本来运行我的批处理文件。我当前的vbscript是：

<script language="VBScript">
Sub zeprint()
Dim oShell
Set oShell = WScript.CreateObject("WScript.Shell")
oShell.CurrentDirectory = "s:"
oShell.Run "s:batprint.bat"
Set oShell = Nothing
End Sub
</script>

然后在某些HTML中，我创建了一个按钮并设置onclick="zeprint()"。我知道该按钮有效，因为我曾经将其分配给window.print();。我一直在寻找答案，但似乎无法弄清楚为什么它不起作用。当手动从命令提示符中手动运行时，批处理文件也可以正确运行。这使我相信这是VBScript的问题。

任何帮助将不胜感激。

Answer 1

这对我有用：

Set oShell = WScript.CreateObject("WSCript.shell")
oShell.run "c:test.bat"

或使用

oShell.run "test.bat"

如果VBS和BAT位于同一位置。

当找不到.bat文件的位置时，它失败了。

Answer 2

您需要使用目的地的绝对路径，而不是驱动器字母。还要确保路径目的地所在的设备没有Windows配置，以节省节能，并在几分钟后关闭磁盘。

Answer 3

请参见下面 - 更改" calc"到" c： batchfile.bat"等

Set oShell = WScript.CreateObject("WSCript.shell")
a=msgbox("Run Calculator?" , vbYesNo + vbQuestion , "Run Calc?")
if a = vbyes then
oShell.run "CALC"
else
end if