📄 safe2.asp

📁 这是一个很漂亮的网站购物系统
💻 ASP
字号:
<!--#include file="../include/buyok_shop_30_conn.asp"-->
<!--#include file="../chopchar.asp"-->
<!--#include file="checkadmin.asp"-->
<script language=javascript src=../include/mouse_on_title.js></script>
<%'call checkmanage("11")%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="manage.css" type="text/css">
</head>
<BODY background="../images/admin/back.gif">
<%
admin=request.cookies("buyok")("admin")
action=request("edit")
if action<>"ok" then
%>
<table width="98%" border="1"  style="border-collapse: collapse; border-style: dotted; border-width: 0px" bordercolor="#333333" cellspacing="0" cellpadding="2">
  <tr> 
    <td colspan=2 class=td height=18> 
      <div align="center"><b><font color="#FF0000"> <font color="#FFFFFF">抱歉,您使用的是未注册版本,未提供本功能. 
        </font></font></b></div>
    </td>
  </tr>
  <tr> 
    <td width=13% height=25 align=center>&nbsp;</td>
    <td width="87%"><b><font color="#FF0000">客户服务及反馈中心 抱歉,您使用的是未注册版本,未提供本功能.</font></b></td>
  </tr>
  <tr> 
    <td width=13% height=25 align=center valign=top"><font color="#FF0000">联系方式</font></td>
    <td width="87%"><b><font color="#FF0000">Phone:010-88684912 13366690044 MSN:asp3721@msn.com 
      QQ:88353022  </font></b></td>
  </tr>
  <form action='prod0.asp?action=addMidclass' method=post name=addmidclass>
    <tr> 
      <td width=13% height=25 align=center><font color="#FF0000">备 注</font></td>
      <td width="87%"><b><font color="#FF0000">非在线支付购买的用户,汇完款 请QQ或电话联系管理员</font></b></td>
    </tr>
    <tr> 
      <td colspan=2> 
        <div align="center"><b><font color="#FF0000"><a href="http://www.asp3721.cn/"><font color="#990000">asp3721软件中心 
          我们将为你提供优质服务,谢谢!http://www.asp3721.cn/</font></a></font></b> </div>
      </td>
    </tr>
  </form>
</table>
<%   
else
	if checktext(Request("pass0"))<>Request("pass0") or checktext(Request("pass1"))<>Request("pass1") or checktext(Request("pass2"))<>Request("pass2") then
	response.write "<script language='javascript'>"
	response.write "alert('您填写的内容中含有非法字符，请检查后重新输入！');"
	response.write "location.href='javascript:history.go(-1)';"
	response.write "</script>"
	response.end
	end if

	if trim(Request("pass0"))="" or trim(Request("pass1"))="" or trim(Request("pass2"))="" then
	response.write "<script language='javascript'>"
	response.write "alert('出错了，填写不完整，请填写旧密码和新密码！');"
	response.write "location.href='javascript:history.go(-1)';"
	response.write "</script>"
	response.end
	end if

	if trim(Request("pass1"))<>trim(Request("pass2")) then
	response.write "<script language='javascript'>"
	response.write "alert('出错了，两次输入的新密码不符，请检查后重新输入！');"
	response.write "location.href='javascript:history.go(-1)';"
	response.write "</script>"
	response.end
	end if

	if len(trim(Request("pass1")))<8 then
	response.write "<script language='javascript'>"
	response.write "alert('出错了，您输入的新密码太短了，要求长度为8-16位，建议使用数字和字母组合！');"
	response.write "location.href='javascript:history.go(-1)';"
	response.write "</script>"
	response.end
	end if

	Set rs = conn.Execute("select * from manage where username='"&admin&"'")
	if rs("password")<>md5(Request("pass0")) then
	response.write "<script language='javascript'>"
	response.write "alert('出错了，旧密码不正确，请检查后重新输入！');"
	response.write "location.href='javascript:history.go(-1)';"
	response.write "</script>"
	response.end
	end if

	Set rs=Server.CreateObject("ADODB.Recordset")
	sql="select * from manage where username='"&admin&"'"
	rs.open sql,conn,1,3
	if rs.eof and rs.bof then
		response.write "<script language='javascript'>"
		response.write "alert('操作失败。您未登陆，或者闲置时间过长，或者数据库中无此记录。');"
		response.write "location.href='javascript:history.go(-1)';"
		response.write "</script>"
	else
		rs("password")=md5(Request("pass1"))
		rs.update
	end if
	set rs=nothing

	response.write "<script language='javascript'>"
	response.write "alert('密码更新成功，请牢牢记住您的新密码！！\n\n现在将退出管理中心，请用新密码重新登录！');"
	response.write "location.href='quit.asp';"			
	response.write "</script>"

end if

%>
⌨️ 快捷键说明

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