📄 qqcf_index.asp
字号:
<%
'==================================
' 乘风多用户计数器v3.4 Mssql版
' 制 作：乘 风
' 网 站：http://www.qqcf.com
' 系统演示：http://www.qqcf.com/?action=try
' 最新版本下载：http://www.qqcf.com/?action=down
' 声 明:
' 本软件系免费程序,提供给个人免费使用,请保留版权使用。
' 付费版提供升级服务和技术支持。
' 未经作者许可禁止用于任何商业用途。
' 乘风其它作品：乘风多用户计数器Access版、乘风多用户记数器php版、乘风免费电影程序
' 乘风网站推广系统、乘风网址程序、乘风广告管理、系统乘风论坛等。
' 此段版权注释不会影响网页打开速度，请勿删除!
' 2005年12月5日
'===================================
%>
<!--#Include File="QQCF_Conn.Asp"-->
<!--#Include File="QQCF_ChkStr.Asp"-->
<!--#Include File="QQCF_MyFunCtion.Asp"-->
<!--#Include File="QQCF_Md5.Asp"-->
<%
If Request("Action")="login" Then
User_Name=GoBack(Request("User_Name"),"请输入用户名称")
Password=GoBack(Request("Password"),"请输入用户密码")
Cookies_Time=int(Request("Cookies_Time"))
CheckCode=Trim(Request("CheckCode"))
If Session("ValidCode")<>CheckCode Then Call AlertUrl("四位数字的验证码输入错误!","QQCF_Index.Asp")
Set Rs=Server.CreateObject("Adodb.RecordSet")
Sql="Select * From WWW_QQCF_COM_CfCount_RegUser Where User_Name='"&User_Name&"'"
Rs.Open Sql,Conn,1,1
If Rs.Eof And Rs.Bof Then Call AlertUrl("没有此注册用户!","QQCF_Index.Asp")
If Rs("Password")<>Md5(Password) Then Call AlertUrl("密码错误!","QQCF_Index.Asp")
Set Rs=Server.CreateObject("Adodb.RecordSet")
Sql="Select * From WWW_QQCF_COM_CfCount_RegUser Where User_Name='"&User_Name&"'"
Rs.Open Sql,Conn,3,2
Rs("LoginTotal")=Rs("LoginTotal")+1
Rs("LastLoginTime")=Now()
Rs.Update
Session("CfCountUser")=User_Name
If Cookies_Time>0 Then
Randomize
RanNum=int(90000000*rnd)+10000000
CfWztgUserCooKie=User_Name&RanNum&year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)
Response.Cookies("CfCountUserCooKie")=CfWztgUserCooKie
Cookies_Time=Dateadd("n",Cookies_Time,Now())
Response.Cookies("CfCountUserCooKie").expires=Cookies_Time
Sql="Update WWW_QQCF_COM_CfCount_RegUser Set Cookies='"&CfWztgUserCooKie&"' Where User_Name='"&User_Name&"'"
Conn.ExeCute Sql
End If
Response.Redirect "QQCF_Manage.Asp"
End If%>
<HTML><HEAD><TITLE><%=RsSet("Title")%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="QQCF_Pic/ok3.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1400" name=GENERATOR>
<script language=JavaScript>
function check()
{
if(window.document.form1.user_name.value=="")
{
alert("请输入用户名!");
window.document.form1.user_name.focus();
return false;
}
if(window.document.form1.password.value=="")
{
alert("请输入密码!");
window.document.form1.password.focus();
return false;
}
if(window.document.form1.checkcode.value=="")
{
alert("请输入四位数字的验证码!");
window.document.form1.checkcode.focus();
return false;
}
return true;
}
</script>
</HEAD>
<BODY leftMargin=0 topMargin=0 marginheight="0" marginwidth="0">
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<TBODY>
<TR>
<TD bgColor=#000000 colSpan=3><IMG height=1
src="QQCF_Pic/spacer.gif" width=1></TD></TR>
<TR>
<TD width=1 bgColor=#000000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD bgColor=#ce3300 height=10><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD width=1 bgColor=#000000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center bgColor=#ffffff
border=0>
<TBODY>
<TR>
<TD width=1 bgColor=#000000 height=12><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD width=10 bgColor=#ce3000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD width=40><IMG height=12 src="QQCF_Pic/ok3-3_r2_c15.gif"
width=40></TD>
<TD width=200 bgColor=#ce3000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD width=1 bgColor=#000000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center bgColor=#ffffff
border=0>
<TBODY>
<TR>
<TD width=1 bgColor=#000000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD width=10 bgColor=#ce3000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD width=14><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD><a href="http://www.qqcf.com" target="_blank"><IMG src="<%=RsSet("LogoUrl")%>" width="480" height="60" border="0"></a></TD>
<TD width=10 bgColor=#ce3000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD width=1 bgColor=#000000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
</TR>
</TBODY>
</TABLE>
<TABLE height=6 cellSpacing=0 cellPadding=0 width=760 align=center
bgColor=#ffffff border=0>
<TBODY>
<TR>
<TD width=1 bgColor=#000000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD width=10 bgColor=#ce3000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD width=10 bgColor=#ce3000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD width=1 bgColor=#000000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD></TR></TBODY></TABLE>
<TABLE height=28 cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<TBODY>
<TR>
<TD width=1 bgColor=#000000 height=12><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD width=10 bgColor=#ce3000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD background=QQCF_Pic/ok3-1_r7_c2.jpg> <a href="QQCF_Manage.Asp?Action=lylist"><strong>来源明细</strong></a>|<a href="QQCF_Manage.Asp?Action=lytj"><strong>来源统计</strong></a>|<a href="QQCF_Manage.Asp?Action=onlinetj"><strong>在线统计</strong></a>|<a href="QQCF_Manage.Asp?Action=daytj"><strong>每日统计</strong></a>|<a href="QQCF_Manage.Asp?Action=hourtj"><strong>小时统计</strong></a>|<a href="QQCF_Manage.Asp?Action=backtj"><strong>回头率统计</strong></a>|<a href="QQCF_Manage.Asp?Action=searchtj"><strong>搜索引擎统计</strong></a>|<a href="QQCF_Manage.Asp?Action=keywordtj"><strong>搜索关键字统计</strong></a>|<a href="QQCF_Manage.Asp?Action=jsqset"><strong>计数设置</strong></a>| <a href="QQCF_Admin.Asp" target="_blank"><font color="#ff0000"><strong>超级管理员入口</strong></font></a></TD>
<TD width=10 bgColor=#ce3000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD>
<TD width=1 bgColor=#000000><IMG height=1
src="QQCF_Pic\spacer(1).gif"
width=1></TD></TR></TBODY></TABLE>
<TABLE height=12 cellSpacing=0 cellPadding=0 width=760 align=center
bgColor=#ffffff border=0>
<TBODY>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -