在PB中使用FoxPro数据库的方法

一、 利用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" // 指定联接方式ODBC

sqlca.database="D:\prg\pubdata" // 指定被联接数据库所在目录

sqlca.userid="public" // 用户识别号，都为 public

sqlca.servername="FOXPRO" // 服务器名：均为FOXPRO

sqlca.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 记录1

20 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)

选择被导入文件所在的目录及文件名

单击“打开”按钮

系统将打开指定的文件，将该文件中的所有记录导入新建的表中。 

但系统不提供直接将导入数据保存在本数据库（表）中。如果要将导入的记录保存为SQL Anywhere 环境下的数据库（表）中，可以先将导入数据行以SQL格式保存在 .sql 类型文件中，在利用SQL语句将这些数据行插入新表中。步骤如下：

按上面所列的步骤导入数据库（DBF）文件中的数据

选择菜单：File ? Save Row As …

在“存为类型”列表框中选择：SQL

选择保存路径，输入保存文件名，单击保存

关闭“Data manipulation”窗口，回到数据库画板

单击“DB Administration”（数据库管理器）

选择菜单：File ? Open

确信文件类型为：SQL (*.sql)

选择第4步中所保存的文件，单击“打开”按钮

删除文件起始部分的第一条SQL语句：CREATE TABLE

单击“Execute”（执行）按钮，系统将把原数据库中的所有行插入到新表中。

需要注意的是，新建的表在字段设置上必须与原DBF文件中的字段保持一致，即：新表中的字段数必须等于或大于原DBF文件中的字段数

新表中的字段顺序要与原文件中的字段顺序一样，即使新表中字段数更多，但新的字段必须放在最后

新表与旧文件中字段名可以不一样

新表中的数据类型必须与旧表中的数据类型兼容：字符 ? 字符， 数值 ? 数字，数字 ? 字符……

数据格式相一致，如两个文件中的日期格式必须一致

新表中字段长度必须能容纳旧数据库文件中的对应字段中的数据，如：旧数据库某一字段宽度为C20，但库中所有记录在该字段的实际最长为14，那么，新表中的字段宽度至少应为C14 。

如果你愿意，也可以将原FoxPro中的数据库先转换到TXT格式文件，再将TXT格式的文件导入SQL Anywhere数据库（表）中，不过TXT文件中一条记录独占一行，各字段间必须用Tab键（符）隔开，其导入方法与DBF文件中数据的导入方法类似。

以上两种办法均可实现在Power Builder下访问FoxPro数据库，但两种方法之间有些不同之处：

从系统需求来看：第一种方式使用ODBC直接访问DBF文件，只要Power Builder基本系统即可，不需要安装数据库管理系统（DBMS）；而第二种方式必须安装SQL Anywhere系统。

从运行效率来看：第一种方式速度要慢一些，后一种方式稍快。笔者在应用程序中比较了两种方式在速度上的差异：将FoxPro系统中的一个有15000余条记录的数据库，用第一种方式联接、在数据窗口控制中显示（Retieve）记录，需要6秒钟左右，后来又用第二种方式：在SQL Anywhere 中新建一个表，将这15000条记录导入表中，联接、显示记录，需要时间为3-4秒。对另一个拥有19万余条记录的FoxPro数据库直接使用ODBC，联接、显示的时间为85秒钟。

使用Power Builder 的主要优势体现在建立客户/服务器模式的系统上。对于一般的单机系统、规模较小的系统，可能大多数人不会想到它。但如果你觉得FoxPro太老土，Visual FoxPro又太难学的的话，不妨试试Power Builder。

查看本文来源