<%
sql="select * from exam_type"
set rs=conn.execute(sql)
exam_score=rs("exam_score")
id=session("id")
c_score=0
'for i=1 to 100
'if trim(request("sele"&i))=trim(request("r_answer"&i)) then
'c_score=c_score+i
'end if
'next
'sql1="update student set s_score='"&c_score&"' where id='"&id&"'"
'conn.execute(sql1)
response.Redirect "test.asp"
%>