求助：如何将Clarion数据库.dat文件完整导出为CSV（非TPS文件）

我之前处理过类似的Clarion非TPS .dat文件导出需求，给你几个亲测可行的完整导出方案，解决工具仅能提取前50行的问题：

方案1：编写简易Clarion导出程序（最可靠） #

Clarion原生支持读写它的Legacy .dat格式（也就是你说的非TPS旧版数据库），这是最不会出错的方法。你需要找到对应软件开发时使用的Clarion版本（比如20年前的软件大概率用Clarion 5/6），然后写一段极简的导出代码：

PROGRAM
MAP
END

! 必须和原.dat文件的字段结构完全匹配（类型、长度、顺序）
Customer FILE,DRIVER('CLARION'),NAME('你的文件路径/xxx.dat'),PRE(Cust)
    CustID    LONG
    FullName  STRING(60)
    Phone     STRING(20)
    ! 这里添加所有字段，和原表一致
END

CSVExport FILE,DRIVER('ASCII'),NAME('导出结果.csv'),CREATE,WRITE
    LineContent STRING(2000)
END

CODE
    OPEN(Customer)
    OPEN(CSVExport)
    ! 先写入CSV表头
    CSVExport.LineContent = 'CustID,FullName,Phone' ! 替换为你的字段名
    WRITE(CSVExport)
    ! 遍历所有记录并写入CSV
    LOOP
      NEXT(Customer)
      IF ERRORCODE() THEN BREAK. ! 到文件末尾时退出循环
      ! 处理带特殊字符的字段（用双引号包裹，内部双引号转义为两个）
      CSVExport.LineContent = STRING(Cust.CustID) & ',' & 
                              '"' & REPLACE(Cust.FullName, '"', '""') & '"' & ',' & 
                              '"' & REPLACE(Cust.Phone, '"', '""') & '"'
      WRITE(CSVExport)
    END
    CLOSE(Customer)
    CLOSE(CSVExport)

关键提示：如果不知道原表的字段结构，用Clarion自带的Data Dictionary工具打开.dat文件就能查看完整的字段定义，这一步一定要准确，否则会读出错误数据。

方案2：使用支持Clarion Legacy .dat的桌面工具 #

避开那些仅支持TPS的工具，选择专门兼容Clarion旧版.dat的软件，这类工具通常没有行数限制：

• DBF Commander Pro：打开工具后，选择“文件”->“打开”，驱动选「Clarion (Legacy)」，加载你的.dat文件后，直接点击“导出”->“CSV”即可导出全表。
• Advanced Query Tool (AQT)：配置Clarion Legacy ODBC驱动后，连接到.dat文件，执行SELECT * FROM 表名，然后将结果导出为CSV。

方案3：通过ODBC驱动用Excel/Access批量导出 #

1. 安装对应版本的Clarion Legacy ODBC驱动（要和你的.dat文件版本匹配，旧版驱动可以找到兼容包）。
2. 打开Windows「ODBC数据源管理器」，添加新的用户数据源，选择Clarion Legacy驱动，指向你的.dat文件并配置表结构（驱动通常能自动识别）。
3. 打开Excel，点击「数据」->「从其他来源」->「从ODBC」，连接刚才创建的数据源，选择目标表，导入所有数据后，另存为CSV格式即可。

重要注意事项 #

• **先备份！**操作前一定要复制一份原.dat文件，避免导出过程中损坏数据。
• 旧版Clarion .dat可能用ANSI编码，导出后如果出现乱码，可以用Notepad++等工具转换为UTF-8。
• 如果遇到工具识别失败的情况，优先回到方案1，用Clarion原生程序导出，兼容性最好。

内容的提问来源于stack exchange，提问作者Donald Jansen