0

我正在尝试在我的 HTA 应用程序中运行 VB 脚本,但每次选择提交时,唯一发生的事情就是我的屏幕变白。我已经多次查看脚本,但无法找出导致这种情况发生的原因。任何帮助将不胜感激

代码如下:

<script language="VBScript" 
  Public Sub RunScript() 
  Set objWSH = CreateObject("WScript.Shell") 
  strCMD = "cscript.exe c:\C:\Users\william.smith03\Documents\HTML5 Printer            Install\Printer     (file:///c:/C:/Users/william.smith03/Documents/HTML5%20Printer%20Install/Printer) Install   v3.7.vbs" 
  objWSH.Run(strCMD)  

End Sub 
</script>
4

1 回答 1

1

您错过了>第一行末尾的字符。

如果您确定目录路径中的所有空格和字符都可以,那么这将起作用:

<script language="VBScript">
    Sub RunScript() 
        app  = "cscript.exe"
        args = """c:\C:\Users\william.smith03\Documents\HTML5 Printer            Install\Printer     (file:///c:/C:/Users/william.smith03/Documents/HTML5%20Printer%20Install/Printer) Install   v3.7.vbs"""
        CreateObject("WScript.Shell").Run(app & " " & args)  
    End Sub 
</script>
于 2013-10-17T19:13:30.033 回答