该对象用于读写二进制字段数据的,如下是写的简单代码: 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
stm.Type = adTypeBinary
stm.Open
stm.LoadFromFile (文件名)
rs.AddNew
rs.Fields(二进制字段).Value = stm.Read '从stm对象中读取数据
rs.Update
stm.Close
Set stm = New ADODB.Stream
With stm
.Type = adTypeBinary
.Open
.Write rs.Fields(二进制字段) '数据库中的数据写入Stream中
.SaveToFile 文件名, adSaveCreateOverWrite '将Stream中数据写入临时文件中
.Close
End With
Exit Sub
中,文件名是,外部文件??
里面应该怎么定义?