<!-- #include file="conn.asp" -->
 
<%

dim   t(187)
  for  i=1 to 187
 t(i)=request.Form("t"&i)
next
 
set rsc=server.createobject("adodb.recordset")
sqlc="select * from 注册资料 where zh='"&session("username")&"' and mm='"&session("password")&"'"
rsc.open sqlc,conn,1,3
rsc("qa")=cint(t1)+cint(t2)+cint(t3)+cint(t4)+cint(t5)+cint(t6)+cint(t7)
rsc.update
rsc.close
conn.close


set rsc=nothing
set conn=nothing

response.write("<script language='javascript'>")
response.write("alert('测试完成');location='index.asp';")
response.write("</script>")

%>


代码如上
小弟想实现
t1=request.form("t1")
t2=request.form("t2")
.....................
t187=request.form("t187")

没有报错，但
rsc("qa")=cint(t1)+cint(t2)+cint(t3)+cint(t4)+cint(t5)+cint(t6)+cint(t7)
这里的结果不对

谢谢各位了

t1到t7的声明代码在哪？

从上一个页面传递过来的，一共有187道选择题
request.form("t1")至request.form("t187")




[ 本帖最后由 kimxny 于 2009-12-29 23:18 编辑 ]

t1=request.form("t1")
t2=request.form("t2")
.....................
t187=request.form("t187")

这步怎么实现?

你不是已经放入数组了吗？

rsc("qa")=cint(t1)+cint(t2)+cint(t3)+cint(t4)+cint(t5)+cint(t6)+cint(t7)
这一步没有实现

并没有得到它们value值的和

我说下我的个人意见，我觉得你没有取到值，问题不在保存页面，而是在前边选择的那个页面中控件id以及name的设置。
即那187个控件都设置name="t"，空间的id值分别是id="t1"|id="t2"……id="t187"
这样保存页面就可以使用：
for  i=1 to 187
t(i)=request.Form("t"&i)
next

你可以试试，自己遇到过类似的问题。

rsc("qa")=cint(t1)+cint(t2)+cint(t3)+cint(t4)+cint(t5)+cint(t6)+cint(t7)
你已经放入数组，这句话取得是数组的值？

呵呵 已经解决了 谢谢各位
dim  t(187)
for i=1 to 187
str = "t" & i  & "=request.form(""t" & i & """)"
execute(str)
next

这样就OK了