vb 文件操作
来源:互联网 发布:linux cpu使用情况 编辑:程序博客网 时间:2024/05/16 19:03
vb文件操作,由于项目的需要把图片以二进制的形式存到数据库中,然后再把数据库中图片的二进制文件显示在界面上,网上收集了些资料学习了一把,由于项目的限制,于数据库链接不是通过ADO控件,只需要传两个参数给一个数据库工具,实现数据库的增、删、改、查,找了几天的资料问题解决了,整理一下以备以后用。
图片文件以二进制形式存到数据库
strFileFullName = frmDetails.commPicture.FileName
file_num = FreeFile
Open strFileFullName For Binary Access Read As #file_num ----把图片以二进制形式打开
Filelength = LOF(file_num)
ReDim ByteData(1 To Filelength) As Byte
Get file_num, , ByteData()
Close file_num
图片文件以二进制形式从数据库中取出 ,二进制文件取出后放到一个临时文件中,再从临时文件里读出。
strTmp() = FindOptFileValue(bdOptions, CODE_OPTID_Welcomejpg) ---读出数据库中二进制文件
file_num = FreeFile
Open "d:/temp.dat" For Binary As #file_num ----建立一个临时文件存放数据库图片二进制文件
Dim ln As Long
ln = UBound(strTmp)
Put file_num, , strTmp() ----文件写入到临时文件中
Close file_num
.jpgPictureFirst.Picture = LoadPicture("d:/temp.dat") ---图片在界面上显示
- 寫文件操作(VB)
- VB中的文件操作
- vb操作EXCEL文件
- vb操作Excel文件
- vb 文件操作
- VB文件操作问题
- [VB.NET]文件操作
- vb控件操作文件
- VB.net文件操作
- VB操作文件实例
- VB中操作WORD文件
- 用VB操作INI文件
- VB如何操作INI文件
- VB中的文件操作文档
- VB常用文件操作类
- 用VB操作INI文件
- VB中INI文件操作
- VB.net ini文件操作
- .NET环境下几种不同的邮件发送解决方案
- 为什么就不能多一点默契
- JAVA文件操作类和文件夹的操作代码示例
- 使用USB收发手机短信
- spring aop
- vb 文件操作
- Filter过滤器经典应用
- c++ 程序设计
- 使用ethereal(wireshark)抓数据包。
- 今天终于把"黄色书"看完了
- STL第四课
- J2EE面试题集锦(附答案)
- DetailsView 的用法(与GridView 一起使用)
- 郁闷,一个语句调试很久