从数据库中读图片的问题.

[vic123]

我用以下办法可以把图片直接把数据库中的图片保存在硬盘中.现在我要不保存,怎样直接显示在Picturebox 中,或imagebox 中?
Sub s_ReadFile()
Dim iStm As ADODB.Stream
Dim iRe As ADODB.Recordset

'打开表
Set iRe = New ADODB.Recordset
iRe.Open "select * from img_t", iConc, adOpenKeyset, adLockReadOnly
'iRe.Filter = "id=1"

'保存到文件
Set iStm = New ADODB.Stream
With iStm
.Mode = adModeReadWrite
.Type = adTypeBinary
.Open
.Write iRe("img")
'.SaveToFile App.path & "\22.jpg"
'Image1.Picture
End With

'关闭对象
iRe.Close
iStm.Close
End Sub

[hn123]

再等等.最好不用临时文件.

[vic123]

自己顶...

[牵头蜗牛去散步]

我有個笨方法,先保存為文件顯示出來,然後把文件刪除...

[lxcc]

Dotnet有FromStream方法!VB好像没有这种直接读流的方法!大部分都是通过临时文件实现的!