如果你修改的数据和你表中字段属性相配的话。在VB中从一张表添加数据到另一张表是很简单的事情。其方法如下:
1、查询出你修改好的数据
adodc1.recordsorce = select * from 表 where 修改时间 = '" & xxx &"'
注:你要弄清楚要把哪个表的数据写入另一个表。上面的代码是你查询出要写入另一张表的数据。
2、把数据修改并添加到备份表。
with adodc2.ecordset
for i = 0 to adodc1.recordset.count
.addnew
.字段名1 = 字段名1 ' 第二个字段名1完整的写法是 adodc1.recordset
!字段名1
。。。。。。。
.update
.movenext
next i
end with
注意:这样写就要用两个ADO控件 1个查询出你所要的信息 这里是 ADO1控件查询出你所要添加的信息。ADO1添加数据,在添加数据的同时可以修改数据。当然数据库都要事先连接好的。 ADO2的数据源也要写好。它的代码很简单:ADODC2。recordsourec = "select * from 被写表"
以上代码可以一次添加多条数据。你查询出来几条,就可以添加几条。当然,如果你的数据与表字段属性不匹配是会出错的,如你一个表字段的属性是数字型的,你添加的数据是文本型的,就会出错。你就要适当的转换数据类型。