可以先建立一个ACCESS临时表,然后导出为DBF文件

解决方案 »

  1.   

    在 Form 上放置一个 CommandButton,加入 Microsoft DAO 3.51 Object Library,使用mdb库中的临时表Temp,在 Command1_Click 中加入以下程序代码:Dim db As Database
    dim strSql as string
    Set db = Workspaces(0).OpenDatabase(App.Path & "\Sample.mdb")strSQL="SELECT * INTO [dBase III;DATABASE=MDB文件路径].[dbase文件名称] FROM [temp]
    db.Execute strSQL
    注意:
    Temp.DBF 事先不可存在,否则会产生错误!
      

  2.   

    VB 源码 DBASE IV DBF 数据库引擎:1:支持多种数据类型(Byte Array, Long String 甚至 IPicture 的数据库直接存储)
    2:支持 Filter, 任意类似 SQL 语句查询。
    3:无须任何其他 DLL 支持。
    4:Binary 仅 64k 以内,Source 128k 以内。http://www.banasoft.com/DownLoad/BNxBase.exe