87,910
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
cac_wh 2004-03-25
- 打赏
- 举报
多谢各位！
bibiye 2004-03-24
- 打赏
- 举报
初来咋到，见到两位老大好文，
ding！！！
ding！！！
wanghr100 2004-03-24
- 打赏
- 举报
<script>
/** 公用变量 **/
var db_name = "data.mdb"; // Access数据库名
/**
*作者：徐祖宁(唠叨)
* 函数: connect
* 功能: 连接 Access 数据库
* 返回连接
* 要求数据库文件在本文档一起
*/
function connect() {
var dbc = new ActiveXObject("ADODB.Connection");
var dbcon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+ location.href.replace(/file:[/]+([A-Z]:.*[/])([^/]+)/,"$1")+db_name;
dbc.Open(dbcon);
return dbc;
}
function gen() {
var conn = connect();
var rs = conn.Execute("select * from baobao where id=1");
var s = rs("name").value;
rs.Close();
conn.Close();
document.open("text/html", "replace");
document.write(s);
document.close();
}
</script>
<body onLoad="gen()">
正在初始化系统，请稍候...
</body>
</html>
/** 公用变量 **/
var db_name = "data.mdb"; // Access数据库名
/**
*作者：徐祖宁(唠叨)
* 函数: connect
* 功能: 连接 Access 数据库
* 返回连接
* 要求数据库文件在本文档一起
*/
function connect() {
var dbc = new ActiveXObject("ADODB.Connection");
var dbcon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+ location.href.replace(/file:[/]+([A-Z]:.*[/])([^/]+)/,"$1")+db_name;
dbc.Open(dbcon);
return dbc;
}
function gen() {
var conn = connect();
var rs = conn.Execute("select * from baobao where id=1");
var s = rs("name").value;
rs.Close();
conn.Close();
document.open("text/html", "replace");
document.write(s);
document.close();
}
</script>
<body onLoad="gen()">
正在初始化系统，请稍候...
</body>
</html>
blues-star 2004-03-24
- 打赏
- 举报
<script>
var conn = new ActiveXObject("ADODB.Connection");
conn.Open("Provider=SQLOLEDB.1;Password=;Persist Security Info=True;User ID=sa;Initial Catalog=GuestBook;Data Source=127.0.0.1");
alert(conn);
</script>
var conn = new ActiveXObject("ADODB.Connection");
conn.Open("Provider=SQLOLEDB.1;Password=;Persist Security Info=True;User ID=sa;Initial Catalog=GuestBook;Data Source=127.0.0.1");
alert(conn);
</script>
