for i=1 to 34
execute "dim Ans "&CStr(i)& ":Ans "&CStr(i)& "= "&Request.Form(eval( "Ques "&i))
if " " <> then
end
next
Request.Form(eval( "Ques "&i))无效，想获得假定其有效的效果
如何在循环中获得表单中有规则名称的元素值？
------解决方案--------------------
s = "dim Ans " & CStr(i) & ":Ans " & CStr(i) & "=Request.Form( " "Ques " & i & " " ") "
execute s