VBS - 不工作的脚本

Question

我有这个不起作用的VBScript。当我按下＆＃34;是＆＃34;在弹出窗口它说错误。请帮忙。谢谢！

代码：

result = MsgBox ("Yes or No?", vbYesNo, "Start Web")

Select Case result
 Case vbYes
    shell.CurrentDirectory = "My Directory"
    shell.Run "startweb.bat"
 Case vbNo
End Select

当我按＆＃34;是＆＃34;一个名为startweb

的.Bat文件

Answer 1

  

当我在弹出窗口中按“是”时，它会显示错误。

什么错误？

• Microsoft VBScript runtime error: Object required或
• The system cannot find the file specified或
• 别的什么？

<强>解决方案：

案例˙对象需要`：

Set Shell = WScript.CreateObject("WScript.Shell")       ''' add this line

result = MsgBox ("Yes or No?", vbYesNo, "Start Web")

Select Case result
    Case vbYes
        shell.CurrentDirectory = "My Directory"
        shell.Run "startweb.bat"
    Case vbNo
End Select    

案例文件丢失：使用"My Directory"的完全限定路径，例如"c:\tests\My Directory"

案例 Else ：无法解决; edit您的问题并添加更多信息。