no.asp

电子商务网络购物系统

<!--#include file="conn.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('请先登录！');history.go(-1);</script>"
response.End
end if
%>
<title>时代网联</title>
<%if request.QueryString("action")="save" then%> <!--#include file="../func.asp"--> <%
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from admin where admin='"&session("admin")&"'",conn,1,3
if md5(trim(request("password")))<>rs("password") then
response.Write "<script language=javascript>alert('原密码错误，请返回重新输入');history.go(-1);</script>"
response.End
else
rs("password")=md5(trim(request("password2")))
rs.Update
rs.Close
set rs=nothing
session("admin")=""
session("rank")=""
response.Write "<script language=javascript>alert('更改成功，请用新密码重新登录！');history.go(-1);</script>"
end if
response.End
end if
%> <TABLE WIDTH="98%" BORDER="0" ALIGN="center" CELLPADDING="2" CELLSPACING="0"> 
<FORM NAME="renpassword" METHOD="post" ACTION="change.asp?action=save"> 
<TR BGCOLOR="#6699cc"> 
<TD WIDTH="40%"><FONT COLOR="#FFFFFF">