VB6.0编程，想把ACCESS07数据库【ABC】中表1中的所有内容都复制到同一数据库的表2里面，求代码。

Question

VB新手求教，在线等。
求完整代码。

Answer 1

在工程里引用microsoft activex data objects 2.7 library

Dim cn As New ADODB.Connection, rs1 As New ADODB.Recordset, sql As String '在通用声明里定义，其中cn是连接对象，rs1是记录集，sql是查询语句
Private Sub Form_Load()
cn.Open "provider=microsoft.jet.oledb.4.0;data source=" + App.Path + "\数据库名.mdb" + ""
sql = "select * from 表名"
rs1.Open sql, cn
rs1.MoveFirst
Do While Not rs1.EOF
Combo1.AddItem rs1("字段名")
rs1.MoveNext
Loop
rs1.Close
End Sub
如果你还有什么不懂的，可以百度搜下：编程回忆录，他们现在正在录制这方面的教程，都是零基础开始，由浅入深。

Answer 2

select * into 表2 from 表1追问

能写一下详细代码吗，我知道应该select * into 表2 from 表1，但是编译出来就错了。能给详细代码吗