Office中国论坛/Access中国论坛

标题: 【源码示例】上传与显示——再谈图片在报表与窗体中的应用 [打印本页]

作者: roych 时间: 2011-7-26 21:26
标题: 【源码示例】上传与显示——再谈图片在报表与窗体中的应用
   尽管OLE对象类型（长二进制）可以存放图片，我还是不赞成在数据表中存储图片对象的，因为这样会引起数据库体积膨胀。而实际上图片的应用也是非常广的，例如人事管理方面。为此我们只能进行“迂回”处理（详见【源码分享】直接与迂回——浅谈图片在报表中的使用）。
   大家可以根据下面几点来理解这个实例：
   1、利用FileDialog对象的文件拾取器获取客户端文件路径（并同时获取文件名），并实现多选。
   2、用FileCopy方法，把客户端图片复制到后台数据库文件夹。
   3、用ADO记录集，把存放在后台数据库的图片路径字符串追加到数据表中。
   4、通过设置窗体或者报表中图片路径的方法在窗体或者报表中显示图片。

   附件说明：

由于原数据表未保存数据，因此需要先在窗体界面上传照片，填写好数据之后，报表才会显示图片。
客户端为源文件夹 ，服务端为目标文件夹 。
2012-7-17，针对Mid函数可能会出错的情况重新写了代码。
2013-1-27，加上错误处理，并改用ADO来处理数据。
2019-1-5，修改部分bug，清除2003版本的datetimepicker（新版Access默认不再安装mscomctl）。

[attach]51225[/attach]

作者: tmtony 时间: 2011-7-26 21:37
坐个沙发

作者: xuwenning 时间: 2011-7-27 08:24
学习

作者: asklove 时间: 2011-7-27 08:48
学习

作者: jingan 时间: 2011-7-28 15:19
学习

作者: yanwei82123300 时间: 2011-8-1 10:19
thank you sharing it

作者: zhangjimfu 时间: 2011-8-9 09:03
学习!谢谢版主分享

作者: 冚友 时间: 2011-8-12 22:20
谢谢版主分享

作者: chenyingfengsx 时间: 2011-9-10 21:53
看看是不是我想要的，正在寻找！

作者: 阳城 时间: 2012-2-16 15:18
非常感谢！！！

作者: wgh3g 时间: 2012-3-12 11:44
谢谢分享

作者: williamwangc 时间: 2012-5-19 21:15
学习学习。

作者: fly888 时间: 2012-7-14 11:02
图片根本上传不了。

作者: 拉登需要我 时间: 2012-9-4 14:21
您好！我按照附件的指令做了一个报表，但是不知道为什么图片就是显示不出来，有空帮我看一下吗？谢谢

作者: roych 时间: 2012-9-4 22:51
本帖最后由 roych 于 2012-9-4 22:52 编辑

拉登需要我发表于 2012-9-4 14:21
您好！我按照附件的指令做了一个报表，但是不知道为什么图片就是显示不出来，有空帮我看一下吗？谢谢

仔细看了你的附件，函数是写了，问题在于并没有把这个函数引用到事件当中。如图所示，在主体（Detail）的格式化事件（OnFormat）中，加入以下语句=InsertPic()，即可显示。
[attach]50324[/attach]

作者: layaman_999 时间: 2012-9-4 23:18
1.图片存储路径如果用软编码就好了，这样方便用户迁移图片存储目录到共享文件夹
2.表中可存储图片原始名称，图片的真实名称+主键来命名比较好，这样就不会发生同名图片覆盖的现象了。
数据库中也可以不用存储图片路径，图片使用主键命名，显示图片时，自动去寻找 \\存储文件夹\主键.jpg

作者: 拉登需要我 时间: 2012-9-6 12:46

roych 发表于 2012-9-4 22:51
仔细看了你的附件，函数是写了，问题在于并没有把这个函数引用到事件当中。如图所示，在主体（Detail） ...

sorryw，我按照图显示那样，在主体格式化位置添加了=InsertPic()，但是还是不能显示照片。。。

作者: 拉登需要我 时间: 2012-9-6 13:08

拉登需要我发表于 2012-9-6 12:46
sorryw，我按照图显示那样，在主体格式化位置添加了=InsertPic()，但是还是不能显示照片。。。

哦哦，我知道为什么了，我的图像控件没有设置数据来源，现在可以了，谢谢啦！！

作者: wufeng980114 时间: 2012-9-16 08:31
路过学习了

作者: lamber 时间: 2015-2-3 15:16
支持一下

作者: scorpiorat 时间: 2015-4-26 22:25
感谢分享.

作者: Bonny_新乐 时间: 2015-8-3 22:03
需要中。谢谢

作者: jin88878 时间: 2015-12-27 13:58
一直在找的好东西，下来试一下

作者: 522650696 时间: 2016-4-26 21:00
感谢分享！

作者: lanlow 时间: 2016-5-7 11:44
看看楼主是怎么解决的

作者: p51219 时间: 2016-7-10 00:17
好好好呵呵呵呵呵

作者: fyjtyf1987 时间: 2017-11-20 14:18
给力

作者: hxx3970 时间: 2018-8-25 14:48
报表中没有图片

作者: roych 时间: 2018-8-27 09:47

hxx3970 发表于 2018-8-25 14:48
报表中没有图片

需要先在主窗体上上传照片了，报表才有数据。
——源文件是没有任何记录的。

作者: wuwu20022 时间: 2019-2-20 11:46
学习

作者: liaobus 时间: 2020-3-9 14:52
学习一下

作者: 向小庞 时间: 2022-6-18 13:57
想学习下

作者: wuwu200222 时间: 2024-1-11 10:04
学习

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)