直接用SQL语句假设从A表移动表B表, dim strsql as string strsql = "select * into B from A" 'B表不存在 strsql = "insert into B select * from A" 'B表和A表记录一致 Dim adocon As New Connection With adocon .ConnectionString = "连接字符串.." .Open End With adocon.Execute strsql
(1)数据转移到一个新表中 sql="select * into 新表 from 旧表" conn.excute (sql) (2)数据转移到一个已有的表中 sql="insert into 目标表 select * from 旧表"
dim strsql as string
strsql = "select * into B from A" 'B表不存在
strsql = "insert into B select * from A" 'B表和A表记录一致
Dim adocon As New Connection
With adocon
.ConnectionString = "连接字符串.."
.Open
End With
adocon.Execute strsql
sql="select * into 新表 from 旧表"
conn.excute (sql)
(2)数据转移到一个已有的表中
sql="insert into 目标表 select * from 旧表"
就是把B表的所有数据插入到A表中。
也可以先到了另一个表后再处理???
不知这样呆板否!!!!
----------------------------------------------------
对我就是这个意思!因为我新建的那个表B表包含大部分的A表中的数据,但它本身又有一些其它的数据,然后再把这个数据库中的数据送到报表中去打印.
sql语句能实现任何你需要处理的功能啊