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

<%
'为独立查看者时
If Session("CFCountUser_View")<>"" Then  Call AlertBack("独立查看者无法对此操作",1)

Set Rs= Server.CreateObject("Adodb.RecordSet")
Sql="Select * From CFCount_User Where UserName='"&UserName&"'"
Rs.Open Sql,Conn,1,1
%>

<script>
$(function(){
	function CounterShow_1(){
		 $("#t_CounterShow1").show();
		 $("#t_CounterShow2").show();
		 $("#t_CounterShow3").show();
	}
	
	function CounterShow_0(){
		 $("#t_CounterShow1").hide();
		 $("#t_CounterShow2").hide();
		 $("#t_CounterShow3").hide();
	}
	
    <%= "CounterShow_"&Abs(Rs("CounterShow"))&"();"%>
	
	$("input[name='CounterShow'][value='-1']").click(function(){
		CounterShow_1();
	});
	
	$("input[name='CounterShow'][value='0']").click(function(){
		CounterShow_0();
	});	
	
	
	function ImgCounterShow_1(){
		 $("#t_ImgCounterShow").show();
	}
	
	function ImgCounterShow_0(){
		 $("#t_ImgCounterShow").hide();
	}
	
    <%= "ImgCounterShow_"&Abs(Rs("ImgCounterShow"))&"();"%>
	
	$("input[name='ImgCounterShow'][value='-1']").click(function(){
		ImgCounterShow_1();
	});
	
	$("input[name='ImgCounterShow'][value='0']").click(function(){
		ImgCounterShow_0();
	});	
	
	
	function online_1(){
		 $("#t_online").show();
	}
	
	function online_0(){
		 $("#t_online").hide();
	}
	
    <%= "online_"&Abs(Rs("online"))&"();"%>
	
	$("input[name='online'][value='-1']").click(function(){
		online_1();
	});
	
	$("input[name='online'][value='0']").click(function(){
		online_0();
	});	 
	
	
	function TjOpen_1(){
		 $("#t_TjOpen").show();
	}
	
	function TjOpen_0(){
		 $("#t_TjOpen").hide();
	}
	
    <%= "TjOpen_"&Abs(Rs("TjOpen"))&"();"%>
	
	$("input[name='TjOpen'][value='-1']").click(function(){
		TjOpen_1();
	});
	
	$("input[name='TjOpen'][value='0']").click(function(){
		TjOpen_0();
	});	

}); 
</script>


<form name="form3" method="post" action="?Action=jsqsetsave">
<table class="tb_1">
<tr class="tr_1">
<td colspan="2"> 修改资料(带*为必填项）</td>
</tr>
<tr> 
<td width="24%" class="td_r">自定义显示数：</td>
<td> <input name="ShowTotal" type="text" id="ShowTotal" value="<%=rs("ShowTotal")%>" size="30" > 
<font color="#0000FF">*</font>(自定义)</td>
</tr>
<tr> 
<td class="td_r">实际显示数：</td>
<td><%=rs("RealShowTotal")%>(页面的浏览次数)</td>
</tr>
<tr> 
<td class="td_r">实际数值：</td>
<td><%=rs("RealIpTotal")%>(IP数)</td>
</tr>
<tr> 
<td class="td_r">计数器显示位数：</td>
<td><input name="PicNum" type="text" id="total2" value="<%=rs("PicNum")%>" size="30" > 
<font color="#0000FF">*</font></td>
</tr>
<tr> 
<td class="td_r">计数开始日期：</td>
<td><input name="adddate" type="text" id="adddate" value="<%=rs("adddate")%>" size="30" > 
<font color="#0000FF">*</font></td>
</tr>
<tr> 
<td class="td_r">Script计数器显示数字：</td>
<td><input type="radio" name="CounterShow" value="-1"<%if rs("CounterShow")=-1 then response.write " checked"%> onclick="ashow_1()">
是 
<input type="radio" name="CounterShow" value="0"<%if rs("CounterShow")=0 then response.write " checked"%> onclick="ashow_2()">
否</td>
</tr>
<tr id="t_CounterShow1"> 
<td class="td_r">Script计数器显示数字：</td>
<td><input name="ShowType" type="radio" id="ShowType" value="1" <%if rs("ShowType")=1 then response.write "checked"%>>
自定义显示数 
<input name="ShowType" type="radio" id="ShowType" value="2" <%if rs("ShowType")=2 then response.write "checked"%>>
实际显示数值 
<input name="ShowType" type="radio" id="ShowType" value="3" <%if rs("ShowType")=3 then response.write "checked"%>>
实际Ip数值</td>
</tr>
<tr id="t_CounterShow2"> 
<td class="td_r">你设置的计数样式：</td>
<td><%=GetPicStyle(UserName)%>&nbsp;[<a href="?Action=stylelist">更换图片样式</a>] </td>
</tr>
<tr id="t_CounterShow3"> 
<td class="td_r">Script计数器隐藏时默认显示：</td>
<td><input name="CounterHiddenPic" type="radio" id="radio" value="0" <%if rs("CounterHiddenPic")=0 then response.write "checked"%>> 
留言 
<input name="CounterHiddenPic" type="radio" id="radio" value="1" <%if rs("CounterHiddenPic")=1 then response.write "checked"%>> 
<%=RsSet("TjTextName")%> <input name="CounterHiddenPic" type="radio" id="radio" value="2" <%if rs("CounterHiddenPic")=2 then response.write "checked"%>>
图片1 <img src="images/counter_2.gif" border="0"> <input name="CounterHiddenPic" type="radio" id="radio" value="3" <%if rs("CounterHiddenPic")=3 then response.write "checked"%>>
图片2 <img src="images/counter_3.gif" border="0"> </td>
</tr>
<tr> 
<td class="td_r">Script计数器显示位置：</td>
<td><input name="CounterSite" type="radio" id="radio" value="1"<%if rs("CounterSite")=1 then response.write "checked"%>>
在在线人数上面 
<input name="CounterSite" type="radio" id="radio" value="2"<%if rs("CounterSite")=2 then response.write "checked"%>>
在在线人数下面 
<input name="CounterSite" type="radio" id="radio" value="3"<%if rs("CounterSite")=3 then response.write "checked"%>>
在在线人数左面 
<input name="CounterSite" type="radio" id="radio2" value="4"<%if rs("CounterSite")=4 then response.write "checked"%>>
在在线人数右面 </td>
</tr>
<tr> 
<td class="td_r">网店统计显示数字：</td>
<td><input type="radio" name="ImgCounterShow" value="-1"<%if rs("ImgCounterShow")=-1 then response.write " checked"%> onclick="bshow_1()">
是 
<input type="radio" name="ImgCounterShow" value="0"<%if rs("ImgCounterShow")=0 then response.write " checked"%> onclick="bshow_2()">
否</td>
</tr>
<tr id="t_ImgCounterShow"> 
<td class="td_r">网店统计显示数字：</td>
<td><input name="ImgShowType" type="radio" id="radio4" value="1"<%if rs("ImgShowType")=1 then response.write "checked"%>>
自定义显示数 
<input name="ImgShowType" type="radio" id="radio4" value="2"<%if rs("ImgShowType")=2 then response.write "checked"%>>
实际显示数值 
<input name="ImgShowType" type="radio" id="radio4" value="3"<%if rs("ImgShowType")=3 then response.write "checked"%>>
实际Ip数值</td>
</tr>
<tr> 
<td class="td_r">记录在线人数：</td>
<td><input type="radio" name="online" value="-1"<%if rs("online")=-1 then response.write " checked"%> onclick="cshow_1()">
是 
<input type="radio" name="online" value="0"<%if rs("online")=0 then response.write " checked"%> onclick="cshow_2()">
否</td>
</tr>
<tr id="t_online"> 
<td class="td_r">记录在线人数的间隔：</td>
<td><input name="onlinetime" type="text" id="onlinetime" value="<%=rs("onlinetime")%>" size="30">
分钟(请设置180分钟以内,一般是30分钟)</td>
</tr>
<tr> 
<td class="td_r">计数器上显示在线人数：</td>
<td> <input name="onlineshow" type="checkbox" id="onlineshow" value="-1"<%if rs("onlineshow")=-1 then response.write "checked"%>>
是</td>
</tr>
<tr> 
<td class="td_r">计数器上显示今日浏览:</td>
<td><input name="TodayShow" type="checkbox" id="TodayShow" value="-1"<%if rs("TodayShow")=-1 then response.write "checked"%>>
是</td>
</tr>
<tr>
<td class="td_r">计数器上显示今日IP:</td>
<td><input name="TodayIpShow" type="checkbox" id="TodayIpShow" value="-1"<%if rs("TodayIpShow")=-1 then response.write "checked"%>>
是</td>
</tr>
<tr>
<td class="td_r">计数器上显示IP：</td>
<td><input name="IpShow" type="checkbox" id="IpShow" value="-1"<%if rs("IpShow")=-1 then response.write "checked"%>>
是</td>
</tr>
<tr>
<td class="td_r">网站统计上显示来访次数：</td>
<td><input name="VisitShow" type="checkbox" id="VisitShow" value="-1"<%if rs("VisitShow")=-1 then response.write "checked"%>>
是</td>
</tr>
<tr class="tr_1">
<td colspan="2" >以下是信息是否公开设置(公开后所有人可查看)：</td>
</tr>
<tr> 
<td class="td_r">计数器信息公开：</td>
<td><input name="TjOpen" type="radio" id="TjOpen" value="-1"<%if rs("TjOpen")=-1 then response.write "checked"%> onclick="dshow_1()">
是　 
<input name="TjOpen" type="radio" id="radio3" value="0"<%if rs("TjOpen")=0 then response.write "checked"%> onclick="dshow_2()">
否</td>
</tr>
<tr id="t_TjOpen"> 
<td class="td_r">公开选中的计数器信息：</td>
<td><input name="SurveyOpen" type="checkbox" id="SurveyOpen" value="-1"<%if rs("SurveyOpen")=-1 then response.write "checked"%>>
统计概况 
<input name="TodayLyOpen" type="checkbox" id="TodayLyOpen" value="-1"<%if rs("TodayLyOpen")=-1 then response.write "checked"%>>
今天的来源明细 
<input name="OnlineOpen" type="checkbox" id="OnlineOpen" value="-1"<%if rs("OnlineOpen")=-1 then response.write "checked"%>>
在线统计 
<input name="TodayHourOpen" type="checkbox" id="TodayHourOpen" value="-1"<%if rs("TodayHourOpen")=-1 then response.write "checked"%>>
今天的小时统计 
<input name="EveryDayOpen" type="checkbox" id="EveryDayOpen" value="-1"<%if rs("EveryDayOpen")=-1 then response.write "checked"%>>
每天的统计</td>
</tr>
<tr class="tr_1">
<td colspan="2" >留言板</td>
</tr>
<tr> 
<td class="td_r">中转页上显示留言板：</td>
<td><input name="GbookState" type="radio" id="GbookState" value="-1"<%if rs("GbookState")=-1 then response.write "checked"%>>
是　 
<input name="GbookState" type="radio" id="GbookState" value="0"<%if rs("GbookState")=0 then response.write "checked"%>>
否</td>
</tr>
<tr> 
<td>&nbsp;</td>
<td> <input type="submit" name="Submit2" value="修　改" ></td>
</tr>
<tr class="tr_1">
<td colspan="2">你的计数器效果 
</td>
</tr>
<tr>
<td colspan="2"  class="td_1"><%
asyncid=DateDiff("s",Year(now) & "-" & Month(now) & "-1",Now)
%>
<script async defer src="<%=Tmp%>cf.asp?username=<%=username%>&asyncid=<%=asyncid%>" id="<%=asyncid%>"></script></td>
</tr>
</table>
</form>