怎样在数据库中保存二进制数据？

用ADODB.Stream和ADODB.Recordset相结合
我现在就是这么做的
在存盘时用
记录集.Fields("Image").AppendChunk 
简单代码：
Dim adoStream As New ADODB.Stream 
Dim adoSet As New ADODB.Recordset
Dim strFullFilename As String
strFullFilename = "C:\temp.doc" '你要写入数据库的文件
adoStream.Type = adTypeBinary
adoStream.Open
adoStream.LoadFromFile strFullFilename
adoSet.Open "Select * From MyTable" ,cn  'cn为活动数据库连结
adoSet.AddNew
adoSet.Fields("Image").AppendChunck adoStream.Read
adoSet.Update
'
MyTable 表包含一个字段，叫"Image"类型为Image
读取和这个过程相反
获取"Image"字段的值用 adoSet.Fields("Image").GetChunck()