php access ole相片,[求助]怎样读取ACCESS数据库中的OLE对象的图片啊???
使用流对象保存和显示图片
打开vb6,新建工程。
添加两个按钮,一个image控件
'** 引用 Microsoft ActiveX Data Objects 2.5 Library 及以上版本
‘2.5版本以下不支持Stream对象
Dim iConcstr As String
Dim iConc As ADODB.Connection
'保存文件到数据库中
Sub s_SaveFile()
Dim iStm As ADODB.Stream
Dim iRe As ADODB.Recordset
Dim iConcstr As String
'读取文件到内容
Set iStm = New ADODB.Stream
With iStm
.Type = adTypeBinary '二进制模式
.Open
.LoadFromFile App.Path + "\test.jpg"
End With
'打开保存文件的表
Set iRe = New ADODB.Recordset
With iRe
.Open "select * from img", iConc, 1, 3
.AddNew '新增一条记录
.Fields("photo") = iStm.Read
.Update
End With
'完成后关闭对象
iRe.Close
iStm.Close
End Sub
Sub s_ReadFile()
Dim iStm As ADODB.Stream
Dim iRe As ADODB.Recordset
'打开表
Set iRe = New ADODB.Recordset
‘得到最新添加的纪录
iRe.Open "select top 1 * from img order by id desc", iConc, adOpenKeyset, adLockReadOnly
'保存到文件
Set iStm = New ADODB.Stream
With iStm
.Mode = adModeReadWrite
.Type = adTypeBinary
.Open
.Write iRe("photo")
‘这里注意了,如果当前目录下存在test1.jpg,会报一个文件写入失败的错误.
.SaveToFile App.Path & "\test1.jpg"
End With
Image1.Picture = LoadPicture(App.Path & "\test1.jpg")
'关闭对象
iRe.Close
iStm.Close
End Sub
Private Sub Command1_Click()
Call s_ReadFile
End Sub
Private Sub Command2_Click()
Call s_SaveFile
End Sub
Private Sub Form_Load()
'数据库连接字符串
iConcstr = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False" & _
";Data Source=F:\csdn_vb\database\保存图片\access图片\img.mdb"
Set iConc = New ADODB.Connection
iConc.Open iConcstr
End Sub
Private Sub Form_Unload(Cancel As Integer)
iConc.Close
Set iConc = Nothing
End Sub
php access ole相片,[求助]怎样读取ACCESS数据库中的OLE对象的图片啊???相关推荐
- mysql source导入_读取MySQL数据库中的数据【Python数据分析百例连载】
当所需的数据存贮在MySQL数据库中时,那么数据分析首要任务就是要通过Pandas读取MySQL数据.例如,某网站注册用户信息保存在MySQL数据库中,如图所示(部分数据),下面将使用Pandas的r ...
- 读取azkaban数据库中的longblob数据类型
介绍 当需要读取azkaban数据库中的longblob数据类型的数据时,可以使用Java连接Mysql数据库的方式进行读取. 代码 代码如下: public String getErrorLog() ...
- 使用Python读取Mysql数据库中股票信息并生成6日涨幅趋势图,绘制出规范的Excal表格
一.数据库导入股票数据 爬虫或其他工具获取数据,并转换为Excel表,然后导入数据库中. 我的如下: 二.创建函数,编写存储过程 1.mysql存储过程 CREATE DEFINER=`root`@` ...
- C#读取SQLsever数据库中的内容显示在textbox中
首先建立数据库的连接 然后写SQL语句确认需要获取的字段 string connStr = "server=.;database=MedicineCabinet;Integrated Sec ...
- 用python读取pg数据库中的blob类型图片数据,转换存成jpg格式存到本地文件夹
先啰嗦一下,热热身 在工作中,我们常见到数据库中的数据类型主要为char,varchar,text等,但是有时我们也会用blob格式来存储语音文件或者图像文件,在网上找了很多,都没找到合适的办法,只好 ...
- delphi mysql 图片_如何读取delphi数据库中的图片
展开全部 第7章 数据库处理实例 实例122 在数据库中存取图像 本实例演示如何在数据库中存取图像文件. 向窗体上添加一个TListBox组件.3231313335323631343130323136 ...
- mysql long raw_读取Oracle数据库中LONG RAW字段会抛出异常
我使用Spring Boot + MyBatis + druid1.0.23读取表中的Long RAW字段时出现异常,然后我又使用Spring里的SingleConnectionDataSource能 ...
- C++ Opencv 读取指定路径中的所有文件(图片)及指定路径中指定格式的所有文件(图片)
读取指令路径下的所有文件,程序如下: #include <io.h> #include < fstream> #include < string> #include ...
- Java 读取Oracle数据库中的Date日期型怎么去掉秒后面的0
Oracle数据去0 分享方法 :为什么多了一个0,数据库里面的数据是没有0的,取出来的时候多了一个0,这是Oracle数据搞的鬼,解决代码如下 可参考 [java] view plaincop ...
最新文章
- LeetCode简单题之买卖股票的最佳时机
- 在CentOS 6.3 64bit上为Apache Traffic Server 4.2.3挂载SSD并压测
- 使用 SAX 解析器简化文档处理程序的编写
- hdu 5072 Coprime
- phpstorm调试php配置,PhpStorm配置Xdebug调试WordPress
- 【测试思考】测试段位之测试六段
- VS2017C++单元测试
- 造大专计算机学历,广昌县职业技术学校计算机应用专业助您 掌握一技之长获大专学历...
- 初学者学习C++的50条忠告
- 程序员的修炼之道——从小工到专家
- 最省钱的方式搭建电子商务网站
- tp5 + layui 上传图片[支持单张和多张 ]
- 【广工考试笔记】计算机系统结构考试速成笔记
- 360签名工具 linux,360签名工具-360apk签名工具(qihoo360 apk signer)下载 v1.0官方版--pc6下载站...
- 在树莓派下使用dlib及resnet的人脸检测及识别
- 【OpenGL ES】着色语言GLSL
- 百丽时尚赴港IPO,持续释放品牌年轻化活力
- LCD12864 菜单部分编写
- 关于double、arccos等计算的问题
- homeassistant mysql_二、(可选)安装MariaDB替换homeassistant数据库
热门文章
- Chrome好用的插件
- crackme 逆向寒假生涯(22/100)
- 用ASM编写一个简单的Windows Shellcode思路总结
- Python中*args 和**kwargs的用法
- 2.1 基础-数字翻转
- Acwing第 32 场周赛【完结】
- 1064 Complete Binary Search Tree (30 分)【难度: 一般 / 知识点: 完全二叉搜索树】
- Bootstrap的引用文件
- 正面管教之PHP_正面管教
- python中for循环和while循环的区别_Python中for循环和while循环有什么区别?