VB6中ADO流对象实现对二进制大型对象的读取方法

ADO 流对象的作用： 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
正文