为何总是索引越界
我在一个页面生成带复选框的选项,提交后将所选记录从库中删除,可结果老提示“请求对象 错误 'ASP 0105 : 80004005' 索引越界 ”,请各位大侠指点
生成页面:
CommandText1="select aaa where bbb='xxx'"
Set rs1=Conn.Execute (CommandText1,20,1)
j=0
do until rs1.EOF
Response.Write "<tr>"
for i=0 to 2
if not rs1.eof then
j=j+1
Response.Write"<td width='33%'><INPUT TYPE=checkbox name="&j&" value="&rs1(0).value&">" & rs1(0).value & "</td>"
rs1.movenext
else
Response.Write "<td width='33%'> </td>"
end if
next
Response.Write "</tr>"
loop
Session("count1")=j
Response.Write "</table>"
处理请求:
for i=1 to Session("count1")
checkvalue=Request.Form(i)
if checkvalu<>"" then
sql="delete subscribe where bbb='xxx' and aaa="&checkvalu
conn.Execute(sql)
end if
next