PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
19429 03/05/06 16:35:36 RE(1):PB6.5: テキストファイルの呼び出し方法についての続き By t-shimmy
19424 03/05/06 14:44:38 PB6.5: テキストファイルの呼び出し方法についての続き By aokazumajin

カテゴリ:PowerBuilderの開発環境
日付:2003年05月06日 16:35 発信者:t-shimmy
題名:RE(1):PB6.5: テキストファイルの呼び出し方法についての続き

aokazumajinさん、こんにちは。
li_Emp_Data = dw_1.Importfile(\"C:\\pwrs\\pb6\\demodb\\ABC.txt\",2)
の戻り値 li_Emp_Data は何が返ってきてますか?
GetFileOpenName 、Fileopen、FileReadの戻り値は正常ですか?
データウインドウ dw_1 単独(データウインドウペインタ)でインポートしたら
どうなりますか?
この場合、C:\\pwrs\\pb6\\demodb\\ABC.txtをコピーし、タイトル行2行は削除してください。
ImportfileするまえにFileCloseしたらどうなりますか?
>---------------------------------------------------------------------------------------------
><コード>

>integer value,li_FileNum,result,li_Emp_Data
>string dcode,dname,ls_Emp_Input
>long ll_FLength

><テキストファイルを開きダイアログボックスを開く処理>

>value =  GetFileOpenName(\"ABC.txt\", &
>+ dcode,dname, \"txt\", &
>+ \"Text Files (*.TXT),*.TXT,\")

><ダイアログボックスからテキストファイルをオープンする処理>

>IF value = 1 THEN 
>   ll_FLength = FileLength(\"c:\\pwrs\\pb6\\demodb\\ABC.txt\")
>   li_FileNum = FileOpen(\"c:\\pwrs\\pb6\\demodb\\ABC.txt\")
>end if

><テキストファイルの読み込み処理>

>IF ll_FLength < 32767 THEN
> FileRead(li_FileNum, ls_Emp_Input)
>END IF

><テキストファイルをデータコントロールに表示する処理>

>li_Emp_Data = dw_1.Importfile(\"C:\\pwrs\\pb6\\demodb\\ABC.txt\",2)


付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows 2000
DBMS Sybase SQL Anywhere Client
Browser InternetExplorer5.X

Server SoftWare

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

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