PB 電子会議室
| 発言No. | 更新日 | 題名（クリックすると発言内容と関連するコメントが表示されます） |
|---|---|---|
| 23934 | 13/03/11 15:01:25 | RE(4):ファイルの読み込み件数を取得したい By kaza1222 |
| 23933 | 13/03/11 14:57:12 | RE(3):ファイルの読み込み件数を取得したい By kaza1222 |
| 23932 | 13/03/08 21:31:09 | RE(2):ファイルの読み込み件数を取得したい By めめ |
| 23931 | 13/03/06 09:35:17 | RE(1):ファイルの読み込み件数を取得したい By asano01 |
| 23930 | 13/03/04 19:22:56 | ファイルの読み込み件数を取得したい By kaza1222 |
カテゴリ：スクリプトの記述
日付：2013年03月08日 21:31 発信者：めめ
題名：RE(2):ファイルの読み込み件数を取得したい
kaza1222さん、こんばんは。
＞そこで、プログレスバーを実装しようと思ったのですが、
＞ファイルを読み込む前にファイルのデータ件数を
＞プログレスバーの分母に設定したいのです。
FileSystemObject を使うのはいかがでしょうか。
以下、簡単なサンプルですがあげておきます。
参考になればよいのですが。
OLEobject lo_fso
OLEobject lo_fsots
Long ll_rec
lo_fso = CREATE OLEObject
lo_fso.ConnectToNewObject(\"Scripting.FileSystemObject\")
lo_fsots = CREATE OLEObject
lo_fsots.ConnectToObject(\"TextStream\")
lo_fsots = lo_fso.OpenTextFile(ファイル名, 8) // ForAppending
ll_rec = lo_fsots.Line
MessageBox(\"結果\", \"レコード件数は \" + String(ll_rec - 1) + \" 件です\")
lo_fso.DisconnectObject()
lo_fsots.DisconnectObject()
DESTROY lo_fso
DESTROY lo_fsots
付加情報：
PowerBuilder Version (記載なし)
Client SoftWare
OS (記載なし)
DBMS (記載なし)
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.