如何向VB数据库内添加照片，数据库为access?

Question

本来用VB编好了数据库，又想着在借用窗体内添加一张照片，作为员工的借用依据，试着在网上查了些资料，无奈自己水平都换给老师了，现在圈出的地方为本人额外添加的内容，现在运行后老是报错，二进制的图片形式好像已写入数据库，但是跟我原来的数据不在一行，求大神给看看，非常感谢。

Answer 1

1、建立一个ACCESS数据库。然后创建新表，比如你想把图片放在名为 “图片”字段中，那么设置 字段 数据类型 为“OLE 对象”。2.VB代码内容Set Cn = New ADODB.ConnectionCn.ConnectionString = ";DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & App.Path & "\aaa.MDB"Cn.OpenSet Rs = New ADODB.RecordsetRs.Open "select * from stock", Cn, adOpenStatic, 3Set mst = New ADODB.Streammst.Type = adTypeBinarymst.Openmst.LoadFromFile mystrRs.AddNewRs.Fields("图片").Value = mst.ReadRs.UpdateRs.CloseCn.Close

Answer 2

保存图片文件名就可以。然后在通过文件名调出图片