-
vb.net 教程 8-3 数据库操作9-3
版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
经过上一节的分析,我们可以大胆的猜测一下:
罗斯文数据库中的图片,由于该字段是一个OLE对象,所以插入了一些不必要的数据。
我们只需要出现在42 4D及其后面的数据就可以获得真正的图片数据。
修改后的代码如下:
Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
Dim odc As New OleDbConnection()
odc.ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0;data source=D:\save\博客教程\08 数据库\Northwind.mdb"
Dim sql As String = "select 图片 from 类别 where 类别ID=3"
Dim imageCmd As New OleDbCommand(sql, odc)
Dim datareader As OleDbDataReader
odc.Open()
Try
datareader = imageCmd.ExecuteReader(CommandBehavior.SequentialAccess And CommandBehavior.SingleResult)
Dim readerData() As Byte
datareader.Read()
readerData = datareader(0)
Dim destbyte() As Byte
ReDim destbyte(readerData.Length - 78)
Array.Copy(readerData, 78, destbyte, 0, readerData.Length - 78)
Dim ms As New MemoryStream()
ms = New MemoryStream(destbyte)
Dim img As Image = Image.FromStream(ms)
PictureBox1.Image = img
ms.Close()
Catch ex As Exception
MessageBox.Show(ex.Message)
Finally
datareader.Close()
odc.Close()
End Try
End Sub
这次来看看运行结果:
终于功夫不负有心人,读取到了正确的结果。
但
是
当我们想获得类别ID为1时候的图片时候:
Dim sql As String = "select 图片 from 类别 where 类别ID=1"
你会发现,又出错了。
来看看类别表中实际的数据情况(为了大家看的更清楚,我截断了部分中间的数据,用红色的表示):
可以看到类别1的BMP头出现的位置和其他不一样。
但是经过实际对比发现,当类别ID=1时,获得的图片实际应该减去74个字节,
当类别ID为别的值时,获得的图片实际应该减去78个字节,暂时我未搞清楚为什么会出现这种情况
也就是当读取类别ID=1时候的图片,请使用以下代码替换之前对应代码
ReDim destbyte(readerData.Length - 74)
Array.Copy(readerData, 74, destbyte, 0, readerData.Length - 74)
这就是类别1的图片
由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。
学习更多vb.net知识,请参看vb.net 教程 目录
————————————————
版权声明:本文为CSDN博主「VB.Net」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.csdn.net/uruseibest/article/details/78837203
最新更新
求1000阶乘的结果末尾有多少个0
详解MyBatis延迟加载是如何实现的
IDEA 控制台中文乱码4种解决方案
SpringBoot中版本兼容性处理的实现示例
Spring的IOC解决程序耦合的实现
详解Spring多数据源如何切换
Java报错:UnsupportedOperationException in Col
使用Spring Batch实现批处理任务的详细教程
java中怎么将多个音频文件拼接合成一个
SpringBoot整合ES多个精确值查询 terms功能实
数据库审计与智能监控:从日志分析到异
SQL Server 中的数据类型隐式转换问题
SQL Server中T-SQL 数据类型转换详解
sqlserver 数据类型转换小实验
SQL Server数据类型转换方法
SQL Server 2017无法连接到服务器的问题解决
SQLServer地址搜索性能优化
Sql Server查询性能优化之不可小觑的书签查
SQL Server数据库的高性能优化经验总结
SQL SERVER性能优化综述(很好的总结,不要错
uniapp/H5 获取手机桌面壁纸 (静态壁纸)
[前端] DNS解析与优化
为什么在js中需要添加addEventListener()?
JS模块化系统
js通过Object.defineProperty() 定义和控制对象
这是目前我见过最好的跨域解决方案!
减少回流与重绘
减少回流与重绘
如何使用KrpanoToolJS在浏览器切图
performance.now() 与 Date.now() 对比