<!--#include file = "conn.asp"-->
<%ID = replace(replace(replace(replace(replace(replace(request("ID"),"'",""),"%",""),"&",""),"*",""),">",""),"<","")
set rs=server.CreateObject("adodb.recordset")
sql="update news set hit = hit + 1 where ID= "&ID
conn.execute(sql)
sql="Select hit from news where ID= "&ID
rs.open sql,conn,1,1
hit=rs("hit")
rs.close%>
document.write("<%=hit%>")