用数据控件就可以啊。
一个绑定到服务器的数据库,一个绑定到e:\d.dbf,在两个数据控件之间交换数据就行了。

解决方案 »

  1.   

    你可以用SQLDMO.BulkCopy对象来实现表的备份功能。
      

  2.   

    谢谢everyask(everyask),问题是d.dbf这个文件不存在,只有导出成功后才存在。
      

  3.   

    好象直接用SQL语句不可以你可以作一个存储过程,然后调用看看可不可以吧。
      

  4.   

    补充一下,我是想获得SQL SERVER 本身提供的导出功能那样的速度,若程序仅仅是通过将记录读出来然后进行循环添加的方法,那在此就免了吧!我的旧程序就是这样处理的! 
       不知有谁使用过SQL中的BCP功能没有,我觉得用此法可能能够解决,可惜我怎么也没调通过。
      

  5.   

    我现在有一个dbase IV的dbf文件,如何用程序转换成mdb文件?    最好使用ADO+SQL语句来完成    如何?
          欢迎大家回答!!! '以 Borland 所提供的 animals.dbf 与一任意 Access 为例
    Dim adoConnection As New ADODB.Connection
    'Set adoConnection = Server.CreateObject("ADODB.Connection")
    adoConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db4.mdb;Persist Security Info=False"
    adoConnection.Execute "SELECT * INTO CopyOfAnimals FROM [dBASE IV;DATABASE=d:\dbfs\].[animals.dbf]"
    'adoConnection.Execute "SELECT * INTO CopyOfAnimals FROM animals IN ''[dBASE IV;DATABASE=d:\dbfs\]"
    adoConnection.Execute "INSERT INTO CopyOfAnimals SELECT * FROM animals IN ''[dBASE IV;DATABASE=d:\dbfs\]"
    'adoConnection.Execute "INSERT INTO CopyOfAnimals SELECT * FROM [dBASE IV;DATABASE=d:\dbfs\].[animals.dbf]"
      

  6.   

    另一个方法Dim cns As ADODB.Connection
        Dim rss As ADODB.Recordset
        Dim cnd As ADODB.Connection
        Dim rsd As ADODB.Recordset
        
        Set cns = New ADODB.Connection
        cns.Open "Provider=MSDASQL.1;Persist Security Info=False;Data Source=dBASE Files;Initial Catalog=D:\"
        Set rss = New ADODB.Recordset
        rss.Open "SELECT * FROM A.DBF", cns
        
        Set cnd = New ADODB.Connection
        cnd.Open "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=D:\A.mdb"
        
        Do While Not rss.EOF
            cnd.Execute "INSERT INTO TA VALUES(" & rss.Fields("FA") & ")"
            rss.MoveNext
        Loop
        
        rss.Close
        Set rss = Nothing
        cns.Close
        Set cns = Nothing
        cnd.Close
        Set cnd = Nothing 
      

  7.   

    建立ADO两个连接,一个在SQL上 一个在DBF上,然后通过Recordset倒
      

  8.   

    to shawls(小山):
       谢谢你!
    adoConnection.Execute "INSERT INTO CopyOfAnimals SELECT * FROM animals IN ''[dBASE IV;DATABASE=d:\dbfs\]"
    报出的错误:[Microsoft][ODBC SQL ServerDirver][SQL Server]Incorrect syntax near the keyword 'IN'adoConnection.Execute "SELECT * INTO aTest FROM [dBASE IV;DATABASE=e:\].[busid.dbf]"
    报出的错误:
    [Microsoft][ODBC SQL ServerDirver][SQL Server]Invalid object name 'dBASE IV;DATABASE=e:\.busid.dbf'
       其中busid.dbf是刚刚通过工具导出的DBF文件。
      

  9.   

    先建立一个dbf表。建法和mdb差不多。
      

  10.   

    to lanren_me(阿波):问题是busid.dbf这个文件一直是存在的。
      

  11.   

    欢迎大家使用www.go2map.com中的公交换乘功能!新的程序将在新版中推出,