VBS - 不工作腳本

-1

我有這個VBScript不起作用。當我在彈出窗口中按「是」時，它說錯誤。請幫忙。謝謝！VBS - 不工作腳本

代碼：

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

當我按下「是」叫.bat文件：startweb

來源

2017-05-19 Bob Smith

它只是說「錯誤」？是否定義了'shell'？我假設「我的目錄」對於Stackoverflow來說也只是一個fakey，並且是bat文件的完整路徑，對吧？ – JNevill

當我按下「是」上彈出，它說的錯誤。

什麼錯誤？

Microsoft VBScript runtime error: Object required，或
The system cannot find the file specified，或
別的東西嗎？

解決方案：

案例對象required`：

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"

案例否則：無法解決; edit您的問題並添加更多信息。

來源

2017-05-19 20:32:50 JosefZ

我會標記你的，但我已經修好了我的。我認爲這個帖子被刪除了，所以沒有回來。在這裏，我是如何解決它：'結果= MSGBOX（「？開學流」，vbYesNo，「開學彈出」）選擇案例導致案例vbYes 設置objShell =的CreateObject（「WScript.Shell」） objShell.CurrentDirectory =「C：\ Users \ Kiril \ Desktop \ Codes \ EXTRA」 objShell.Run「startweb.bat」 Case vbNo End Select' –

VBS - 不工作腳本

回答

相關問題