[原创]如何用ACCESS存储大量图片

海狸先生 · 发表于 2006-5-23 01:06:00

是一个很好的思路，不过方法可以改进一下

用图像框的 PictureData 属性直接可以解决显示，修改，新增

首先，用下面提到的新增方法在表中保存图片，不然提示格式不对

在窗体的当前事件中写

if me.Recordset.recordcount=0 then exit sub

me.图像框=me.Recordset("图像字段")

在修改时可以用

Me.Recordset.Edit
Me.Recordset("图像字段") = Me.图像框.PictureData
Me.Recordset.Update

在新增时可以用

Me.Recordset.AddNew
Me.Recordset("图像字段") = Me.图像框.PictureData
Me.Recordset.Update

wuaza · 发表于 2006-5-23 01:10:00

学习，海狸好久没来了

LucasLynn · 发表于 2006-5-23 01:16:00

以下是引用海狸先生在2006-5-22 17:06:00的发言：

是一个很好的思路，不过方法可以改进一下

用图像框的 PictureData 属性直接可以解决显示，修改，新增

首先，用下面提到的新增方法在表中保存图片，不然提示格式不对

在窗体的当前事件中写

if me.Recordset.recordcount=0 then exit sub

me.图像框=me.Recordset("图像字段")

在修改时可以用

Me.Recordset.Edit
Me.Recordset("图像字段") = Me.图像框.PictureData
Me.Recordset.Update

在新增时可以用

Me.Recordset.AddNew
Me.Recordset("图像字段") = Me.图像框.PictureData
Me.Recordset.Update

使用PictureData也会产生体积膨胀的问题，因为Image控件在读入位图的时候会在GDIComment中保留全部像素的副本。

另外PictureData中的位图是DIB格式的，也就是未压缩格式，这对于JPG而言是致命的。

海狸先生 · 发表于 2006-5-23 01:17:00

惭愧惭愧，因工作繁忙，很少上了

LucasLynn · 发表于 2006-5-23 01:21:00

以下是引用海狸先生在2006-5-22 17:17:00的发言：
惭愧惭愧，因工作繁忙，很少上了

狐狸~~~

[em02]

chajiangliang · 发表于 2006-5-23 03:06:00

qlm · 发表于 2006-5-23 04:26:00

快！

Access爱好者 · 发表于 2006-5-23 09:10:00

可以这样吗？

ikolo · 发表于 2006-5-26 18:24:00

呵呵，看看

winner · 发表于 2006-5-26 23:12:00

kankan

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训群2 (792054000)
Access经典源码培训群 (77130759)
Access源码技巧群 (138920637)
access vba (307776555)

主题相关群

地区相关群[您还没设置居住地]

[Access本身] [原创]如何用ACCESS存储大量图片

群介绍
主题无相 (随机显示版	同地区群块其他地区)