asp连接到ACCESS

之一：

<%
set conn=server.createobject("ADODB.CONNECTION")
connstr = "DBQ=" + server.mappath("db/hcw.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"    
%>

说明如下：

set conn=server.createobject("ADODB.CONNECTION")
'上面一行定义了一个adodb数据库连接组件

connstr = "DBQ=" + server.mappath("db/hcw.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"   
'上面一行进行数据库连接，'上面“db/hcw.mdb”表示数据库的相对路径

'打开这个连接组件为:
conn.open

 

之二：

<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("gxuhcw.mdb")
%>
第一行定义了一个adodb数据库连接组件，第二行连接了数据库

以上语句可写为:
<%
set conn=server.createobject("adodb.connection")
connstr= "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("gxuhcw.mdb")
conn.open connstr
%>

<%
mysql="select * from guest"
set rs=server.createobject("adodb.recordset")
rs.open mysql,conn,1,1
%>

第一句：设置查询数据库的SQL语句。
第二句：定义一个记录集组件，所有搜索到的记录都放在这里面。
第三句：是打开这个记录集，mysql就是前面定义的查询命令，conn就是前面定义的数据库连接组件，后面参数“1，1”，这是读取，后面讲到修改记录就把参数设置为1，3。

'如下语句即可读取其内容：

<%do while not rs.eof%>




<%
rs.movenext
loop
%>

<%=rs("name")%>

<%=rs("tel")%>

<%=rs("message")%>

<%=rs("time")%>

<%
'下面的三条语句是用于关闭数据库
rs.close
set rs=nothing
conn.close
set conn=nothing
%>