怎么在Access用代码添加附件，遇到这种情况怎么解决啊

用代码加附件

这个我用过

我自己的方法是

不用附件字段

另外建立一个表，专门存放附件，与主表是一个一对多关系。附件的字段类型 为 OLE类型

然后在窗体中增加一个图片控件，先把图片文件读入到图片控件中，

然后增加时使用如下代码

rs!FileData = con.PictureData

以上代码中

rs是代表附件表的一个recordset对象

con 是图片控件

其实 ACCESS在后台也是用一个一对多的表来实现的，不过这个一对多的表和关系是隐藏的而已

我只所以这样用，是因为我后台数据库用的是mySQL，mySQL中没有附件字段。其他数据库中都是没有的

ADODB.Stream.LoadFromFile(Path)

rs("字段名") = stream.Read()

rs.Update

就放入附件了

至于显示 可以跟picturebox 绑定 直接可以显示的

如果不绑定可以先ADODB.Stream. SaveToFile 到临时文件里 然后 再读取

可能会出现类型转换错误，导致数据丢失。

比如将文本字段转为长整形字段时：

原记录字段值为“1”，则可以转换；

而原记录字段值为“A”就转换不了，则字段值将被删除。

---