如何不通过odbc连接access数据库(50分)

我初学asp，下面一段程序运行后出现找不到数据源的错误，可书上是这样写的，请各位指教
数据库test，放在目录asp下，我没有在odbc里创建连接而是直接指向数据库所在地
<%@ language=vbscript %>
<%
myname=""
mypassword=""
myname=request.form("username")
mypassword=request.form("userpassword")
%>
<%
sql="select * pass where (name='"&amp;myname&amp;"'and pass='&amp;mypasswor&amp;"')"
connstr= "dbq="+server.mappath("asp/test.mdb")+";defaultdir=;driver=
{microsoft access driver (*.mdb)};driverid=25;fil=msaccess;implicitcommitsync
=yes;maxbuffersize=512;maxscanrows=8;pagetimeout=5;safetransactions=0;
threads=3;usercommitsync=yes;"
%>
<%
conn.open
set rs=conn.execute(sql)
if rs.eof then

%>
用户名<%=myname%>不存在<br>
<%
end if
%>
<%rs.close%>
<%conn.close%>

<% set objconn=server.CreateObject ("adodb.connection")
objconn.open "driver={Microsoft Access Driver (*.mdb)};dbq=" &amp;
SERVER.MapPath("/asp/test.mdb")
%>

<% set objconn=server.CreateObject ("adodb.connection")
objconn.open "driver={Microsoft Access Driver (*.mdb)};dbq=" &amp;
SERVER.MapPath("/asp/test.mdb")
%>

多人接受答案了。