VB6中ADO流对象实现对二进制大型对象的读取方法
VB6中ADO流对象实现对二进制大型对象的读取方法,VB6中ADO流对象实现对二进制大型对象的读取方法
先进入VB6菜单:工程---引用 勾选:Microsoft ActiveX Data Objects Library 2.5 这个版本的ADO对象定义了ADO流对象
ADO流对象的使用范例:
1、 利用ADO流对象把图相存入与ADODC相连接的类型为Binary的字段的记录中
Dim myStream As New ADODB.Stream
myStream.Type = adTypeBinary
myStream.Open
CommonDialog1.FileName = ""
CommonDialog1.Filter = "Bmp(*.bmp)|*.bmp"
CommonDialog1.ShowOpen
If CommonDialog1.FileName <> "" Then
myStream.LoadFromFile CommonDialog1.FileName
Adodc2.Recordset.Fields("相片").Value = myStream.Read
Adodc2.Recordset.Update
End If
正文