vb向数据库中读取单个图片文件

最新推荐文章于 2024-07-04 14:13:43 发布

lmdcszh

最新推荐文章于 2024-07-04 14:13:43 发布

阅读量3.1k

点赞数

分类专栏： VB 文章标签：数据库 vb stream string image sql

本文链接：https://blog.csdn.net/lmdcszh/article/details/6747723

版权

VB中，由于图片文件不能直接存入数据库，需要使用ADODB.Stream对象将其转换为二进制。通过Stream对象，可以实现图片文件的读取、添加和删除操作，虽然大量存储会影响运行速度，但对于学习而言颇具价值。

摘要由CSDN通过智能技术生成

vb中图片文件和声音文件不能直接写入数据库，需要将其转化成二进制文件，怎么转化成二进制文件呢？这里就用到了ADODB的Stream对象，这个对象与RecordSet对象有许多类似之处（比如都可以作为一个临时容器盛放数据，但Stream对象盛放的是二进制格式的）；二者之间也有非常密切的关系（RecordSet对象许借助Stream对象写入二进制格式的文件）。当然直接将大量的图片和声音这种比较庞大的数据放入数据库会大大影响运行速率，但在初学阶段做一尝试也是很有意思的。下面就是一些简单的代码，实现对于指定的图片文件向数据库中添加、读取、删除的操作。

'此函数实现保存文件到数据库中。分两步完成，
'第一步：先加载指定图片文件以二进制的形式存到Stream对象中；
'第二步：将Stream中的二进制数据写到数据库的一个表中。
'这里的Stream对象起到了一个转化和缓存的作用
Sub s_SaveFile()
        Dim iStm As ADODB.Stream
        Dim iRe As ADODB.Recordset
        Dim iConcstr As String

        '实例化Stream对象
        Set iStm = New ADODB.Stream
        '读取文件到内容
        With iStm
                 '设置数据流为：二进制模式
                .Type = adTy