netBook_tool.htm-PHP教程,PHP应用

<p>本工具用于解决部分环境不能操作系统对话框的问题</p>
<span>
来源<input type=file name=sfile>
<input type=button value=导入 onclick="splitdata()">
</span>

<script>
var dbpath = location.href.replace(/file:[/]+([a-z]:.*[/])([^/]+)/,"$1");

function connect(db_name) {
    var dbc = new activexobject("adodb.connection");
    var dbcon = "provider=microsoft.jet.oledb.4.0;data source=" +db_name;
    dbc.open(dbcon);
    return dbc;
}

function query(sql) {
    var conn = connect(dbpath+"netbook.mdb"); // 连接数据库
    conn.execute(sql);
    conn.close();
}

function splitdata() {
    name = document.all.sfile.value;
    movedata(name,dbpath+"netbook.mdb","");
    query("update data set cote=0 where cote not in (select id from itemlist)");
}

function addslashes(s) {
    return s.replace(//g,"");
}

// 复制db1的数据到db2
function movedata(db1,db2,exrp) {
    if(! exrp) exrp = "";
    conn1 = connect(db1);
    conn2 = connect(db2);
    rs = conn1.execute("select * from data "+exrp);
    while(!rs.eof) {
        conn2.execute("insert into data values ("+rs("id").value
         +","+rs("cote").value
         +","+rs("author").value+""
         +","+addslashes(rs("title").value)+""
         +","+addslashes(rs("content").value)+""
         +","+rs("type").value+""
         +","+rs("soruce").value+""
         +")");
        rs.movenext();
    }
    rs.close();
    conn1.close();
    conn2.close();
}
</script>