我的意思是用VB实现
先引用ADODim objCn As New ADODB.ConnectionobjCn.Open "..."objCn.Execute "insert into tableB select * from tableA where ...."