<%

'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

%>