<!--#include file="../inc/config.asp"-->
<!--#include file="../inc/conn.asp"-->
<!-- #include file="inc/Session.asp" -->
<!--#include file="../inc/function.asp"-->
<!-- #include file="inc/checkrole.asp" -->
<%
'''''''''''''''''''''''''''''''''''''''''''''''
call checkPrevilege(Session("Name"),"p21")
'''''''''''''''''''''''''''''''''''''''''''''''
%>
<%
dim by,countStr
if(request.QueryString("by")<>"") then
	by=clng(request.QueryString("by"))
else
	by=1
end if
%>
<html>
<head>
<title>信息统计</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
	background-color: #FFFFFF;
	font-size:12px;
}
.style1 {
	color: #FFFFFF;
	font-weight: bold;
}
form{margin:0;}
-->
</style>
<link href="style/global.css" rel="stylesheet" type="text/css">
</head>
<body>
<%
countStr="select count(*) from t_info where 1=1"
select case by
	case 1
		countStr=countStr&" and DATEDIFF(Day, PubDate, getdate())=0"
	case 2
		countStr=countStr&" and DATEDIFF(Day, PubDate, getdate())<=7 and DATEDIFF(Day, PubDate, getdate())>=0"
	case 3
		countStr=countStr&" and DATEDIFF(Day, PubDate, getdate())<=31 and DATEDIFF(Day, PubDate, getdate())>=0"
	case 4
	countStr=countStr&" and DATEDIFF(Day, PubDate, getdate())<=365 and DATEDIFF(Day, PubDate, getdate())>=0"
end select
allrec=conn.execute(countStr)(0)
response.Write("<p></p><p></p><p align=""center""><strong>信息数："&allrec&"</strong></p>")
%>
</body>
</html>
<%
call connclose()
%>