DBM數(shù)據(jù)導(dǎo)入到mysql數(shù)據(jù)庫(kù)方法

2024-07-24 12:39:09

字體：大中小

供稿：網(wǎng)友

首先說(shuō)明一下,我以前使用PERL,保存文件用DBM數(shù)據(jù)庫(kù),有5萬(wàn)多條記錄,每條記錄有15個(gè)字段,現(xiàn)在想用MYSQL,要把記錄導(dǎo)過(guò)來(lái).

第一步,將所有的DBM記錄導(dǎo)入到了一個(gè)文本文件,每個(gè)字段之間用TAB分開(就是"t"),每條記錄換行結(jié)束.

第二步,將數(shù)據(jù)讀入數(shù)組,并且打開數(shù)據(jù)庫(kù)和定義預(yù)處理,代碼如下:

<?php

$dbline=file("g:/allrecord.txt");  //將數(shù)據(jù)庫(kù)記錄讀入到數(shù)組

$collen=array(8,50,80,20,20,30,3,20,1,1,20,35,35,35,2); #表里面每個(gè)字段的長(zhǎng)度數(shù)值

$db=new mysqli('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); #預(yù)定義插入記錄

//

?>

數(shù)據(jù)庫(kù)有15個(gè)字段,為了方便導(dǎo)入,已經(jīng)設(shè)定全部類型為CHAR,長(zhǎng)度從1到100不等,具體等同$collen的數(shù)值;并且沒(méi)有任何字段設(shè)置UNIQUE或者PRIMARY KEY,在命令行用INSERT命令插入記錄成功,代碼如下:

<?php

foreach($dbline as $line) {

    $rec=explode("t",trim($line));

    //這里反復(fù)測(cè)試過(guò)，$rec數(shù)組有15個(gè)值，并且我都把它strval了

    //    for($j=0;$j<count($rec);$j++) {

        $rec[$j]=substr($rec[$j],0,$collen[$j]);

    }

    for($i=0;$i<count($rec);$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]);  //Vevb.com

     $s->execute();

}

$s->close();

$db->close();

?>

經(jīng)過(guò)幾個(gè)小時(shí)的調(diào)試,發(fā)現(xiàn)任何字串超過(guò)字段長(zhǎng)度就不能添加,所以做了如下處理.

1) 先把每個(gè)記錄的每個(gè)字段的長(zhǎng)度進(jìn)行了處理,代碼如下:

for($j=0;$j<count($rec);$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();