asp如何批量更新数据库数据？

第一个a.asp页面代码：




<%
sub_number=request("sub_number")
sub_stores=request("sub_stores")
set rs=server.CreateObject("ADODB.Recordset")
sql="select * from venshop_basket where sub_number='"+sub_number+"'"
rs.open sql,conn,1,3
%>

<%
do while not rs.eof
%>








<%
rs.movenext
loop
%>

商品名称	订购数量	退货数量	配送门店	下单时间	退货原因
'><%=rs("hw_name")%>	<%=rs("basket_count")%>	'>	<%=sub_stores%>	<%=rs("basket_date")%>
全选

<%
rs.close
conn.close
set rs=nothing
set conn=nothing
%>



th_update.asp页面代码：



<%
If Request("delid") & ""="" then
response.write ""
else
arrdel=Request("delid")
basket_count=Request("basket_count")
thcount=Request("thcount")
for i=1 to arrdel.count
sql="update venshop_basket set basket_count='" & thcount(i) & "' where basket_id='" & arrdel(i) & "'"
conn.Execute sql
next
set conn=nothing
response.write "