[求助]出错啦,下标越界,请帮我看看!
叶面上
<%do while not rs.eof%>
<input type="hidden" name="ID" value="<%=ID%>">
<input type="hidden" name="price" value="<%=price%>">
<%
rs.movenext
loop
%>
提交时就会有多个price 和 ID
这样接受语句
<%
If Not IsEmpty(Request.Form) Then
If Not Request.Form("price") = "" Then
ID=Trim(Request.Form("ID"))
price=Trim(Request.Form("price"))
arrayID = split(ID,",")
arrayprice = split(price,",")
for i=lbound(arrayID) to ubound(arrayID)
strSql = "UPDATE [TBL_EXCHANGE_RATE] SET [price]='" & arrayprice(i) & "', [TimeStamp]='" & now() & "' WHERE ID = '" & arrayID(i) & "'"
conn.execute strSql
next
End If
End If
%>
上面一切正常,我现在要再多加一个字段[是否显示]做成打勾和不打勾,意思是不打勾就不显示这行数据。
<input type="hidden" name="ID" value="<%=ID%>">
<input type="hidden" name="price" value="<%=price%>">
<input name="xianshi" type="checkbox" id="xianshi" value="True" checked>
问题是,我加上这段后在作相应修改,在提交数据时全选就正常,如果有几个没打勾就没有数据,会出错提示:i下标越界