asp批量修改记录的代码

  <%

  'asp 数组 批量修改记录

  id=Request("id")

  id=Split(id,",")

  hits=Request("hits")

  hits=Split(hits,",")

  regtime=Request("regtime")

  regtime=Split(regtime,",")

  For i=LBound(id) To UBound(id)

  Set rs = Server.CreateObject("ADODB.Recordset")

  sql= "Select * from article where id ="&id(i)

  If Not rs.EOF Then

  rs("hits")=hits(i)

  rs("regtime")=regtime(i)

  rs.Update

  End If

  Next

  %>