<!--#include file="config.asp" -->
<%
Dim softid,AllHits,DayHits,WeekHits,MonthHits
Dim Rs,SQL
If Not IsNumeric(Request.QueryString("SoftID")) And Request.QueryString("SoftID") <> "" then
	Response.write"错误的系统参数!ID必须是数字"
	Response.End
Else
	softid = CLng(Request.QueryString("SoftID"))
End If
SQL="select AllHits,DayHits,WeekHits,MonthHits,HitsTime from NC_SoftList where softid = " & softid  
Set Rs = Newasp.Execute(SQL)
If Not (Rs.BOF And Rs.EOF) Then
	AllHits = Rs("AllHits")
	DayHits = Rs("DayHits")
	WeekHits = Rs("WeekHits")
	MonthHits = Rs("MonthHits")
End If
Rs.Close
Set Rs = Nothing
Response.Write "document.write (" & Chr(34) & " 本日下载：" & DayHits & "&nbsp;&nbsp;本周下载：" & WeekHits & "&nbsp;&nbsp;本月下载：" & MonthHits & "&nbsp;&nbsp;总共下载：" & AllHits & " " & Chr(34) & ");"
'Response.Write "document.write (" & Chr(34) & " [<a href='/soft/comment.asp?softid="& softid &"'  target='_blank'>网友评论</a>] " & Chr(34) & ");"
CloseConn
%>

