OKWAVEのAI「あい」が美容・健康の悩みに最適な回答をご提案!
-PR-
解決
済み

VB6でWSH(vbs)を起動できる方法を教えてください。

  • すぐに回答を!
  • 質問No.204531
  • 閲覧数3305
  • ありがとう数6
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 5% (1/20)

visual Basic 6でアプリケーションを開発していますが、
このアプリケーション(exe)から、test.vbsを起動したいと考えています。

====vbのコード=====
'ボタンクリックしたら、test.vbsが実行される
Private Sub Command1_Click()
shell("test.vbs")
End Sub

==== test.vbs ====
MsgBox("test.vbs起動しました。")

です。
上記のようにコードを書きましたが、Shell関数で

「実行時エラー'5'
プロシージャの呼び出し、または引数が不正です。」

のメッセージが出力されて、vbsが起動できません。
VB6でWSH(vbs)を起動できる方法を教えてください。

環境は以下の通りです。
OS:WIN2000
アプリ:VB6
ブラウザ:IE5.0
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

質問者が選んだベストアンサー

  • 回答No.1
レベル12

ベストアンサー率 45% (207/457)

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の例です。
-PR-
-PR-
このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
こんな書き方もあるよ!この情報は知ってる?あなたの知識を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ