今天用vb&access做一个数据上报和数据接收的项目,考虑感觉应该新建一个一摸一样的转门做上报数据的数据库。 但是问题又出现了,怎样将数据库B中“表1”的数据插入到数据库A“表1”中呢? 
小弟在线急等,请高手帮忙,不胜感激!因为程序是针对客户的,所以恳求高手能给段代码,不希望用手动操作数据库。谢谢

解决方案 »

  1.   

    Private Sub Command1_Click()
        Dim cn As ADODB.Connection    Set cn = New ADODB.Connection    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\b.mdb;Jet OLEDB:Database Password=b"
        cn.Execute "Select * Into [tbla] From [;database=" & App.Path & "\a.mdb;pwd=a].tbla"    cn.Close
        Set cn = NothingEnd Sub
      

  2.   

    http://www.winu.cn/space-14160-do-blog-id-1196.html看看里面的内容