ASP连接Access的初级问题。急,在线等

出错信息
Microsoft VBScript 编译器错误 错误 '800a03f6' 
缺少 'End' 
/iisHelp/common/500-100.asp，行242 Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e21' ODBC 驱动程序不支持所需的属性。 /websun/index.asp，行10 
代码: 有两个文件, 一个是connectDB.asp, 另一个是index.asp/****************************connectDB.asp*********************************
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY><%
Set conn=Server.CreateObject("ADODB.Connection") 
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("circuit.mdb") 
set conn = server.createobject("adodb.connection") 
conn.open strconn 
Set rs = Server.CreateObject("ADODB.RecordSet")
%>
</BODY>
</HTML>
**********************************************************************************//******************************index.asp**************************************************<html>
<head>
<title>用户注册结果</title>
</head>
<body bgcolor="#FFFFFF">
<!--#include file = "ConnectDB.asp"-->
<%
sql = "SELECT * FROM userinfo WHERE UserName = sun"
'Set rs = Server.createObject("ADODB.RecordSet")
rs.Open sql,conn,1,1
if rs.Eof or rs.Bof then 
Response.write rs("UserName")
Response.write "None"
rs.close()
conn.close()
set rs = Nothing
set conn = Nothing
end if

%>
</body>
</html>
***************************************************************************************/数据库文件在web服务的目录下, D;/websun/circuit.mdb
访问路径是 http://jin/websun/index.asp 然后就出现这个问题了.