拍拍尘土

sql = " delete from temp1 "
cn.execute(sql)

    set rs = server.CreateObject("adodb.recordset")
    RS.CursorLocation = 3 '注意游标类型设置
    RS.Open "temp1",cn,1,3
    for i=0 to ubound(arrMobile) ’遍历投票方式1
      arrMiss = split( arrMobile(i),"," )
      arrMobile(i) = arrMiss(0)
  rs.AddNew
  rs("id") = i
  rs("netHits") = 0
  rs("mobileHits") = arrMiss(0) '读取的信息
  rs("totalHits") = 0
    next

    rs.sort = " mobilehits desc " '排序方式1
    rs.movefirst
    while not rs.eof
      response.Write(rs("mobilehits") & "<br>")
      rs.movenext
    wend

    rs.sort = " netHits desc " '排序方式2
    rs.movefirst
    while not rs.eof
      response.Write(rs("mobilehits") & "<br>")
      rs.movenext
    wend

    rs.close
    set rs=nothing