本文导读：
做ASP的网站时，经常使用到该连接数据的源码，所以贴出来，以备不时之需。
[code]
<%@ LANGUAGE = "VBScript" CodePage = 936%>
<%
dim conn
dim connstr
dim db
db="data/#*.mdb" 数据库路径、数据库文件名
...
做ASP的网站时，经常使用到该连接数据库的源码，所以贴出来，以备不时之需。
<%@ LANGUAGE = "VBScript" CodePage = 936%>
<%
dim conn
dim connstr
dim db
db="data/#*.mdb" 数据库路径、数据库文件名
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
如果服务器采用较老版本的Access驱动，请用下面连接方法，一般使用上面的链接。
Connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
conn.Open connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "服务器正在维护，请稍后再试。"
Response.End
End If
Sub CloseConn()以下是断开数据库连接
conn.close
set conn=nothing
End Sub
%>
上一篇：黑暗过后是黎明（四）
下一篇：写在圣诞节
