Access数据库名为 MyData.Mdb， 里面建了一个名为count的表，表由两个字段组成： ID和COUNT，表里有一条数据： ('count','100')。 文本文件名为 count.txt，里面随便写入一个数字。 静态页面名为Cnt.htm。
以上3个文件都放在同一目录下。
由于采用Access数据库，而它采用非标准SQL语法，所以要注意在表名和字段名上需要加方括号： []
下面是页面里的代码：
其中getCountFromDB方法是对Access数据库进行操作，getCountFromTxt方法是对txt纯文本进行操作，这两个方法都在本地执行通过。
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE>New Document </TITLE>
<META NAME="Generator" CONTENT="EditPlus">
<META NAME="Author" CONTENT="">
<META NAME="Keywords" CONTENT="">
<META NAME="Description" CONTENT="">
<SCRIPT LANGUAGE="JavaScript">
<!--
function getCountFromDB() {
//以当前页面文件为基础，找到文件所在的绝对路径。
var filePath = location.href.substring(0, location.href.indexOf("Cnt.htm"))
var path = filePath + "MyData.mdb"
//去掉字符串中最前面的"files://"这8个字符。
path = path.substring(8)
var updateCnt = 0
//生成查询和更新用的sql语句。
var sqlSelCnt = "SELECT COUNT FROM [COUNT] WHERE ID = 'count'"
var sqlUpdCnt = "UPDATE [COUNT] SET [COUNT] = '"
//建立连接，并生成相关字符串 www.knowsky.com。
var con = new ActiveXObject("ADODB.Connection")
con.Provider = "Microsoft.Jet.OLEDB.4.0"
con.ConnectionString = "Data Source=" + path
con.open
var rs = new ActiveXObject("ADODB.Recordset")
rs.open(sqlSelCnt, con)
while (!rs.eof) {
var cnt = rs.Fields("COUNT")
document.write(cnt)
//将取得结果加1后更新数据库。
updateCnt = cnt * 1 + 1
rs.moveNext
}
rs.close()
rs = null
sqlUpdCnt = sqlUpdCnt + updateCnt + "'"
con.execute(sqlUpdCnt)
con.close()
con = null
}
function getCountFromTxt() {
var filePath = location.href.substring(0, location.href.indexOf("Cnt.htm"))
var path = filePath + "count.txt"
path = path.substring(8)
var nextCnt = 0
var fso, f1, ts, s
//以只读方式打开文本文件。
var ForReading = 1
//以读写方式打开文本文件。
var ForWriting = 2
fso = new ActiveXObject("Scripting.FileSystemObject")
f1 = fso.GetFile(path)
ts = f1.OpenAsTextStream(ForReading, true)
s = ts.ReadLine()
nextCnt = eval(s) + 1
document.write("now count is :" + s)
ts.Close()
ts = f1.OpenAsTextStream(ForWriting, true)
ts.WriteLine(nextCnt)
ts.close()
}
//-->
</SCRIPT>
</HEAD>
<BODY>
<SCRIPT LANGUAGE="JavaScript">
<!--
getCountFromTxt()
//-->
</SCRIPT>
</BODY>
</HTML>
后记：虽然在只支持静态页面的免费空间不可用，但是我想一些支持Asp的免费空间应该能用，当然我没有具体试过，只是凭自己想象。并且用这种方法来读写数据库，只适合做计数器和留言版这样的不需要保密性的工作，毕竟代码全是用javascript写成的，谁都可以看到，然后就可以得到路径把db文件下载下来进行分析，所以没办法用它来保存一些不想让别人知道的东西。就像我一个同事说的，用javascript连接数据库进行操作，简直就是霸王硬上弓，呵呵，的确如此，既然不能用在免费空间上作自己的计数器，那这段代码就只能用来玩玩，自己找找良好感觉了。收集:
简单的数据库操作：<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE></TITLE>
<script language=javascript>
function connectDb()
{
var ConnDB = new ActiveXObject("ADODB.Connection")
ConnDB.ConnectionString="dsn=shbxdatabaseuid=ldbxpwd=123456"
ConnDB.Open()
var Rs = new ActiveXObject("ADODB.Recordset")
var tempstr=""
Rs.Open("select * from WDA1",ConnDB,1,3)
while(!Rs.EOF)
{
tempstr = tempstr + Rs("TNAME") + "<br/>"
Rs.MoveNext
}
test.innerHTML=tempstr
}
</script>
</HEAD>
<BODY onbeforeunload="return 'ok?'"><P><div id=test></div>
<P><INPUT id=button1 type=button value=显示 name=button1 onclick="connectDb()"></BODY>
</HTML>
>>>>>>-------------------------------------var db="D:\\js\\9t\\db1.mdb"
function opendb(dbname,sql)
{
var opendb =new ActiveXObject("ADODB.Recordset")
opendb.ActiveConnection = "DBQ="+dbname+"DRIVER={Microsoft Access Driver (*.mdb)}"
opendb.Source = sql
opendb.CursorType = 1
opendb.CursorLocation = 2
opendb.LockType = 3
opendb.Open()
return opendb
}
var rs=new Object()
rs=opendb(db,"select * from 产品 where id="+i)
document.all.xx1.innerHTML=rs("生产厂商").value
document.all.xx2.innerHTML=rs("产品名称")+"/"+rs("型号")
document.all.xx3.innerHTML=rs("售价")
document.all.xx4.innerHTML=rs("批发")
document.all.xx5.innerHTML=rs("备注")
<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<---------------------------------------
连接ACCESS只能用数据源，操作数据库的方法跟ASP之类是一样的。
只不过执行的语句不一样罢了。
如：
String dbUrl = "sun.jdbc.odbc.JdbcOdbcDriver"
String dbConStr = "jdbc:odbc:dnsName"
Connection Conn = null
Statement stmt = null
try{
Class.forName(dbUrl)
}catch(ClassNotFoundException e){
System.err.println("Not Found ClassForName" + e.getMessage())
}
try{
Conn = DriverManager.getConnection(dbConStr, "uid", "pwd")//连接数据库，uid与pwd分别为 用户名及密码（连接数据库的），如果没有既为空
stmt = Conn.createStatement()
}catch(Exception e){
System.err.println("Can't Connect the DATA" + e.getMessage())
}
//以下为操作数据库的
String sql = "select * from tableName[....]"
ResultSet Rs = stmt.executeQuery(sql)// 返回记录集
String sqlUpdate = "update..."
String sqlInsert = "insert into...."
stmt.executeUpdate(sqlUpdate)//更新记录
stmt.executeUpdate(sqlInsert)//插入记录
Conn.close()
stmt.close()
楼上说的不对，asp使用js做服务器端语言的时候可以连接数据库。只是这没有什么意义。
asp默认使用VBscript，连接数据库后直接循环输出即可
dim rs,sql,strSet RS=Server.CreateObject("ADODB.RECORDSET")
sql="select top 20 * from K1 where 1=1"
' rs.open sql,conn,1,1
' if rs.bof and rs.eof then
' str="there is nothing!"
' else
' str=""
' do while not rs.eof
' str=str&"<div class='id'>"&rs("id")&"</div><div class='t'>"&rs("title")&"</div><div class='b'>"&rs("content")&"</div>"
' rs.movenext
' loop
' end if
' rs.close:set rs=nothing
' response.write str
方法和详细的操作步骤如下：
1、第一步，打开HBuilder工具，并在Web项目的js文件夹中创建一个新的JavaScript文件ConnDB.js，使用require（）引入mysql模块，然后将该值分配给变量mysq，见下图，转到下面的步骤。
2、第二步，完成上述步骤后，调用createConnection（）方法设置主机，用户名，密码，端口并返回数据，见下图，转到下面的步骤。
3、第三步，完成上述步骤后，调用mysql模块中的connect（）方法以连接到mysql数据，见下图，转到下面的步骤。
4、第四步，完成上述步骤后，编写查询语句SQL并将其作为字符串分配给变量sq，见下图，转到下面的步骤。
5、第五步，完成上述步骤后，调用query（），根据返回值判断结果，然后打印返回，见下图。这样，就解决了这个问题了。
