access|mysql|程式|資料|資料庫 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
以下為 import.php 來源程式
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<html>
<head>
<style type=text/css>
body,td,li,div,p,pre,a,b,h1,h2,h3,h4 {font-family:verdana;font-size:9pt;line-height : 18px;color:#a00000 }
</style>
</head>
<body bgcolor=#f0f0f0 topmargin=0 leftmargin=0 text=#a00000>
<center>
<br>
<div style="font-size:24pt;font-family:times;font-weight:bold;color:#008000">ODBC --> MySQL Migrant</div>
<hr size=1 color=#900000>
<?
$dbconnection = @mysql_connect("yourmysqlserver", "mysqlaccount", "mysqlpassword")
or die ("can not connect to database server");
@mysql_select_db("yourdatabase")
or die("<p style='font-size:9pt;font-family:verdana;color:#803333;font-weight:bold'>No Database,</p>") ;
$conn = odbc_connect("task", "", "");
$fp = fopen ("fdlist.txt","r") ;
$table1 = fgets($fp,200);
$fd1 = fgets($fp,1024) ;
$table2 = fgets($fp,200);
$fd2 = fgets($fp,1024) ;
$query1 = "select " . $fd1 . " from " . $table1 ;
$query2 = "select " . $fd2 . " from " . $table2 . " where 1=2 " ;
$result = mysql_query ($query2) ;
mysql_query ("delete from " .$table2 ) ;
echo "sql=". $query1;
$recordsid = odbc_exec($conn, $query1);
$idcounts = odbc_num_fields( $recordsid ) ;
$idcount2 = mysql_num_fields($result) ;
if ( $idcounts != $idcount2 )
die (" The fields of two tables doesn't match ") ;
echo "<table width=90% border=1 bordercolorlight=#000000 bordercolordark=#ffffff cellpadding=3 cellspacing=0>n" ;
echo "<tr align=center><td> n " ;
for ( $i = 1 ; $i <= $idcounts ; $i ++)
echo "n<td>" . odbc_field_name($recordsid,$i) ;
$theno = 1 ;
echo "<tr>n" ;
while (odbc_fetch_row($recordsid) ) {
$runsql = "insert into " . $table2 . "(" . $fd2 . ") values (" ;
for ( $i = 1 ; $i <= $idcounts ; $i ++) {
$fdv = odbc_result($recordsid,$i) ;
if ( mysql_field_type($result,$i-1) == "string")
$runsql .= "'". $fdv . "'," ;
else
$runsql .= $fdv. "," ;
}
$runsql = substr($runsql,0,strlen($runsql)-1) ;
$runsql .= ")" ;
mysql_query ($runsql) ;
$theno++ ;
}
echo "Total Convert : " . $theno -- ;
odbc_close($conn);
?>
</body>
</html>
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
有經驗的網友可能看了兩個小程式，可能覺得如在ACCESS資料庫
中各表的欄位是英文的話，fdlist.php有點多餘，其實在這裡，我的
本意是在遷移時，可以很方便地刪除某些不用的欄位，只要將fdlist.php的組建檔案fdlist.txt中對應的欄位Delete掉即可。還算是很方便的，反正，有了這兩個小程式，我以前放在ACCESS中的幾十個表格的資料，二十分鐘全部遷移完畢，包括對其中四、五個表格欄位的修改。
當然，雖然兩個程式達到了我預定的功能，但要將其擴充為所有人可用其將ODBC資料庫遷移至MySQL資料庫，且使用更加方便一些，還有一些方面可以改進，如根據ODBC表格的結構自動建立MySQL表格，如不能建立，給出一步一步使用者建立表格的嚮導功能；檢測源表和目的表格式資料類型的差異...等等，不過，我的資料移轉任務已完成，編這樣的程式失去了一半的原動力，各位要是給我一點鼓勵的話，我也許會做出一個更加完美的程式來，精神上的鼓勵也行，當然物質上的就更佳了（喂！不是西紅柿和香蕉皮）。
