<!--#include file="Include_func.asp"-->
<!--#include file="openconn.asp"-->
<%
IF Not ChkPost()  Then
	response.Redirect G_error_page_1
	response.End()
End IF
dim number_type,number_id,ttt_id
IF StayNub(request("id"))="" Then
	response.Redirect G_error_page_1
	response.End()	
Else
	id=Clng(StayNub(request("id")))
End IF
tag=request("tag")
htmlid=request("htmlid")

Set oRs=Server.CreateObject(G_RS)
oRs.open "Select n_hits From qingtiandy_News Where Id="&id,Conn,1,3
IF Not oRs.Eof Then
	oRs("n_hits")=oRs("n_hits")+1
	oRs.Update
	okHits=oRs("n_hits")
End IF
oRs.close


%>
<%IF htmlid<>"" Then%>
if(document.getElementById("<%=htmlid%>"))
	document.getElementById("<%=htmlid%>").innerHTML="<%=okHits%>"
<%End IF%>
