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
正文 

本文地址：http://com.8s8s.com/it/it42857.htm