我想把一个Access库中的一个表复制到另一个Access库中,被复制到的库可以是建好相同结构的表,也可以是没有相同结构表两种方法都可以!大家帮帮忙!千万不要用循环.field(0)=.field(0)啊,这样数据一多就太慢了!拜托了!!!各位!!!

解决方案 »

  1.   

    Dim cn As ADODB.Connection
    Dim Sql As String
    Set cn = New ADODB.Connection
    cn.Open "连接数据库A的字符串"1.如果数据库B中表已经存在
    sql = "INSERT INTO [C:\B.mdb].[TableName] SELECT * FROM [TableName]"
    cn.Execute Sql
    2.如果数据库B中表不存在
    Sql = "SELECT * INTO [C:\B.mdb].[TableName] FROM [TableName]"
    cn.Execute Sql
      

  2.   

    不行啊,出错啊,不可识别数据库,怎么回事啊!
    insert into [d:\ratio.mdb].[ratio] select * from [ratio]
    这样句SQL语句没错吧!!!数据库和表都是存在的啊!
      

  3.   

    晕哦!insert into [d:\ratio.mdb].ratio select * from ratio