adminpw_do.asp

来自「WAP2.0的手机网站留言板」· ASP 代码 · 共 34 行

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%Response.CodePage=65001%>
<%Response.Charset="UTF-8"%>
<!--#include file="adminCheck.asp"-->
<!--#include file="../func.asp"-->
<!--#include file="md5.asp"-->
<!--#include file="db_conn_admin.asp"-->
<%
pass=ReplaceBadChar(Trim(request.form("pw")))
pass1=ReplaceBadChar(Trim(request.form("pw1")))
pass2=ReplaceBadChar(Trim(request.form("pw2")))

if pass1<>pass2 Then
	Response.redirect "error.asp?err=1904"
ElseIf strLength(pass1)<4 Then
	Response.redirect "error.asp?err=1905"
Else
	sqlStr="select * from WP_admin where admin_account='"&session("admin")&"' and admin_password='"&md5(pass)&"'"
	set rs = server.createobject("ADODB.RecordSet")
	rs.open sqlStr,conn,1,3
	If rs.eof Then
		Response.redirect "error.asp?err=1906"
	Else
		rs("admin_password")=md5(pass2)
		rs.update

		Response.redirect "info.asp?info=2901"
	End If
	rs.close
	Set rs=Nothing
End if

Set conn=nothing
%>