⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 manage1.asp

📁 ASP编写的刷ALEXA的平台
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="Conn.Asp"-->
<!--#include file="CheckLogin.Asp"-->
<!--#include file="top.Asp"-->
<!--#include file="md5.Asp"-->
<%
UserName = Request.Cookies("RichwongAlexa")("UserName")
UserID = Request.Cookies("RichwongAlexa")("UserID")
Set Rs = Server.CreateObject("ADODB.RecordSet")
    Rs.Open "Select Top 1 * From Member Where ID = " & UserID & "",Conn,1,1
    If Not(Rs.bof and Rs.eof) Then
    Ispass = Rs("UserIspass")
	    If Ispass = 0 Then 
		Ispass = "未审核"
		Else
		Ispass = "正常"
		End If
    UserClass = Rs("UserClass")
	    If UserClass = 1 Then
		UserClass = "普通用户"
		Else
		UserClass = "高级用户"
		End If
	UserPower = Rs("UserPower")
	WebClick = Rs("WebClick")
    WebTotal = Rs("WebTotal")
	WebUrlON = Rs("WebUrlON")
	   If WebUrlON = 1 Then
	   WebUrlON = "已开启 &nbsp;<a href=?action=close>我要关闭!</a>"
	   Else
	   WebUrlON = "已关闭 &nbsp;<a href=?action=open>我要开启!</a>"
	   End if
   End If
Select Case request("action")
   Case "close"
Conn.Execute("Update Member Set WebUrlON = 0  Where ID=" & UserID & "")
Response.Redirect "Manage1.Asp"
   Case "open"
Conn.Execute("Update Member Set WebUrlON = 1  Where ID=" & UserID & "")
Response.Redirect "Manage1.Asp"
   Case "s_WebModify"
   UserUrlValue = LCase(Req("UserUrl"))
Conn.Execute("Update Member Set UserUrl = '"&UserUrlValue&"'  Where ID=" & Req("UserID") & "")
Response.Redirect "Manage1.Asp"
   Case "s_UserModify"
Conn.Execute("Update Member Set UserPassWord= '" & md5(Req("UserPassWord")) & "', UserCode = " & Req("UserCode") & ",UserQuestion = '" & Req("UserQuestion") & "',UserAnswer = '" & Req("UserAnswer") & "',UserTel = " & Req("UserTel") & ",UserQQ = " & Req("UserQQ") & ",UserMail = '" & Req("UserMail") & "' Where ID=" & Req("UserID") & "")
Call Msgs("修改成功!","Manage1.Asp")
End Select
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>后台管理-欢迎来到-中国电信高速alexa排名联盟-alexa排名共赢联盟,Alexa,世界排名,Alexa世界排名</title>
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
}
-->
</style>
<link href="css.css" rel="stylesheet" type="text/css">
</head>
<script type="text/javascript">
<!--

function trimString(str)
{
	var i_tmp,j_tmp;

	if(str == "")
	{
		return "";
	}

	//确定起始处非空字符位置
	for(i=0;i<str.length;i++)
	{
		if(str.charAt(i) != ' ')
		{
			i_tmp = i;
			break;
		}
	}

	//确定结尾处非空字符位置
	for(j=str.length-1;j>=0;j--)
	{
		if(str.charAt(j) != ' ')
		{
			j_tmp = j;
			break;
		}
	}

	return str.substring(i_tmp,j_tmp+1);
}

//判断一个字符是否是数字
function isNumber(str){ 
if(""==str){ 
return false; 
} 
var reg = /\D/; 
return str.match(reg)==null; 
} 


/* 密码验证 */
function vali_password( str, flag )
{
	var len = str.length;
	if( ! str.match( /^[0-9a-zA-Z]{6,20}$/ ) )
	{
		if( flag ) alert("密码只能由6-20个英文字母或数字构成。");
		return false;
	}

	return true;
}


//检查EMAIL合法性
function vali_email_regex(EMail, flag)
{
	// our Regular Expression
	//var regex=/^((\w+)\.?)+@(\w+)\.((\w+)\.?)*$/i;
	var regex = /^(([A-Za-z0-9_\-]+)\.?)+@([A-Za-z0-9_\-]+)\.(([A-Za-z0-9_\-]+)\.?)*$/i

	// do the comparison, if we have a match
	if (!regex.test(EMail))
	{
		if( flag ) alert("邮件地址错误!");
		return false;
	}
	
	if (255 < EMail.length)
	{
		if( flag ) alert("邮件地址长度超出了254个字符!");
		return false;
	}
	
	return true;
}

//短日期,形如 (2003-12-05) 
function strDateTime(str) { 
         var r = str.match(/^(\d{1,4})(\-)(\d{1,2})(\-)(\d{1,2})$/);  
		 if(r==null)return false;  
		 else{
		   return str;
		 } 
        // var d= new Date(r[1], r[3]-1, r[4]);  
         //return (d.getFullYear()==r[1]&&(d.getMonth()+1)==r[3]&&d.getDate()==r[4]); 
}

//验证
function check( frm ){


 	//姓名
	var UserPassWord = trimString(frm.UserPassWord.value);
	frm.UserPassWord.value = UserPassWord;

	if( str_name.length < 1 )
	{
		alert("密码不能为空!");
		frm.UserPassWord.select();
		return false;
	}

 	//身份证
	var str_UserCode = trimString(frm.UserCode.value);
	frm.UserCode.value = str_UserCode;

	if( str_UserCode.length < 1 )
	{
		alert("身份证不能为空!");
		frm.UserCode.select();
		return false;
	}

 	//安全问题
	var str_question = trimString(frm.userquestion.value);
	frm.userquestion.value = str_question;

	if( str_question.length < 1 )
	{
		alert("安全问题不能为空!");
		frm.userquestion.select();
		return false;
	}

 	//答案
	var str_result = trimString(frm.UserAnswer.value);
	frm.UserAnswer.value = str_result;

	if( str_result.length < 1 )
	{
		alert("答案不能为空!");
		frm.UserAnswer.select();
		return false;
	}		


  	//email
	var str_email = trimString(frm.UserMail.value);
	frm.UserMail.value = str_email;
	if( !vali_email_regex(frm.UserMail.value) )
	{
		alert("Email格式不正确!");
		frm.UserMail.select();
		return false;
	}			

    if( frm.agree.checked == false)
	{
		alert("必须同意我们的使用条款!");
		return false;
	}

 	//验证码
	var str_number = trimString(frm.number.value);
	frm.number.value = str_number;

	if( str_number.length < 1 )
	{
		alert("验证码不能为空!");
		frm.number.select();
		return false;
	}

					
    return true;

}

// -->
</script>
<body>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td bgcolor="#0099CC"><table width="98%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
      <tr>
        <td><table width="100%" border="0" cellpadding="0" cellspacing="0" class="zux">

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -