ACCESS資料庫向MySQL快速遷移小程式(二)

來源:互聯網
上載者:User
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表格,如不能建立,給出一步一步使用者建立表格的嚮導功能;檢測源表和目的表格式資料類型的差異...等等,不過,我的資料移轉任務已完成,編這樣的程式失去了一半的原動力,各位要是給我一點鼓勵的話,我也許會做出一個更加完美的程式來,精神上的鼓勵也行,當然物質上的就更佳了(喂!不是西紅柿和香蕉皮)。       

相關文章

Beyond APAC's No.1 Cloud

19.6% IaaS Market Share in Asia Pacific - Gartner IT Service report, 2018

Learn more >

Apsara Conference 2019

The Rise of Data Intelligence, September 25th - 27th, Hangzhou, China

Learn more >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。