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

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

用代码加附件

这个我用过

我自己的方法是

不用附件字段

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

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

然后增加时使用如下代码

rs!FileData = con.PictureData

以上代码中

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

con 是图片控件

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

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

1、打开需要Excel表格,点击工具栏的“插入”→“图片”2、插入图片后点击工具栏的“格式”→“删除背景”3、接着我们就可以标记需要保留的区域,框选完毕后点击“保留更改”即可4、这个时候我们就会发现图片的背景已经消失了。

ADODB.Stream.LoadFromFile(Path)

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

rs.Update

就放入附件了

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

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


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/11892208.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-19
下一篇 2023-05-19

发表评论

登录后才能评论

评论列表(0条)

保存