mycn.Open
          strsql = "insert into ykt in " & App.path & "\db\yktdb.mdb select * from 营业流水账表"
          'strsql = "select * into ykt in " & App.path & "\db\yktdb.mdb from 营业流水账表"
          mycmd.ActiveConnection = mycn
          mycmd.CommandText = strsql
          mycn.Execute strsql
          mycn.Close
mycn是一个打开的数据库连接,yktdb也是一个打开的数据库其中ykt是yktdb中的一个空表,这两个数据库在一个目录下,我想把其中一个数据库的营业流水账表数据全部追加插入到ykt表中,为什么编译报错说insert into 语法错误,不是可以用insert into biao in 外部数据库 select field from table这个语句吗?我在ACCESS中用了in...语句进去也报错?高手指点??

解决方案 »

  1.   

    strsql = "insert into ykt in '" & App.Path & "\db\yktdb.mdb' select * from 营业流水账表"
      

  2.   

    \不同的数据库不能用insert吧\可以的
      

  3.   

    tztz520(午夜逛街)
    十分感谢!怎么好多书上不把这个符号写出来?
      

  4.   

    ykt 是不是什么一卡通的数据库,我似曾相识哪个公司用这样的名子
      

  5.   

    可以!
    Dim cnn As New ADODB.Connection
    Set cnn = New ADODB.Connection
    cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=KuOne.mdb;Persist Security Info=False"
    Dim SQL1 As String
    SQL1 = " insert into TableOne select * from TableTwo in KuTwo.mdb"
    cnn.Open
    cnn.Execute SQL1
    cnn.Close
    说明:TableOne 表结构要和TableTwo结构相同或比TableTwo包含更多的列!