PS: this can be used in the opposite way. For example, asp document systems such as cloud and NB can be converted into dedecms or other php cms.
Copy codeThe Code is as follows:
<? Php
// Read mdb data library routine
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', 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 "complete ";
?>