PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
7632 99/08/13 23:50:54 RE(9):PB6: 外部プログラムの実行結果(戻り値)の取得 By Sin2
7539 99/08/10 15:03:23 RE(8):PB6: 外部プログラムの実行結果(戻り値)の取得 By めめ
7538 99/08/10 15:01:52 RE(7):PB6: 外部プログラムの実行結果(戻り値)の取得 By めめ
7528 99/08/09 22:17:40 RE(6):PB6: 外部プログラムの実行結果(戻り値)の取得 By Sin2
7499 99/08/06 16:54:01 RE(5):PB6: 外部プログラムの実行結果(戻り値)の取得 By キノタク
7482 99/08/05 22:33:31 RE(4):PB6: 外部プログラムの実行結果(戻り値)の取得 By Sin2
7469 99/08/04 22:47:35 RE(3):PB6: 外部プログラムの実行結果(戻り値)の取得 By M.M
7468 99/08/04 21:13:00 RE(2):PB6: 外部プログラムの実行結果(戻り値)の取得 By Sin2
7443 99/08/03 23:27:47 RE(1):PB6: 外部プログラムの実行結果(戻り値)の取得 By リエッチ
7442 99/08/03 23:10:30 PB6: 外部プログラムの実行結果(戻り値)の取得 By Sin2

カテゴリ:スクリプトの記述
日付:1999年08月10日 15:03 発信者:めめ
題名:RE(8):PB6: 外部プログラムの実行結果(戻り値)の取得


(続きです)

ulong lul_sts
long ll_err,ll_ExitCode
string ls_app, ls_com, ls_null
boolean lb_sts

ws_si lws_si // STARTUPINFO 構造体
ws_pi lws_pi // PROCESS_INFORMATION 構造体
constant ulong STILL_ACTIVE = 259
constant ulong INFINITE = 4294967295

SetLastError(0)
SetNull(ls_null)
ll_ExitCode = STILL_ACTIVE

ls_app = \"c:\\windows\\calc.exe\"
ls_com = \"\" // 引数が必要なときは、先頭1字はスペースです
lb_sts = CreateProcessA(ls_app, ls_com, ls_null, ls_null, FALSE, 0, ls_null, ls_null, lws_si, 
lws_pi)
ll_err = WaitForInputIdle(GetCurrentProcess(), INFINITE)

IF lws_pi.hProcess <> 0 THEN
DO WHILE ll_ExitCode = STILL_ACTIVE
lul_sts = WaitForSingleObject(lws_pi.hProcess, 1000)
lb_sts = GetExitCodeProcess(lws_pi.hProcess, ll_ExitCode)
LOOP
// ll_ExitCode が戻り値です
ELSE
// プロセスが起動できなかった時の処理を記述して下さい
END IF




付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows NT 4.0
DBMS (記載なし)
Browser (記載なし)

Server SoftWare

OS (記載なし)
DBMS Oracle 7.3
WebServer (記載なし)

PowerSpaceの運営は、パワーフューチャー株式会社が行っております。
Copyright © 2013 Power Future Co., Ltd.