新手问个小问题 - 编程论坛

我刚学ASP不久,今天按照教材里的例题做了一个ASP文件和一个数据库,那ASP文件是用来把数据表里的内容显示出来,内容如下:

<%@language="vbscript"%>
<%
dim filepath,cn1,sq1,rs
filepath=server.MapPath("a1.mdb")
set cn1=server.createobject("adodb.connection")
cn1.open "driver={microsoft access driver(*.mdb)};dbq="&filepath
sq1="select * from s"
set rs=cn1.excute(sq1)
%>
<html>
<body bgcolor="white" topmargin="10" leftmargin="10">
<p align="center">
<font size="4"><b>用户情况表</b></font><br>
<hr size="1" width="90%" align="center">
<table width="90%" align="center" border="1" cellpadding="0" cellspacing="0" bordercolorlight="#000080" bordercolordark="#FFFFFF" bordercolor="#FFFFFF">
<tr height="35">
<td align="center">姓名</td>
<td align="center">性别</td>
<td align="center">年龄</td>
<td align="center">工资</td>
<td align="center">电话</td>
<td align="center">居住地区</td>
</tr>
<%
do while(not rs.eof)
response.write"<tr>"
response.write"<td align=center> "&rs("姓名")&" </td>"
response.write"<td align=center> "&rs("性别")&" </td>"
response.write"<td align=center> "&rs("年龄")&" </td>"
response.write"<td align=center> "&rs("工资")&" </td>"
response.write"<td align=center> "&rs("电话")&" </td>"
response.write"<td align=center> "&rs("居住地区")&" </td>"
response.write"</tr>"
rs.movenext
loop
rs.close
set rs=nothing
cn1.close
set cn1=nothing
%>
</table>
</body>
</html>

数据表(表名为s)内容如下:

编号    姓名    性别    年龄    工资    电话    居住地区
1    小唐    男    25    1600    6630030    长沙
2    小张    女    22    1400    5656453    北京
3    小李    男    20    1600    2626681    上海
4    小王    女    20    1300    2803502    武汉
5    小红    女    24    1400    2627562    长沙

我把这两个文件一起上传到虚拟空间一个名为123456789的文件夹了,可是不能访问,打开网页,显示:

Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'

[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序

/123456789/Index.asp，行 6

我想了很久不知道第6行到底错在哪里,书里是这么写的啊.

请问这是为什么,该如何解决,请高手帮帮我,谢谢!