读写二进制字段数据

1、使用字段对象的AppendChunk/GetChunk

2、使用ADO Stream对象（2.5版本及以上才有）

该对象用于读写二进制字段数据的，如下是写的简单代码：

    Set stm = New ADODB.Stream    stm.Type = adTypeBinary        stm.Open                         stm.LoadFromFile (文件名)     rs.AddNew    rs.Fields(二进制字段).Value = stm.Read   '从stm对象中读取数据    rs.Update    stm.Close

如下是读的简单代码：

Dim stm As ADODB.Stream        Set stm = New ADODB.Stream        With stm            .Type = adTypeBinary            .Open            .Write rs.Fields(二进制字段)       '数据库中的数据写入Stream中            .SaveToFile 文件名, adSaveCreateOverWrite  '将Stream中数据写入临时文件中            .Close        End With    Exit Sub