質問: MsgBox("test.vbs起動しました。") です。 上記のようにコードを書きましたが、Shell関数で 「実行時エラー'5' プロシージャの呼び出し、または引数が不正です。」 のメッセージが出力されて、vbsが起動できません。 VB6でWSH(vbs)を起動できる方法を教えてください。 環境は以下の通りです。 OS:WIN2000 アプリ:VB6 ブラウザ:IE5.0
回答: shellを使った場合は Private Sub Command1_Click() Dim retVal As Variant retVal = Shell("wscript.exe c:\test.vbs") End Sub としましょうね。 vbsはダブルクリックすれば実行できるから提示されたようにすると動くと思われますが実行するにはwscript.exe を実行するかcscript.exe を実行しないといけません。 よってwscript.exe の引き数として実行したいvbsのファイルの所在をフルパスで記述しましょう。 あくまでもshellの例です。