如何将SQL Server 数据库中的一个表Clone到另一个数据库中（急！！）？

[guoyoulai]

我使用一下程序想将zxqxundss表中的全部记录复制到具有相同结构的表ghf中，但并不成果ghf表仍然是空的，而且不提示任何错误，请问如何做，有没有使用一次性复制的方法？
Cnn.ConnectionString = "Data Source=GZHWRDSS;User ID=sa;Password=lgy;"
Cnn.Open
Cnn1.ConnectionString = "Data Source=GZGWR;User ID=sa;Password=lgy;"
Cnn1.Open
Dim rs1 As New ADODB.Recordset, rs2 As New ADODB.Recordset
rs1.CursorLocation = adUseClient
rs2.CursorLocation = adUseClient
rs1.Open "select * from ghf", Cnn, adOpenStatic, adLockOptimistic
rs2.Open "select * from xzqxundss", Cnn1, adOpenStatic, adLockOptimistic
Set rs1 = rs2.Clone
rs1.UpdateBatch

[mythus]

guoyonglai:
你用此方法是不能将zxqxundss表中的全部记录复制到具有相同结构的表ghf中的，因为当你
使用Set rs1 = rs2.Clone时，rst1的source已经改变，rst1已经不对应表ghf了，也就不可能更新你的表ghf，你可比较这句前后，rst1的source属性就知道了，所以你还是用while not rs2.eof...wend语句或是用sql语句执行两个表的统一吧

[wind_lu]

insert into t
select * from northwind.dbo.t