一段SQL代码???
现在SQL数据库的A和B库中有两个同名表newcplbk,其表结构完全一致的,A库的表有数据,B库的表为空,我要将A库的表的数据导入B库的表,代码如下:请问错在哪里,正确的如何写???现在库以打开
'打开SQL的A库的记录集
strSql = "select * from A.dbo.newcplbk"
rstA.Open strSql, adoCnSql, 1, 1
'打开SQL的B库的记录集
strSql = "select * from B.dbo.newcplbk"
rstB.Open strSql, adoCnSql, 1, 1
'从A库中取一条记录
Do While Not rstA.EOF
'从B库中取一条记录
Do While Not rstB.EOF
strSql = "insert into B.dbo.newcplbk(cpzybm,cpbm,cpmc) values('" & rstA.Fields(0).Value & "','" & rstA.Fields(1).Value & "','" & rstA.Fields(2).Value & ")"
adoCnSql.Execute strSql
rstA.MoveNext
rstB.MoveNext
Loop
Loop