PB 電子会議室
発言No. | 更新日 | 題名(クリックすると発言内容と関連するコメントが表示されます) |
---|---|---|
1962 | 98/06/19 11:44:50 | RE:PB5: *.TXT 以外のファイルをImportしたい。 By てとらぽっと |
1960 | 98/06/19 10:46:08 | PB5: *.TXT 以外のファイルをImportしたい。 By Mitsuru |
カテゴリ:旧電子会議室
日付:1998年06月19日 10:46 発信者:Mitsuru
題名:PB5: *.TXT 以外のファイルをImportしたい。
他のアプリケーションとの関係上、DBから取得したファイルを*.dat という形式で
ローカルにsaveしています。
ところが、そのファイルをImportFileで読もうとすると、*.TXTという名前でないので
読み込みができません(サフィックスのみを*.txtに変更すると読めます)
またとある本にかかれいた、ImportFunctionのシュミレート関数を作って使用してみましたが、
今度はすべてのデータがタブを含めて1カラム目にはいってしまいます。
(コーディングを見ればあきらかなんですが。。。)
なにか良い解決策がありましたらお教えください。
(まだまだ使い出したばかりなのでよく分からないのよろしくお願いいたします。)
ちなみに、コーディングしたシュミレート関数は以下のようなものです。
F_ImportFile(DataWindow dwName,String sSource)
SetPointer(HourGlass!)
Integer iFNumSource
iFNumSource = FileOpen(sSource, LineMode!, Read!, Shared!)
if iFNumSource = -1 then
return -10
else
string sBuffer
Integer iSourceRet, iCounter = 1
Do While iSourceRet <> -100
iSourceRet = FileRead(iFNumSource, SBuffer)
if iSourceRet = -1 then
FileClose(iFNumSource)
return -12
else
dwName.InsertRow(0)
dwName.SetItem(iCounter, 1, sBuffer)
end if
iCounter = iCounter + 1
Loop
iSourceRet = FileClose(iFNumSource)
if iSourceRet = -1 then
return -14
end if
return 1
end if
付加情報:
PowerBuilder Version (記載なし)
Client SoftWare
OS (記載なし)
DBMS (記載なし)
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.