在线考试系统评分出错！！怎么办？
'计算单选题得分for i=1 to singlenumber
result=request.form("no"&id1(i-1)){运行后显示这一行下标越界: '[number: 10]'}
if not isempty(result) then
sql="select * from question where id="& clng(id1(i-1))
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
if result=rs("answer") then
score=score+cint(singleper)
end if
rs.close
set rs=nothing
end if
next
技术信息（用于支持人员）
错误类型：
Microsoft VBScript 运行时错误 (0x800A0009)
下标越界: '[number: 10]'
/exam/result.asp, 第 31 行
浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; CIBA; .NET CLR 2.0.50727; .NET CLR 3.0.04506.30)
网页：
POST 102 ??? /exam/result.asp
POST Data:
hidQuestID1=5%2C9%2C6%2C7%2C2%2C8%2C1%2C4%2C11%2C10%2C&hidQuestID2=12%2C13%2C14%2C&submit=%BD%BB%BE%ED
时间：
2011年4月20日, 下午 09:00:26
详细信息：
Microsoft 支
