【聚杰网数据库编程】在PB中使用FoxPro数据库的方法
本人以前曾开发过基于FoxPro环境下的数据库系统，但FoxPro的编程太麻烦，不但要处理数据的管理，而且还要花大量的精力处理输入、输出的格式等。但有着可视化编程环境的Power Builder却不同，处理输入、输出是件相当简单的事情，于是，本人偿试用Power Builder来管理以前的数据库。 c在Power Builder系统中，使用FoxPro的数据库有两种方法：一是利用ODBC联接FoxPro数据库；另一种方法是将FoxPro的数据库转换到SQL Anywhere的数据格式。
一、 利用ODBC联接FoxPro数据库
在Power Builder中，直接访问FoxPro数据库只能通过ODBC方式。
在开发环境下，可以直接在PowerBar画板上配置ODBC，联接FoxPro数据库，方法如下：
- 单击Configure ODBC工具钮
- 在Installed Drivers目录框中选择：Microsoft Foxpro Driver (*.dbf)
- 单击“Create”按钮
- 命名数据源名、选择版本
- 取消“使用当前工作目录”选项
- 单击选定目录，选择被联接数据库所在的目录
- 确定退出
通过ODBC方式联接的FoxPro的数据库，一定要满足FoxPro的数据库格式，即数据库文件结构必须是：“32字节文件描述 若干个32字节的字段描述 结构描述结束符（0D） 记录1，记录2，…… 文件结束符（1A）”。由此看来，传统的DBF数据库文件均可通过该方式联接。对于Visual FoxPro环境下建立的表（Table），其结构与传统的数据库结构是不同的，它在字段描述结束符（0D）与记录之间加上了二百多个字节的内容，但在未纳入VFP的数据库（Dbc）之前，其内容为“00”，此时仍可以通过这种方式联接，一旦纳入数据库中，该段字节已被填上了其它内容，无法再联接。
在Power Builder应用程序中，使用事务处理对象来联接数据库，这种事务处理对象，即有默认的SQLCA，用户也可以自己生成，以方便访问多个数据库。在程序中使用事务处理对象时，一般必? 指明DBMS、DbParm两个属性，对于FoxPro数据库，还必须指明 Database、 userid、servername、几个属性，这一点是与访问其他类型的数据库不同的地方。
sqlca.dbms="ODBC" // 指定联接方式ODBCsqlca.database="D:/prg/pubdata" // 指定被联接数据库所在目录sqlca.userid="public" // 用户识别号，都为 publicsqlca.servername="FOXPRO" // 服务器名：均为FOXPROsqlca.dbparm="Connectstring=DSN=tscxs" //数据源名connect using sqlca; // 实施联接……
通过对FoxPro数据库的联接，用户便可以在Power Builder开发环境下、应用程序中使用这些数据库，快速地开发出自己的信息管理系统，实现对这些数据库的维护与管理。
二、 将DBF文件转换为SQL Anywhere 的DB文件格式
在Power Builder环境下，附带有一个数据库系统——SQL Anywhere，在Power Builder中利用它，用户可以直接建立、维护数据库。在SQL Anywhere中，数据库结构虽然与VFP不同，但概念是一致的，即：数据库是系统中相关的各种数据，这些数据又因不同用途组织成不同的表，这些表共同构成数据库，与传统的数据库（DBF）相类比，PB、VFP中的表即是传统意义的数据库，PB、VFP中的数据库类似于传统的数据库（DBF）文件所在的目录。SQL Anywhere中提供了将传统的DBF文件转换为该系统下的数据库文件（DB）中的表的工具。为了实现这一转换，用户必须先建立一个新的表，再将DBF格式的文件内容导入该表中。
对于DBF文件，必须是传统意义上的数据库，如FoxPro、dBase、FoxBASE环境下的数据库文件。该种数据库文件严格遵循“数据文件==数据库结构+数据库记录”这一格式。其结构如下：“32字节文件描述 若干个32字节的字段描述 结构描述结束符（0D） 记录1，记录2，…… 文件结束符（1A）”
03 62 0A 07 02 00 00 00 - 81 00 4C 00 00 00 00 00 // 文件描述：时间、长00 00 00 00 00 00 00 00 - 00 00 00 00 00 00 00 00 度、记录长、记录数4E 41 4D 45 00 00 00 00 - 00 00 00 43 01 00 00 00 // 第一个字段：名、类28 00 00 00 00 00 00 00 - 00 00 00 00 00 00 00 00 型、长、起始位41 55 54 48 4F 52 00 00 - 00 00 00 43 29 00 00 00 // 第二个字段 0F 00 00 00 00 00 00 00 - 00 00 00 00 00 00 00 00 ……0D 20 50 6F 77 65 72 42 - 75 69 6C 64 65 72 20 50 // 结构结束符（0D）、72 6F 67 72 61 6D 6D 69 - 6E 67 20 20 20 20 20 20 记录120 20 20 20 20 20 20 20 - 20 20 4A 6F 68 6E 20 53 ……6D 69 74 68 20 20 20 20 - 20 1A// 文件结束符（1A）
将DBF文件直接转换为PB（SQL Anywhere）中的表，操作步骤如下：
- 在PB 中建立新表
- 打开新建的表
- 单击数据库画板中的“数据操作(Data manipulation)”按钮
- 选择菜单：Rows ? Import
- 从“文件类型”下拉框中选择dbaseII & III(*.dbf)
- 选择被导入文件所在的目录及文件名
- 单击“打开”按钮
- 系统将打开指定的文件，将该文件中的所有记录导入新建的表中。
- 按上面所列的步骤导入数据库（DBF）文件中的数据
- 选择菜单：File ? Save Row As …
- 在“存为类型”列表框中选择：SQL
- 选择保存路径，输入保存文件名，单击保存
- 关闭“Data manipulation”窗口，回到数据库画板
- 单击“DB Administration”（数据库管理器）
- 选择菜单：File ? Open
- 确信文件类型为：SQL (*.sql)
- 选择第4步中所保存的文件，单击“打开”按钮
- 删除文件起始部分的第一条SQL语句：CREATE TABLE
- 单击“Execute”（执行）按钮，系统将把原数据库中的所有行插入到新表中。
- 新表中的字段数必须等于或大于原DBF文件中的字段数
- 新表中的字段顺序要与原文件中的字段顺序一样，即使新表中字段数更多，但新的字段必须放在最后
- 新表与旧文件中字段名可以不一样
- 新表中的数据类型必须与旧表中的数据类型兼容：字符 ? 字符， 数值 ? 数字，数字 ? 字符……
- 数据格式相一致，如两个文件中的日期格式必须一致
- 新表中字段长度必须能容纳旧数据库文件中的对应字段中的数据，如：旧数据库某一字段宽度为C20，但库中所有记录在该字段的实际最长为14，那么，新表中的字段宽度至少应为C14
以上两种办法均可实现在Power Builder下访问FoxPro数据库，但两种方法之间有些不同之处：
- 从系统需求来看：第一种方式使用ODBC直接访问DBF文件，只要Power Builder基本系统即可，不需要安装数据库管理系统（DBMS）；而第二种方式必须安装SQL Anywhere系统。
- 从运行效率来看：第一种方式速度要慢一些，后一种方式稍快。笔者在应用程序中比较了两种方式在速度上的差异：将FoxPro系统中的一个有15000余条记录的数据库，用第一种方式联接、在数据窗口控制中显示（Retieve）记录，需要6秒钟左右，后来又用第二种方式：在SQL Anywhere 中新建一个表，将这15000条记录导入表中，联接、显示记录，需要时间为3-4秒。对另一个拥有19万余条记录的FoxPro数据库直接使用ODBC，联接、显示的时间为85秒钟。
