modifypwdok.asp

一个用jsp 编写的个人主页网站哦。希望对大家有所帮助啊

<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
pwd=Replace(Request.Form("pwd"),"'","''")
if pwd="" then
response.Write"<script language=javascript>alert('对不起，管理员或密码是空的!');history.back(-1);</script>"
response.End()
else
dim rs
dim sql
sql="select * from admin"
set rs=server.createobject("adodb.recordset")
On error resume next 
rs.open sql,conn,1,3
pwd=md5(pwd)
rs("pwd")=""&pwd&""
rs("dz")="梦想小筑"
rs.update
rs.close
end if
response.Redirect "pwdok.asp"
%>