saveuser.asp

个人备忘系统一个不错的备忘软件.专供刚学ASP的人学习. 代码简单易懂 mymanage

<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
user=session("admins")
pwd=trim(request.Form("pwd"))
group=request.Form("group")
if user="" then
response.write("<script>alert('非法提交');window.location.href('manageuser.asp')</script>")
response.end
end if
set rs=server.CreateObject("adodb.recordset")
cmd="select * from admin where user='"&user&"'"
rs.open cmd,conn,1,3
rs("user")=user
if pwd<>"" then
rs("pwd")=md5(request.Form("pwd"))
end if
rs("group")=group
rs.update
session("admins")=""
response.write("<script>alert('信息修改成功');window.location.href('manageuser.asp')</script>")
%>