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

Page=CLng(ChkStr(Request("Page"),2)):If Page<=0 Then Page=1

TotalRs=RsSet("StyleTotal")
MyPageSize=10
MyPageSize2=10

If RsSet("StyleTotal") Mod MyPageSize=0 Then
 TotalPage=RsSet("StyleTotal")/MyPageSize
Else
 TotalPage=Int(RsSet("StyleTotal")/MyPageSize)+1
 If Page=TotalPage Then
 MyPageSize2=RsSet("StyleTotal") Mod MyPageSize
 End If
End If

If Page>TotalPage Then Page=TotalPage
 
I=1
%>

<div class="f-l w-730">
<H2><span class=s-1>网站统计</span> 
<div class=bdr-right></div>
</H2>
<div class=bdr>



<table class="index_tb">
<tr class="tr_1">
<td>样式代码</td>
<td>网站统计数字样式</td>
</tr>

<%While I<=MyPageSize2
%>
<tr> 
<td style="padding:10px;text-align:center;"> 
<%K=(Page-1)*MyPageSize+I%>
编号:<%=K%>
</td>
<td  style="padding:5px;">
<%For J=0 to 9%><img src="CounterPic/<%=K%>/<%=J%>.gif"><%Next%></td>
</tr>
<%
I=I+1
Wend%>
</table>

<%
Response.write GetPageList(TotalRs,TotalPage,Page,PageUrl,Px)
%>

<div class=clear></div>
</div>
<div class="bdr-bottom-730">
<div class=bdr-right2></div>
</div>
<div class="bk-10"></div>
</div>
