<%
'asp数组批量修改记录
id=Request("id")
id=Split(id,",")

hits=Request("hits")
hits=Split(hits,",")

regtime=Request("regtime")
regtime=Split(regtime,",")

Fori=LBound(id)ToUBound(id)
Setrs=Server.CreateObject("ADODB.Recordset")
sql="Select*fromarticlewhereid="&id(i)
IfNotrs.EOFThen
rs("hits")=hits(i)
rs("regtime")=regtime(i)
rs.Update
EndIf
Next

%>