本文章分享一篇關于DBM數據導入到mysql數據庫方法，有需要的同學可以參考一下本實例。
首先說明一下，我以前使用PERL，保存文件 用DBM，有5萬多條記錄，每條記錄有15個字段。現在想用MYSQL，要吧記錄導過來。
第一步，將所有的DBM記錄導入到了一個文本文件，每個字段之間用TAB分開(就是"t"),每條記錄換行結束。
第二部，將數據讀入數組，并且打開數據庫和定義預處理如下：
代碼如下
復制代碼
$dbline=file("g:/allrecord.txt"); //將數據庫記錄讀入到數組
$collen=array(8,50,80,20,20,30,3,20,1,1,20,35,35,35,2); #表里面每個字段的長度數值
$db=new i('localhost','me','mypass','allrecdb');
if(mysqli_connect_errno()) {
echo "Can not connect db!";
exit;
}
$q->query("SET names 'gb2312'");
$q="INSERT INTO customers VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)";
$s=$db->prepare($q); #預定義插入記錄
//
數據庫有15個字段，為了方便導入，已經設定全部類型為CHAR，長度從1到100不等,具體等同$collen的數值;
并且沒有任何字段設置UNIQUE或者PRIMARY KEY；
在命令行用INSERT命令插入記錄成功
//
代碼如下
復制代碼
foreach($dbline as $line) {
$rec=("t",trim($line));
//這里反復測試過，$rec數組有15個值，并且我都把它strval了
// for($j=0;$j
$rec[$j]=substr($rec[$j],0,$collen[$j]);
}
for($i=0;$i
$rec[$i]=strval($rec[$i]);
}
$s->bind_param("sssssssssssssss",$rec[0],$rec[1],$rec[2],$rec[3],$rec[4],$rec[5],$rec[6],$rec[7],$rec[8],$rec[9],$rec[10],$rec[11],$rec[12],$rec[13],$rec[14]);
$s->execute();
}
$s->close();
$db->close();
?>
經過幾個小時的調試，發現任何字串超過字段長度就不能添加，所以做了如下處理。
1) 先把每個記錄的每個字段的長度進行了處理，代碼如下：
代碼如下
復制代碼
for($j=0;$j
$rec[$j]=substr($rec[$j],0,$collen[$j]);
}
2)再處理插入
代碼如下
復制代碼
$s->bind_param("sssssssssssssss",$rec[0],$rec[1],$rec[2],$rec[3],$rec[4],$rec[5],$rec[6],$rec[7],$rec[8],$rec[9],$rec[10],$rec[11],$rec[12],$rec[13],$rec[14]);
$s->execute();
這樣就可以插入記錄了。
目前剩下的問題是，任何帶有漢字的記錄，都不能插入(在命令行可以)。
查了資料，在命令行alter database crm character set 'gb2312',在腳本查詢前加入$db->query("SET names 'gb2312'")
都沒用。
也沒找到my.ini去改default-character-set=gb2312
難道php5.5暫時不支持中文？
MYSQL太多稀奇古怪的提示，解決不了問題，所有裝上了SQLITE，在命令行導入文本記錄，發現了問題：
1)某些字段中存在換行符，但是在任何文本編譯器中不換行或者不顯示。這樣會在導入的時候，1行變成2行，列參數自然不對了。
解決方案： 用str_replace($line,char(13));把每行內的換行符替換掉，然后把所有記錄存入tmp.txt
2)再進行命令行的導入
代碼如下
復制代碼
sqlite3>.import tmp.txt customers
sqlite3> count(*) from cusomers;
57491
顯示導入成功。
可見，批量導入的時候，一定要處理好那些隱藏的特殊字符。
由于時間關系，沒有測試MYSQL的情況。晚上有空再確認一下同樣方案是否可行。
本文原創發布php中文網，轉載請注明出處，感謝您的尊重！
