PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
13830 00/11/08 10:28:33 RE(3):PB6.5: 32kをこえる画像バイナリデータの保存 By ryochan
13811 00/11/07 09:43:22 RE(2):PB6.5: 32kをこえる画像バイナリデータの保存 By ひろゆき
13801 00/11/06 20:35:05 RE(1):PB6.5: 32kをこえる画像バイナリデータの保存 By ryochan
13791 00/11/06 15:48:52 PB6.5: 32kをこえる画像バイナリデータの保存 By ひろゆき

カテゴリ:PowerBuilderの開発環境
日付:2000年11月06日 20:35 発信者:ryochan
題名:RE(1):PB6.5: 32kをこえる画像バイナリデータの保存

ひろゆきさん、こんばんは。

>32kをこえるバイナリデータの保存のやり方を
>教えて頂きたく、書き込ませてもらいました。

filereadと同じく、分割して書き込めばいいです。

blob l_image,l_dimage //バイナリデータ
long l_len //バイナリデータサイズ
long fh //ファイルハンドル
long i //ループカウンタ
long p //データ読み込みポインタ
boolean l_loop = true //ただのループ条件

//blobデータ→l_image格納処理
・・・
l_len = len(l_image)
if l_len = 0 then return

filedelete(\'c:\\image.jpg\')
fh = fileopen(\'c:\\image.jpg\',StreamMode!,Write!,LockReadWrite!,Append!)
boolean l_loop = true

do
 i ++
 p = (i - 1) * 32765 + 1//読込開始ポインタの設定
 if p > l_len then
  exit
 end if
 l_dimage = blobmid(l_image,p,32765)
 filewrite(fh,l_dimage)
loop while l_loop
fileclose(fh)

付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows NT 4.0
DBMS Oracle SQL*Net 2.3
Browser InternetExplorer5.X

Server SoftWare

OS Windows NT 4.0
DBMS Oracle 7.3
WebServer (記載なし)

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