为什么我连接数据库的时候会出错啊？
这是一个学生成绩查询系统。
以下这段程序是成绩查询的界面：
<html>
<head>
<title>学生成绩查询</title></head>
<body>
<div align="center" class="style1">
<p>学生成绩查询</p></div>
<form name="form1" method="post" action="学生成绩查询事件.asp">
<p align="center">学号：
<input type="text" name="id" size="30">
</p>
<p align="center">姓名：
<input type="text" name="name" size="30">
</p>
<p align="center">总分：在
<input type="text" name="min" size="10">
与
<input type="text" name="max" size="10">
之间 </p>
<p align="center"><input type="submit" value="查询" name="button1"> <input type="reset" value="重写" name="button2">
</p>
</form>
</body>
</html>
下面是查询的事件：
<html>
<head>
<title>学生成绩查询</title></head>
<body>
<%sid=trim(request("id"))
sname=trim(request("name"))
smin=trim(request("min"))
smax=trim(request("max"))
first="false"
condition="where"
if sid<>"" then
if first="true" then
condition=condition & "AND"
end if
condition=condition &"学号=" &sid
first="true"
end if
if sname="" then
if first="true" then
condition=condition & "AND"
end if
condition=condition &"姓名=" & sname
first="true"
end if
if smin<>"" then
if first="true" then
condition=condition & "AND"
end if
condition=condition & "(大学英语+高等数学+普通化学+大学物理+网页设计)/5>=" & smin
first="true"
end if
if smax<>"" then
if first="true" then
condition=condition & "AND"
end if
condition=condition & "(大学英语+高等数学+普通化学+大学物理+网页设计)/5<=" & smax
first="true"
end if
if first="true" then
SQLSTR="select * from 学生成绩表" & condition
else
SQLSTR="select * from 学生成绩表"
end if
dim id(99),name(99),english(99),math(99),chemistry(99),physics(99),asp(99),average(99)
%>
<%
set conn=server.CreateObject("ADODB.connection")
strConnect="driver={sql
server};server=server=(local);uid=sa;pwd=sa;database=internet"
conn.open strConnect
set recordset=conn.execute("SQLSTR")
%>
<%
number=0
do while(not recordset.eof)
id(number)=recordset("学号")
name(number)=recordset("姓名")
english(number)=recordset("大学英语")
math(number)=recordset("高等数学")
chemistry(number)=recordset("普通化学")
physics(number)=recordset("大学物理")
asp(number)=recorder("网页设计")
recordset.movenext
number=number+1
loop
conn.close
set recordset=nothing
set conn=nothing
%>
<p align="center"><font face="黑体" size="6">学生成绩表</font></p>
<table border="1" width="100%">
<tr>
<td width="12%" align="center" bgcolor="#CC0066">学号</td>
<td width="12%" align="center" bgcolor="#CC0066">姓名</td>
<td width="12%" align="center" bgcolor="#CC0066">大学英语</td>
<td width="12%" align="center" bgcolor="#CC0066">高等数学</td>
<td width="13%" align="center" bgcolor="#CC0066">普通化学</td>
<td width="13%" align="center" bgcolor="#CC0066">大学物理</td>
<td width="13%" align="center" bgcolor="#CC0066">网页设计</td>
<td width="13%" align="center" bgcolor="#CC0066">平均成绩</td>
</tr>
<% for i=0 to number-1
average(i)=(english(i)+math(i)+chemistry(i)+physics(i)+asp(i))/5
%>
<tr>
<td width="12%" align="center"><%=id(i) %></td>
<td width="12%" align="center"><%=name(i) %></td>
<td width="12%" align="center"><%=english(i) %></td>
<td width="12%" align="center"><%=math(i) %></td>
<td width="13%" align="center"><%=chemistry(i) %></td>
<td width="13%" align="center"><%=phsics(i) %></td>
<td width="13%" align="center"><%=asp(i) %></td>
<td width="13%" align="center"><%=average(i) %></td>
</tr>
<%
next
%>
</table>
</body>
</html>
其中internet是我建的数据库，请各位帮忙一下。。。先谢谢大家了。。。
