VB中如何把图片转换成二进制数存到数据库中?

如题所述

Dim Mst As Stream
Dim rs As ADODB.Recordset
----------------------------------------
Set Mst = New ADODB.Stream
Mst.Type = adTypeBinary '二进制类型
Mst.Open
Mst.LoadFromFile Mystr '加载图片,Mystr为图片路径
----------------------------------------
rs.fields("images")= Mst.Read '保存到数据库

这是保存图片的主要代码
温馨提示:内容为网友见解,仅供参考
第1个回答  2010-06-19
可以的。只要你二进制方式打开图片文件,直接写入到数据库中就可以了。具体方法你搜索下有关资料。
第2个回答  2010-06-20
给我你的邮箱给你发源码
不过我做过数据库和图片管理的程序,不推荐直接保存二进制数的图片数据,那样数据库会变得非常庞大,一下子就几个G了

推荐保存图片的路径,更好一点,可以移动图片到指定的文件夹,也可以很好管理
txt原始图片路径.Text = CommonDialog1.FileName
即可得到图片路径
296722758@qq.com>
相似回答