VBSの実行時間を指定するには？ (ID:112616)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 これでは駄目ですか？ Dim objFso Dim objShell Dim objExec Set objFso = CreateObject("Scripting.FileSystemObject") If Not objFso.FileExists("*:\*.exe") Then Set objShell = CreateObject("WScript.Shell") Set objExec=objShell.Exec("*setup.exe") Do While objExec.Status=0 ' 実行が終わるまでループ Wscript.sleep(100) Loop Set objShell = Nothing End If Set objFso = Nothing