动易数据转成dedecms的php程序

　　<?php

　　//读取mdb数据库例程

　　set_time_limit(0);

　　$conn = new com("ADODB.Connection");

　　$connstr = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=". realpath("E:\web2\qq.mdb");

　　$conn->Open($connstr);

　　$rs = new com("ADODB.RecordSet");

　　$rs->Open("select * from PE_Article Where ArticleID>0 orDER BY ArticleID ASC",$conn,1,1);

　　$conn2 = mysql_connect("localhost","root","");

　　mysql_select_db("dede",$conn2);

　　mysql_query("SET NAMES GBK",$conn2);

　　$i=0;

　　while(! $rs->eof) {

　　$id = $rs->Fields('ArticleID')->value;

　　$title = addslashes($rs->Fields('Title')->value);

　　$classid = $rs->Fields('ClassID')->value;

　　$keywordstr = $rs->Fields('Keyword')->value;

　　$keywordstr = str_replace("|"," ",$keywordstr);

　　$keyword = trim($keywordstr);

　　$datestr = $rs->Fields('UpdateTime')->value;

　　$datearr = explode("-",$datestr);

　　$yy = $datearr[0] ;

　　$mm = $datearr[1] ;

　　$dd = rand(1,28);

　　$time=mktime(0,0,0,$mm,$dd,$yy);

　　$content =addslashes($rs->Fields('Content')->value);

　　$content = str_replace('[InstallDir_ChannelDir]{$UploadDir}','/UploadFiles',$content);

　　//$uploadfile = $rs->Fields('UploadFiles')->value;

　　$sql0 = "select ID from dede_archives where ID='$id'";

　　$rs0 = mysql_query($sql0,$conn2);

　　$row = mysql_fetch_array($rs0);

　　if(intval($row['ID'])==0){

　　$sql1 = "insert into dede_archives (ID,typeid,channel,title,sortrank,pubdate,senddate,adminID,keywords) values ('$id','$classid',1,'$title','$time','$time','$time',1,'$keyword')";

　　$rs1 = mysql_query($sql1,$conn2);

　　if(!$rs1){

　　echo $sql1;

　　echo "<br>";

　　echo mysql_error();

　　echo "<br>";

　　//exit;

　　}

　　$id2 = mysql_insert_id();

　　if($id2>0){

　　$sql2 = "insert into dede_addonarticle (aid ,typeid, body ) values('$id','$classid','$content');";

　　$rs2 = mysql_query($sql2,$conn2);

　　if(!$rs2){

　　echo $sql2;

　　echo "<br>";

　　echo mysql_error();

　　echo "<br>";

　　//exit;

　　}

　　}

　　}

　　$rs->MoveNext();

　　$i++;

　　if($i%50==0)sleep(5);

　　}

　　echo "完成";

　　?>