<% id=request("id") set rs_c=server.createobject("adodb.recordset") sql_c="select * from down where id="&id rs_c.open sql_c,conn,1,1 //日 if DatePart("d",rs_c("hits_datetime"))<>DatePart("d",date()) then sqlhit_s="update down set hits_day=1 where id="&id conn.execute(sqlhit_s) else sql1="update down set hits_day=hits_day+1 where id="&id conn.execute(sql1) end if //周 sqlhit_s="" if DatePart("ww",rs_c("hits_datetime"))<>DatePart("ww",date()) then sqlhit_s="update down set hits_week=1 where id="&id conn.execute(sqlhit_s) else sql1="update down set hits_week=hits_week+1 where id="&id conn.execute(sql1) end if //月 sqlhit_s="" if DatePart("m",rs_c("hits_datetime"))<>DatePart("m",date()) then sqlhit_s="update down set hits_ms=1 where id="&id conn.execute(sqlhit_s) else sql1="update down set hits_ms=hits_ms+1 where id="&id conn.execute(sql1) end if ' sql1="update down set hits_week=1,hits_day=1,hits_ms=1 " rs_c.close:set rs=nothing //总计 sqlhits="" sqlhits="update down set hits=hits+1,hits_datetime=date() where id="&id conn.execute(sqlhits) //结束 set rs=server.createobject("adodb.recordset") sql="select hits from down where id="&id rs.open sql,conn,1,1 %> document.write('<%=rs("hits")%>'); <%rs.close:set rs=nothing%>