希望大家进来看看。我初学，这个问题很简单，我就是不会。如何才能实现？

Question

我想用image来显示数据库中的一个图片，但image1如果才能显示？
我用别人教我的，可以读出一个图片，但就是不会显示。 Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim mstream As ADODB.StreamPrivate Sub Command1_Click()
Set cn = New ADODB.Connection
cn.Open "Provider=SQLOLEDB;data Source=liu;Initial Catalog=pubs;User Id=sa;>"Set rs = New ADODB.Recordset
rs.Open "Select * from pub_info", cn, adOpenKeyset, adLockOptimisticSet mstream = New ADODB.Stream
mstream.Type = adTypeBinary
mstream.Open
mstream.Write rs.Fields("logo").Value
mstream.SaveToFile "c:\publogo.gif", adSaveCreateOverWrite

Answer 1

image中你是如何把图片放到其中的？你把数据库中的图片赋给image不就行了

Answer 2

我在后面加上了:set image1.datasource=rs
image1.datafields=rs.fields("logo").value也不行。我不知道，如果用image1

Answer 3

Image1.Picture = LoadPicture("c:\publogo.gif")

Answer 4

我总不可能从服务器上每次读一条记录就在本机上增加一个文件吧？
gpo2002(gpo2002)再帮忙！谢！！！