ASP链接ACCESS数据库时错误，请你帮助～！

我的一个代码：
<%
dim conn
set conn=Server.CreateObject("ADODB.Connection")
conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("reg.mdb")
conn.open
conn.close
set conn=Nothing
%>
一个ASP文件里就这些代码，没有其它的代码，我的reg.mdb数据库就在当然目录中。
我主要是想测试数据库的链接。
运行此文件时，显示如下信息：

“
无法显示网页
试图访问的网页出现问题，无法显示。

--------------------------------------------------------------------------------

请尝试执行下列操作：

单击刷新按钮，或稍后重试。

打开 127.0.0.1 主页，然后查找与所需信息相关的链接。
HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务

--------------------------------------------------------------------------------

技术信息（用于支持人员）

错误类型：
Microsoft JET Database Engine (0x80004005)
未指定的错误
/qq.asp, 第 5 行

浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; TencentTraveler )

网页：
GET /qq

<%
dim conn
set conn=Server.CreateObject("ADODB.Connection")
str="dbq="+server.mappath("reg.mdb")+";defaultdir=;driver={MICROSOFT ACCESS DRIVER (*.mdb)}"
conn.open str
set server.createobject("adodb.recordset")
sql="select * from 表名称"
rs.open sql,conn,1,1
response.write rs("字段名") '例如 rs("id")
rs.close
set rs=nothing

conn.close
set conn=Nothing
%>
这样测试一下.这是打开一个表.显示一个字段值.

第一款:
@LF(dongman) 说明:加在新建模板的名称处.也就是新建模板名称

@API_zIndex(1)
@API_Alpha(70) 这两个一块加在评论处

第二款:
@LF(king) 说明:加在新建模板的名称处.也就是新建模板名称

@API_zIndex(1)
@API_Alpha(70) 这两个一块加在评论处.

第三款:
@LF(lwb) 说明:加在新建模板的名称处.也就是新建模板名称

@API_zIndex(1)
@API_Alpha(70) 这两个一块加在评论处.

第四款:
代码:

@LF(ldh) 说明:加在新建模板的名称处.也就是新建模板名称

@API_zIndex(1)