<!--#include file="../Config.asp"-->
<!--#include file="Safe.asp"-->
<%
Page=request.querystring("Page")
ID=clng(trim(request.querystring("ID")))

if Page="Article" then
	'给文章点击数加1
	If Instr(1,Session("Read"),"[" & ID & "]")=0 Then
	conn.execute "UPDATE [Jin_Article] SET Hits = Hits+1 WHERE SysID = "&ID
	Session("Read")=Session("Read") & "[" & ID & "]"
	End If
	'读出文章点击数
	AHits=conn.execute("select Hits from Jin_Article where SysID=" & ID)(0)
	'输出文章点击数
	response.write "document.write("&AHits&")"
End If
'
if Page="Article1" then
	AHits=conn.execute("select Hits from Jin_Article where SysID=" & ID)(0)
	'输出文章点击数
	response.write "document.write("&AHits&")"
End If

if Page="Product" then
	'给产品点击数加1
	If Instr(1,Session("See"),"[" & ID & "]")=0 Then
	conn.execute "UPDATE [Jin_Photos] SET Hits = Hits+1 WHERE SysID = "&ID
	Session("See")=Session("See") & "[" & ID & "]"
	End If
	'读出产品点击数
	AHits=conn.execute("select Hits from Jin_Photos where SysID=" & ID)(0)
	'输出产品点击数
	response.write "document.write("&AHits&")"
End If
'
if Page="Product1" then
	AHits=conn.execute("select Hits from Jin_Photos where SysID=" & ID)(0)
	'输出产品点击数
	response.write "document.write("&AHits&")"
End If
%>
