<%
'乘风多用户计数器
'作者QQ：178575
'作者EMail：yliangcf@163.com
'作者网站：http://www.qqcf.com
'详细简介：http://www.qqcf.com/cfcount.htm
'上面有程序在线演示，安装演示，使用疑难解答，最新版本下载等内容
'因为这些内容可能时常更新，没有放在程序里，请自己上网站上查看
%>
<%If SysCode="" Then Response.End%>

 <table class="tb_1">
<tr class="tr_1">
<td colspan="4">回头率报表</td>
</tr>
<tr class="tr_2"> 
<td>次数</td>
<td>人数</td>
<td>比率</td>
</tr>
<%
Sql="Select * From CFCount_Back where UserName='"&UserName&"'"
Set Rs=Conn.Execute(Sql)
TotalNum=Rs("BackNum_1")+Rs("BackNum_2")+Rs("BackNum_3")+Rs("BackNum_4")+Rs("BackNum_5")+Rs("BackNum_6")+Rs("BackNum_7")+Rs("BackNum_8")+Rs("BackNum_9")+Rs("BackNum_10")+Rs("BackNum_Higher")

For I= 1 To 10
%>
<tr class="tr_2"> 
<td>第&nbsp;<font color="#FF0000"><%=I%></font>&nbsp;次访问</td>
<td><%=Rs("BackNum_"&I)%></td>
<td style="text-align:left;"><img src=images/bar_blue.gif width=<%=Rs("BackNum_"&I)/TotalNum*300%> height=10><%=MyRate(Rs("BackNum_"&I),TotalNum)%>% </td>
</tr>
<%
Next%>
<tr class="tr_2"> 
<td>10次以上访问</td>
<td><%=Rs("BackNum_Higher")%></td>
<td style="text-align:left;"><img src=images/bar_blue.gif width=<%=Rs("BackNum_Higher")/TotalNum*300%> height=10><%=MyRate(Rs("BackNum_Higher"),TotalNum)%>% </td>
</tr>
</table>
