您的位置:首页 > 其它

如何在数据窗口中显示图片

2007-04-27 17:28 337 查看
1。selectblob 取出图片文件
2。fileopen 创建并打开临时存放的图片文件
li_FileNo = FileOpen("c:/temp.jpg", StreamMode!, Write!, LockReadWrite!, Replace!)
3。取文件长度。
ll_BlobLen =Len(blob_data)
If ll_BlobLen > 32765 Then
If Mod(ll_BlobLen, 32765) = 0 Then
li_Writes = ll_BlobLen / 32765
Else
li_Writes = (ll_BlobLen / 32765) + 1
End if
Else
li_Writes = 1
End if

4.写入
ll_pos = 1
For i= 1 To li_Writes
lblb_Data = BlobMid(blob_data, ll_Pos, 32765)
ll_pos += 32765
If FileWrite(li_FileNo, lblb_Data) = -1 Then
FileClose(li_fileno)
Return false
End if
Next
5.显示
ls_path="c:/temp.jpg"
dw_1.modify("p_1.filename ='"+ls_path+"'")

内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: