Set mystream= New ADODB.Stream
With mystream
.Mode = adModeReadWrite
.Type = adTypeBinary
.Open
.Write myrecordset("IMAGE字段名") 'myrecordset就是打开的表
.SaveToFile "临时文件名"
End With
2、将临时文件内容读入写表中IMAGE字段,更新
比如:
Set mystream= New ADODB.Stream
With mystream
.Type = adTypeBinary
.Open
.LoadFromFile "临时文件名"
End With
myrecordset.Fields("保存文件内容的字段") = mystream.Read
myrecordset.Update
两个数据库里? are they on the same sql server? or different sql server?
look into WRITETEXT in SQL Server Books Online or look into TEXTCOPY in SQL Server Books Online or see
http://www.databasejournal.com/features/mssql/article.php/1443521
使用Sql语句试试:
方法一:前提是该表只有一个字段或者要插入字段在最前,该方法不推荐
insert into table1 select table2.field2 from table2 where table2.mainkey='2'
方法二:前提是记录已经有了主键值
update table1 set field1=(select field2 from table2 where mainkey2='2') where mainkey1='1'