Dim conn As Connection
  Set conn = New Connection
  conn.Open "Provider=MSDASQL.1;Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=c:\实验.dbf
 
  
  conn.Execute "select * into [c:\TEST.mdb].[test] from " 实验.DBF"

解决方案 »

  1.   

    偶沒有測試過dbf,最保險還是循環加,我看看有沒有關於dbf的資料
      

  2.   

    dbf是FOXPRO,都是微软的,应该可以的.
    你可以把DBF的结果取出来,然后写程序保存到MDB中啊
    比如
     rec = select * from dbf数据库
     然后最这个结果集进行操作
      do while not rec.eof
         这里打开mdb
         '用insert 操作啊.一条一条的写到数据库中 
        rec.movenext
      loop
      以上是我的思路,应该可以解决的吧
      

  3.   

    try:  Dim conn As New ADODB.Connection
      conn.Open "Provider=MSDASQL.1;Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=c:\"
       conn.Execute ("select * into test in TEST.mdb from 实验.DBF")
      

  4.   

    northwolves(野性的呼唤) conn.Execute ("select * into test in TEST.mdb from 实验.DBF")这样不可以啊!
      

  5.   

    就是 ryuginka(ryuginka) 兄说的方法比较保守,同时也比较安全的 !
      

  6.   

    用两个连接,一个边DBF,一个连MDB,一个记录集返回DBF中的所有数据,用一个循环一条一条加到MDB中去.莫依MM可是个热心人哟!
      

  7.   

    Dim conn As New ADODB.Connection
    conn.Open "Provider=MSDASQL.1;Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=c:\"
    conn.Execute ("select * into [......].test from 实验")文件"实验.dbf"的表名是"实验",而不是"实验.dbf",所以在Select语句中应该使用"实验"而不是"实验.dbf"
    然后[......]中的内容记不清了,自己去查一查吧!