Foxpro到MySQL的数据转换技术介绍

　　传统的 C/S 模式的编程环境下，Visual Foxpro 曾经是风靡一时的数据库类型，然而，在轻型的数据库级别里，MySQL 具有远比 VFP 要好得多的特性，最大的好处当然是跨平台特性。在本文介绍的这个应用里（这是一个实际的例子），我们把在 VFP 环境下频繁更新的数据，通过 PHP 的 ADODB 接口同步到 MySQL 数据库，并在入库之前，对其中的文本的关键字打上标记，使之关联到对应的连接。

　　下面列出程序片段。

　　conv.php
　　$ADODB_PATH="C:/Apache/PHP/PEAR/ADODB"；
　　include（"$ADODB_PATH/adodb.inc.php"）； // ADODB 的类
　　include（"$ADODB_PATH/db_mysql.php"）； // 采用了 VBB 中的类
　　$conn = &ADONewConnection（'vfp'）； // 指定 ADODB 的连接类型为 VFP。
　　$conn-＞PConnect（'gn','sa',''）； // gn 是建立在本机上的ODBC 系统 DSN 名字。
　　function parse_keyword （ $oldmem ） {
　　$ADODB_CACHE_DIR = 'c:/temp'； // Cache 的目录
　　$ADODB_FETCH_MODE = ADODB_FETCH_NUM；
　　$mysql_conn = &ADONewConnection（'mysql'）； // 指定 ADODB 的连接类型为 mysql
　　$mysql_conn-＞PConnect（'localhost','username','password','db_name'）；
　　$sql = "select keyword,url from KEYWORD "；
　　$rs = $mysql_conn-＞CacheExecute（1500,$sql）；
　　// 对 KEYWORD 的查找采用 1500 秒的缓冲。
　　if （!$rs） print $mysql_conn-＞ErrorMsg（）；
　　$all_col=$rs-＞GetArray（）；
　　$rs-＞Close（）；
　　$keyword= array（）；
　　$url = array（）；
　　for （ $i = 0； $i< count（$all_col）； $i++ ） {
　　$keyword[$i] = $all_col[$i][0]；
　　$url[$i] = $all_col[$i][1]；
　　}
　　$newmem=str_replace（$keyword,$url,$oldmem）；
　　// 这是本函数里最大的功能，数组替换文本。
　　// 一个语句解决一段文本里所有关键字的替换。
　　$mysql_conn-＞Disconnect（）；
　　$mysql_conn-＞Close（）；
　　return $newmem；
　　}
　　$DB_Site = new DB_Sql；
　　$DB_Site-＞connect（）；
　　echo "Processing Table ...n"；
　　$sql = " SELECT max（seq） as seq FROM mysql_table WHERE type=0200"；
　　$seqinfo = $DB_Site-＞query_first（$sql）；
　　$seq = $seqinfo[seq]；// 取出目标数据库中最大的 seq 值。
　　$sql = " SELECT seq,type,body FROM vfp_table WHERE seq ＞ ".$seq."" " ；
　　//取出源数据库中最新的记录。
　　$rs = $conn-＞Execute（$sql）；
　　if （ $rs-＞EOF ） echo "Table had No new record, Max seq is [$seq].n"；
　　while （!$rs-＞EOF） {
　　$sql = " INSERT INTO mysql_table VALUES （$rs-＞fields[seq],$rs-＞
　　fields[type],".parse_keyword（$rs-＞fields[body]）."'）"；
　　$DB_Site-＞query（$sql）；
　　$rs-＞MoveNext（）；
　　}
　　$rs-＞Close（）；
　　$DB_Site-＞close（）；
　　$conn-＞Disconnect（）；
　　$conn-＞Close（'gn'）；
　　?＞