<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.

[1] [2] 下一页

在google里搜索更多netBook_tool.htm

	Web www.51ec.org

上一篇信息学院： 一段很小但很实用的CSS打印类(附例子及效果图)

下一篇信息学院： 计算工作日（jessie看）