📄 fyday.asp
字号:
<HTML><HEAD><TITLE>中华健康网--免费网站流量分析系统</TITLE>
<META http-equiv=Content-Language content=zh-cn>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<META NAME="Generator" CONTENT="免费统计,计数器,免费计数器,流量统计">
<META NAME="Author" CONTENT="免费统计,计数器,免费计数器,流量统计">
<META NAME="Keywords" CONTENT="免费统计,计数器,免费计数器,流量统计,htm,asp,sql,mssql">
<META NAME="Description" CONTENT="免费统计,计数器,免费计数器,流量统计">
<link rel="stylesheet" href="images/css.css" type="text/css"></HEAD><BODY bgColor=#e1e1e1 topMargin=60>
<TABLE width=569 height=327 border=0 align="center" cellPadding=0 cellSpacing=0
borderColor=#111111 class=ttbb
style="BORDER-RIGHT: 1px dotted; BORDER-TOP: 1px dotted; BORDER-LEFT: 1px dotted; BORDER-BOTTOM: 1px dotted; BORDER-COLLAPSE: collapse">
<TBODY>
<TR>
<TD style="POSITION: relative" width=569 bgColor=#ffffff colSpan=3 height=45><div id="9126" style="position:absolute; left:0px; top:-31px; border-style:none;"><img src="images/logo.gif" width="560" height="78" border="0"></div></TD>
</TR>
<tr align="center">
<td width=569 height=24 colspan=3 bgcolor=#0374b8>
<!--#include file="head.asp" -->
<%if request("view")<>"" then
view=request("view")
url1="?view="&view&"&"
else
url1="?"
end if
%>
<% if errornum<>1 then
if request.querystring("action")="" then%>
<%
fyear=year(now)'判断当前年份
fmonth=month(now)'判断当前月份
fday=day(now)'判断当前日期
%>
</td>
</tr>
<TR>
<TD vAlign=top width=569 bgColor=#66ccff height=194 rowSpan=2><P align=center><IMG height=260 src="images/free.gif" width=52 border=0></P></TD>
<TD colSpan=2 valign="top" background="images/bg.gif" bgColor="#66ccff" class=bgimage>
<div align="center">
<div align="center">
<center>
<table width=95% border=0 align=center cellPadding=0 cellSpacing=0 style="border-collapse: collapse">
<tr>
<td colspan="3" align="center" class=tdc1 height="23"><strong><font color="#990000"><%=fyear%>年<%=fmonth%>月统计</font></strong></td>
</tr>
<tr class=tdc1 >
<td height="22">
<p align="center">日期</td>
<td height="22">
<p align="center">访问人数</td>
<td height="22">
<p align="center">比例图-报表</td>
</tr>
<%
sql="select count(fid) as alldayweek from fcount where fyear='"&fyear&"' and fuser='"&view&"' and fmonth='"&fmonth&"'"
set rs=conn.execute(sql)
maxalldayweek=rs("alldayweek")
if maxalldayweek=0 then maxalldayweek=1
set rs=nothing
rcount=0
for i= 1 to 31
sql="select count(*) as fweek1 from fcount where fyear='"&fyear&"' and fuser='"&view&"' and fmonth='"&fmonth&"' and fday='"&i&"' group by fday "
set rs=conn.execute(sql)
if not rs.eof then
fweek1=rs("fweek1")
else
fweek1=0
end if
%>
<tr>
<td class=tdc height="20" width=15%><%=i%></td>
<td class=tdc height="20" width=15%><%=fweek1%></td>
<td class=tdc height="20"><img src="images/b3.gif" width="<%=(fweek1/maxalldayweek)*100%>" height="10"%><%=round(((fweek1/maxalldayweek)*100),2)%>%
</td>
</tr>
<%rcount=rcount+fweek1
next
%>
<tr>
<td colspan="3" align="center" class=tdc1 height="22">总访问人数:<%=rcount%>
<a href=<%=url1%>action=all> 所有月统计</a></td>
</tr>
</table>
</center>
</div>
<%else%>
<div align="center">
<center>
<table width=95% border=0 align=center cellPadding=0 cellSpacing=0 style="border-collapse: collapse">
<tr>
<td colspan="3" align="center" class=tdc1 height="23"><strong>所有月统计</strong></td>
</tr>
<tr class=tdc1 >
<td height="22">
<p align="center">日期</td>
<td height="22">
<p align="center">访问人数</td>
<td height="22">
<p align="center">比例图-报表</td>
</tr>
<%sql="select count(fid) as alldayweek from fcount where fuser='"&view&"'"
set rs=conn.execute(sql)
maxalldayweek=rs("alldayweek")
if maxalldayweek=0 then maxalldayweek=1
set rs=nothing
rcount=0
for i= 1 to 31
sql="select count(*) as fweek1 from fcount where fday='"&i&"' and fuser='"&view&"' group by fday "
set rs=conn.execute(sql)
if not rs.eof then
fweek1=rs("fweek1")
else
fweek1=0
end if
%>
<tr>
<td class=tdc height="20" width=15%><%=i%></td>
<td class=tdc height="20" width=15%><%=fweek1%></td>
<td class=tdc height="20"><img src="images/b3.gif" width="<%=(fweek1/maxalldayweek)*100%>" height="10"%><%=round(((fweek1/maxalldayweek)*100),2)%>%
</td>
</tr>
<%rcount=rcount+fweek1
next
%>
<tr>
<td colspan="3" align="center" class=tdc1 height="22">总访问人数:<%=rcount%>
<a href=fyday.asp<%=url%>> 今月统计</a></td>
</tr>
</table>
</center>
</div>
<%end if%>
<%else%>
<!--#include file="error.asp" -->
<%end if%></div>
</TD>
</TR>
<TR>
<TD align=right width=569 bgColor=#66ccff height=14></TD>
<TD align=right width=569 bgColor=#66ccff height=14><IMG height=20 src="images/bottomr.gif" width=20 border=0></TD>
</TR>
</TBODY>
</TABLE>
</BODY></HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -