ACCESS数据库向MySQL快速迁移小程序(二)


答案：<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表格，如不能建立，给出一步一步用户建立表格的向导功能；检测源表和目的表格数据类型的差异...等等，不过，我的数据迁移任务已完成，编这样的程序失去了一半的原动力，各位要是给我一点鼓励的话，我也许会做出一个更加完美的程序来，精神上的鼓励也行，当然物质上的就更佳了（喂！不是西红柿和香蕉皮）。