PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
1239 98/04/13 09:49:18 RE(6):PB5.0.02: xlsファイルの実行 By hirayama
1114 98/04/02 20:37:52 RE(5):PB5.0.02: xlsファイルの実行 By nari
1111 98/04/02 17:36:47 RE(4):PB5.0.02: xlsファイルの実行 By hirayama
1105 98/04/02 14:42:34 RE(3):PB5.0.02: xlsファイルの実行 By hiko
1100 98/04/02 09:40:09 RE(2):PB5.0.02: xlsファイルの実行 By hirayama
1098 98/04/01 19:09:43 RE(1):PB5.0.02: xlsファイルの実行 By hiko
1094 98/04/01 15:18:17 PB5.0.02: xlsファイルの実行 By hirayama

カテゴリ:旧電子会議室
日付:1998年04月01日 19:09 発信者:hiko
題名:RE(1):PB5.0.02: xlsファイルの実行

はじめまして、hirayamaさん

>いつも皆さんの書き込みで学ばせて頂いております。
>2度目の質問となりますが、よろしくお願いします。

>昨年のこちらの書き込みを参考にして、PB5.0.02アプリ(Win95,32bit)の
>ウインドウのコマンドボタンをクリックする事によって、
>xlsファイルを開こうとしています。

>グローバル外部関数にShellExecuteAを定義し、スクリプトを
>書きましたが、このAPIの引数の1つめ(hwnd)、6つめ(nShowCmd)に
>何を指定すれば良いか、分かりません。

>しかし、適当に(苦笑)以下のように書いてみたところ、
>Excelが起動し、指定したxlsファイルが開きました。

>これでよいのでしょうか?
>何か問題がございましたら、お教え下さい。
>-----------------
>グローバル外部関数の定義

>FUNCTION long ShellExecuteA (long   hwnd, &
>                             string lpOperation, &
>                             string lpFile, &
>                             string lpParameters, &
>                             string lpDirectory, &
>                             long   nShowCmd) &
>         LIBRARY \"shell32.dll\"
>-----------------
>コマンドボタンのクリックイベント

>long ll_status,ll_hwnd,ll_swshow
>string ls_null

>SetNull(ls_null)

>ll_status  =  ShellExecuteA(ll_hwnd,\"open\",\"c:\\test\\test01.xls\",&
>                            ls_null,\"c:\\hardwork\",ll_swshow)
>-----------------

下のように書けば動きますよ

long lresult
string sDataFile
sDataFile = \"c:\\てすと\\abc.xls\"
lresult = ShellExecuteA( 0, \"open\", sDataFile, \"\", \"\", 5)

手抜きの説明ですみませんがこれでどうですか?


>以上です。
>よろしくお願い申し上げます。

>---
>hirayama

付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows95
DBMS (記載なし)
Browser (記載なし)

Server SoftWare

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

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