javascript怎末连接Access数据库？还有增删改功能？

Question

用js创建Access库和表  
conn = new ActiveXObject("adox.catalog")
conn.create("provider=microsoft.jet.oledb.4.0;data source=" + location.href.replace(/file:[/]+([A-Z]:.*[/])([^/]+)/,"")+"xzn.mdb");
conn.close()conn = connect(dbpath+"xzn.mdb");
conn.Execute("drop table test2"); // 删除表
conn.Execute("create table data ("
+ "id double primary key,"
+ "cote long,"
+ "author varchar(20),"
+ "title varchar(100),"
+ "content memo,"
+ "type varchar(4),"
+ "soruce varchar(50) )");
conn.Close(); 

Answer 1

用js创建库和表 
 
用js创建库和表var dbpath = location.href.replace(/file:[/]+([A-Z]:.*[/])([^/]+)/,""); // 设置路径/**
* 函数: connect
* 功能: 连接 Access 数据库
* 返回连接
* 要求数据库文件在本文档一起
*/
function connect(db_name) {
var dbc = new ActiveXObject("ADODB.Connection");
var dbcon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +db_name;
// var dbcon = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" + db_name;
dbc.Open(dbcon);
return dbc;
}/**
* 功能: 执行SQL指令
*/
function query(db_name,sql) {
var conn = connect(db_name); // 连接数据库
conn.Execute(sql);
conn.Close();
}/**
* 函数: addslashes
* 功能: 按数据库期望转义特殊字符
* 返回转移后的字符串
*/
function addslashes(s) {
return s.replace(/'/g,"''");
}/**
* 创建数据库
*/
conn = new ActiveXObject("adox.catalog")
conn.create("provider=microsoft.jet.oledb.4.0;data source=" + dbpath+"xzn.mdb");
conn.close()/**
* 在数据库中建表
*/
conn = connect(dbpath+"xzn.mdb");
conn.Execute("drop table test2"); // 删除表
conn.Execute("create table data ("
+ "id double primary key,"
+ "cote long,"
+ "author varchar(20),"
+ "title varchar(100),"
+ "content memo,"
+ "type varchar(4),"
+ "soruce varchar(50) )");
conn.Close();
 

Answer 2

<script language=javascript>     function replace(v){ //容错问题，请读者自行进行判断。//定义SQL语句var sql = "select * from Dictionary where MainID='" + v + "'" ;//新建数据库连接对象和数据集存取对象var ConnDB = new ActiveXObject("adodb.connection"); var rs = new ActiveXObject("ADODB.Recordset"); //这里填入要连接的DSNConnDB.ConnectionString="DSN=***;uid=***;pwd=***"; ConnDB.open rs.open(sql,ConnDB,1,1); if (rs.RecordCount>0){ if (v==parseInt(rs("MainID"))){ //字符串连接document.all('txt').value = v + rs("MainValue"); var sql=null;rs.closeConnDB.closereturn; } else { var sql=null; alert("没有此代号！"); txt.select(); txt.focus(); rs.closeConnDB.close} }</script><input type=text id=txt name=txt onblur="replace(this.value)">