vb怎样读取ACCESS数据库中的图片

vb怎样读取ACCESS数据库中的图片,第1张

错,不是寸的地址,说白话解释,数据库里能放文字,英文什么的对吧,但是现在是存,所以需要把转成二进制,你就理解把转换成了一段文字放进了数据库,具体代码自己找找看,网上太多了,而且很简单,另外多媒体文件都可以放比如歌曲、**,都这个意思

你这个问题我估计是你用的是老版vb60,而数据库版本是新版本2000或以上。

以下是解决你这个问题的有效方法

关于老版VB60不支持Access2000以上版本的解决办法

方法1在Access中的工具-->数据库实用工具-->转换数据库-->到早期的Access(97)数据库版本,然后在vb中调用此Access数据库。

方法2下载安装补丁VB6 SP5,然后在VB60中选Access2000。

方法3不要用Data1控件,改用ADO控件连接数据库(Access2000以上)。

如果你的数据库是新创建的数据库,没有很多数据,建议你用方法2最好;如果是具有大量数据而又不想安装vb补丁就用方法1,将数据库的格式调成97版就可以啦。

只要用二进制方式打开,并且把数据赋值给一个字节数组即可,比如:

Private Sub Command1_Click()

Dim b() As Byte, i As Long

Open "f:\1jpg" For Binary As #1  '文件名自己改

b = InputB(LOF(1), #1)

Close #1

For i = 0 To UBound(b)  '显示出所有的可见字符(汉字除外)

    If b(i) > 31 And b(i) < 127 Then Print Chr(b(i));

    If CurrentX > ScaleWidth Then Print

Next

End Sub

如果要显示特定位置的信息,比如第10个到第250个字节的内容,只需

For i = 10 To 250

即可

以上就是关于vb 怎样读取ACCESS数据库中的图片全部的内容,包括:vb 怎样读取ACCESS数据库中的图片、有没有简单的方法用VB的image控件加载access数据库中的图片,希望能提供完整的代码、VB6.0 如何读取图片中的信息。(图片用记事本打开后可以看到的信息)等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/sjk/10201044.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-06
下一篇2023-05-06

发表评论

登录后才能评论

评论列表(0条)

    保存