GetExecStatus ( 〔ExecId〕 )
値 | 意味 |
---|---|
EXEC_RUNNING | 実行ファイルは実行中です。 |
EXEC_STOPPED | 実行ファイルは実行中ではありません。 |
' Execコマンドの終了待ちなしで呼び出した実行ファイルの処理が終了してから,
' 次のExecコマンドの処理を行う。
Dim exec1_ID
prm1 = _SCF_+"Result.TXT"
If Exec ( _SCF_+"Sum.SPT" ,False ,prm1 ) Then
exec1_ID = _EXEC_ID_
:
End
While GetExecStatus ( exec1_ID ) = EXEC_RUNNING
Sleep ( 100 )
End While
Exec ( _WIN_+"NOTEPAD.EXE" ,True ,prm1)