
见如下部分代码,我已试过可以提取文件,也可自己编辑一下,实现循环取图等等!
提供一下excel文件下载网址,自己研究下吧!
Sub GetPic()
Dim adoCnn
Dim adoRs
Dim strSql As String, strDataSource As String '<==打开数据库用的字符串变量
Dim strImgFile As String '<==图像文件名字
Dim lngImgSize As Long '<==数据库里的图像字节长度
Dim binImg() As Byte '<==用来取图像的二进制文件
Set adoCnn = CreateObject("adodbconnection")
Set adoRs = CreateObject("adodbrecordset")
strDataSource = "DRIVER={Microsoft Access Driver (mdb)};DBQ=" & ThisWorkbookPath & "\取出相片mdb"
adoCnnOpen strDataSource
strSql = "Select from 数据"
adoRsOpen strSql, adoCnn
'以上 ADO一般 *** 作 自已研究
strImgFile = ThisWorkbookPath & "\tempjpg" '临时图像文件起名为TEMP,喜欢什么随意
'应该注意的是,你这个数据,其实是JPG,应该起什么后缀,请试过以后再说
adoRsMoveFirst '<===从第一行记录开始,要全部遍历,请做MOVENEXT到EOF的循环
'下面只演示取第一个记录的图像
理论上是不可行的
1 打开前是ACCESS初始化
2 即便写宏或VBA,也在ACCESS初始化后
3 打开ACCESS时如果有宏可能还会有提示
可行的思路是写个VB程序,先展现页面,然后后台调用ACCESS打开文件
但会比较麻烦
param[0] = new OleDbParameter("@image_file", OleDbTypeInteger);
数据类型不应该是OleDbTypeInteger
解决方案:
1在access对象中,找到要修改的窗体,然后右键单击该窗体,选择设计视图
2在菜单栏点击数据库工具选项,然后选择属性表打开属性对话框
3接着点击窗体左上角的这个位置,如图所示,在这个四方型中间出现一个小黑色四方形,这样窗体就被选中
4找到属性表,在属性这一栏,点击右边的省略号
5打开了插入的对话框,选择想要作为背景的,然后点击确定按钮。
6这样就看到背景被插入,但是背景太大,无法显示完整效果。
7还是在属性表,设置的缩放模式为缩放,这样背景就会随着窗体的大小而变化
8点击菜单栏上面的窗体视图预览一下效果:
以上就是关于【200分】access数据库.mdb查看长二进制图片全部的内容,包括:【200分】access数据库.mdb查看长二进制图片、ACCESS的数据库文件可不可以设置一打开先显示图片,就像是这样,如图。。求大神指导,我只有这么点分了、如何C#中将图片保存到Access数据库中等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)