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

<%
AddDate=ChkStr(Request("AddDate"),3)

If AddDate="" Then AddDate=Cstr(Date)
%>

<table class="tb_1">
<tr>
<form name="form6" method="post" action="?">
<td colspan="5" >选择查询的日期 
<Select  name="adddate" size="1" onChange="window.location=form.adddate.options[form.adddate.selectedIndex].value">
<%Sql="Select AddDate From CFCount_Client_Day Where UserName='"&UserName&"' Group By AddDate Order By AddDate Desc"
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.open Sql,Conn,1,1
While Not Rs.Eof 
 Response.Write "<option value='?Action=clienttj&AddDate="&Rs("AddDate")&"'"
 If Request("AddDate")=Cstr(Rs("AddDate")) Then Response.Write " selected"
 Response.Write ">"&Rs("AddDate")&"</option>"  
Rs.MoveNext
Wend  
%>
</select></td>
</form>
</tr>

<%
Px=ChkStr(request("Px"),1)
If Px="" Then Px="ID"
Call PxFilter(Px,"id,MyCounter,adddate")

Sql="Select * From CFCount_Client_Day Where UserName='"&UserName&"' And Datediff('d',AddDate,'"&AddDate&"')=0"

Set Rs=Server.CreateObject("Adodb.RecordSet")
Rs.Open Sql,Conn,1,1
%>
</td>
</tr>

<tr class="tr_1"> 
<td colspan="2"><%=AddDate%> 客户端统计</td>
</tr>


<tr> 
<td class="td_3" width="50%">Alexa安装数量 ：</td>
<td><%response.write rs("alexacounter")%></td>
</tr>
<tr class="tr_1"> 
<td colspan="2">浏览器</td>
</tr>
<tr>
<td class="td_3">IE8：</td>
<td><%response.write rs("browser1")%></td>
</tr>
<tr>
<td class="td_3">IE9：</td>
<td><%response.write rs("browser2")%></td>
</tr>
<tr>
<td class="td_3">IE10：</td>
<td><%response.write rs("browser3")%></td>
</tr>
<tr>
<td class="td_3">搜狗：</td>
<td><%response.write rs("browser4")%></td>
</tr>
<tr>
<td class="td_3">360：</td>
<td><%response.write rs("browser5")%></td>
</tr>
<tr>
<td class="td_3">Chrome：</td>
<td><%response.write rs("browser6")%></td>
</tr>
<tr>
<td class="td_3">火狐：</td>
<td><%response.write rs("browser7")%></td>
</tr>
<tr>
<td class="td_3">其它：</td>
<td><%response.write rs("browserother")%></td>
</tr>
<tr class="tr_1"> 
<td colspan="2">系统</td>
</tr>
<tr>
<td class="td_3">Windows 10：</td>
<td><%response.write rs("os1")%></td>
</tr>
<tr>
<td class="td_3">Windows 7：</td>
<td><%response.write rs("os2")%></td>
</tr>
<tr>
<td class="td_3">Windows XP：</td>
<td><%response.write rs("os3")%></td>
</tr>
<tr>
<td class="td_3">安卓：</td>
<td><%response.write rs("os4")%></td>
</tr>
<tr>
<td class="td_3">iPhone：</td>
<td><%response.write rs("os5")%></td>
</tr>
<tr>
<td class="td_3">其它：</td>
<td><%response.write rs("osother")%></td>
</tr>
<tr class="tr_1"> 
<td colspan="2">屏幕</td>
</tr>
<tr>
<td class="td_3">屏幕宽1024/1280/1440/1152/1680/800/1600/1920/1360/其它：</td>
<td><%response.write rs("screenwidth1")%>/<%response.write rs("screenwidth2")%>/<%response.write rs("screenwidth3")%>/<%response.write rs("screenwidth4")%>/<%response.write rs("screenwidth5")%>/<%response.write rs("screenwidth6")%>/<%response.write rs("screenwidth7")%>/<%response.write rs("screenwidth8")%>/<%response.write rs("screenwidth9")%>/<%response.write rs("screenwidthother")%></td>
</tr>
<tr>
<td class="td_3">屏幕高768/800/900/1024/864/1050/960/720/600/其它：</td>
<td><%response.write rs("screenheight1")%>/<%response.write rs("screenheight2")%>/<%response.write rs("screenheight3")%>/<%response.write rs("screenheight4")%>/<%response.write rs("screenheight5")%>/<%response.write rs("screenheight6")%>/<%response.write rs("screenheight7")%>/<%response.write rs("screenheight8")%>/<%response.write rs("screenheight9")%>/<%response.write rs("screenheightother")%></td>
</tr>
<tr>
<td class="td_3">屏幕色彩32位/16位/24位/其它：</td>
<td><%response.write rs("screencolordepth1")%>/<%response.write rs("screencolordepth2")%>/<%response.write rs("screencolordepth3")%>/<%response.write rs("screencolordepthother")%></td>
</tr>
</table>
 <%Rs.Close%>
 