传统的 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_key
word ( $oldmem ) {
$ADODB_CACHE_DIR = 'c:/temp'; // Cache 的目录
$ADODB_F
etcH_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');
?>
查看所有0条评论>>