1、只需要两三行代码，就可以实现连接数据库的功能：
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open Server.MapPath("db.mdb")
第一行创建一个数据库连接对象；
第二行指定连接什么类型的数据库；
第三行指定数据库文件的位置，并打开数据库连接；其中的db.mdb就是Access数据库的文件名；如果放在其他文件夹里，要加上路径，如：放在db文件夹里，就写"db/db.mdb"
2、上面的代码在一切正常时，不会出现任何提示；
但在有错误发生时，就会出现类似于下图的提示：
3、为了方便网页浏览者使用，我们把程序修改成
在连接成功时，提示“连接成功”
在连接失败时，提示“连接失败”
代码：
On Error Resume Next
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open Server.MapPath("adb.mdb")
If Err Then
Response.Write "连接数据库失败！"
Response.End()
Else
Response.Write "数据库连接成功！"
End If
再运行程序，就不会上一步中的错误提示。
4、On Error Resume Next
这一句的作用是：在错误发生时，把错误交给程序处理，而不是直接输出到浏览器
可以通过 Err 的值判断是否有错误发生，从而执行不同的处理程序。
.
完整的例子放在百度网盘中，需要的请发邮件到 xdhy_dn@foxmail.com
主题写 “百度经验”。自动回复下载地址。
