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 (記載なし)
Copyright © 2013 Power Future Co., Ltd.