JavaScript使用ActiveXObject访问Access和SQL Server数据库

<SCRIPT LANGUAGE="JavaScript"> 
<!-- 
var filePath = location.href.substring(0, location.href.indexOf("实例197.连接Access数据库.html"));    //以当前页面文件为基础，找到文件所在的绝对路径 
var path = filePath + "197.mdb"; 
path = path.substring(8);           
var objdbConn = new ActiveXObject("ADODB.Connection");        
var strdsn = "driver={Microsoft Access Driver (*.mdb)};dbq=" + path;    
objdbConn.Open(strdsn);                      
document.write("连接ACCESS数据库成功!<br>"); 
objdbConn.Close();                         
//--> 
</SCRIPT> 

<SCRIPT LANGUAGE="JavaScript"> 
<!-- 
var objdbConn = new ActiveXObject("ADODB.Connection");   
var strdsn = "Driver={SQL Server};SERVER=(local);UID=sa;PWD=111111;DATABASE=hljdatabase";   
objdbConn.Open(strdsn);      
document.write("数据库连接成功<br>");     
objdbConn.Close();                    
//--> 
</SCRIPT> 

<SCRIPT LANGUAGE="JavaScript"> 
<!-- 
var objdbConn = new ActiveXObject("ADODB.Connection");   
var strdsn = "Driver={SQL Server};SERVER=(local);UID=sa;PWD=111111;DATABASE=hljdatabase";      // 需要修改自己的服务器地址,用户名,密码 
objdbConn.Open(strdsn);      
var objrs = objdbConn.Execute("SELECT * FROM 表 where 关联=0");                  // 输入本地的表 
var fdCount = objrs.Fields.Count - 1;          
if (!objrs.EOF){                                
  document.write("<table border=1><tr>");    
  for (var i=0; i <= fdCount; i++)                 
      document.write("<td><b>" + objrs.Fields(i).Name + "</b></td>"); 
  document.write("</tr>"); 
 
  while (!objrs.EOF){                    
    document.write("<tr>");              
    for (i=0; i <= fdCount; i++) 
       document.write("<td valign='top'>" + objrs.Fields(i).Value + "</td>"); 
    document.write("</tr>"); 
    objrs.moveNext();                  
  } 
  document.write("</table>");  
} 
else  
  document.write("数据库内没有记录!<br>"); 
objrs.Close();                          
objdbConn.Close();                    
//--> 
</SCRIPT> 

<SCRIPT LANGUAGE="JavaScript"> 
<!-- 
var objdbConn = new ActiveXObject("ADODB.Connection");   
var strdsn = "Driver={SQL Server};SERVER=(local);UID=sa;PWD=111111;DATABASE=hljdatabase";   // 需要修改自己的服务器地址,用户名,密码 
objdbConn.Open(strdsn);      
objdbConn.Execute("update 表 set 关联=0");                    // 请写入自己的执行语句 
document.write("更新数据成功!<br>"); 
objdbConn.Close();                    
//--> 
</SCRIPT>