我在一个数据库的OLE字段插入了一个画笔图片,然后在VB中用一个data控件与这个表绑定了
又将一个OLE控件插入对象选为了新建画笔图片并与data控件绑定了,为什么最后OLE控件显示不出数据库中的图片。如果我把图片用二进制方式存到access里面,可不可以用o...
又将一个OLE控件插入对象选为了新建画笔图片并与data控件绑定了,为什么最后OLE控件显示不出数据库中的图片。
如果我把图片用二进制方式存到access里面,可不可以用ole和data两个控件就这样读出来? 展开
如果我把图片用二进制方式存到access里面,可不可以用ole和data两个控件就这样读出来? 展开
2个回答
展开全部
引用stream流对象。
在工程属性中引用microsoft activex data ...2.x
是不可以直接用ole这样的容器读出来的。
Private Sub Command1_Click() '读入相片
Set mstream = New ADODB.Stream
mstream.Type = adTypeBinary
mstream.Open
mstream.LoadFromFile "c:\kd\test.jpg"
Adodc1.Recordset.Fields("图片字段").Value = mstream.Read
End Sub
Private Sub Command2_Click() '生成图片
Set mstream = New ADODB.Stream
mstream.Type = adTypeBinary
mstream.Open
mstream.Write Adodc1.Recordset.Fields("图片字段").Value
mstream.SaveToFile "c:\abcd.jpg", adSaveCreateOverWrite
End Sub
我用VB处理图片数据有11年时间了。有问题可以Q我:362342921,说明来意哦~~
在工程属性中引用microsoft activex data ...2.x
是不可以直接用ole这样的容器读出来的。
Private Sub Command1_Click() '读入相片
Set mstream = New ADODB.Stream
mstream.Type = adTypeBinary
mstream.Open
mstream.LoadFromFile "c:\kd\test.jpg"
Adodc1.Recordset.Fields("图片字段").Value = mstream.Read
End Sub
Private Sub Command2_Click() '生成图片
Set mstream = New ADODB.Stream
mstream.Type = adTypeBinary
mstream.Open
mstream.Write Adodc1.Recordset.Fields("图片字段").Value
mstream.SaveToFile "c:\abcd.jpg", adSaveCreateOverWrite
End Sub
我用VB处理图片数据有11年时间了。有问题可以Q我:362342921,说明来意哦~~
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询