📄 system_regedit.asp
字号:
<% @language="vbscript" %>
<!--#include file="Md5.asp"-->
<%
response.buffer=true
Response.Expires=0
if session("quanxian")<"3" then
response.write "SORRY <br>"
response.write "您的权限不够！请勿尝试非法访问！<br>"
response.end
end if
dim mclass_folder
dim url
dim pass
dim rpass
dim email
dim show
dim rq
dim aq
dim mclass
mclass=request("mclass")
mclass_folder=request("mclass_folder")
pass=request("pass")
rpass=request("rpass")
rq=request("rq")
aq=request("aq")
email=request("email")
show=request("show")
url=request("url")
quanxian=request.form("quanxian")
chayue=request.form("chayue")
'--------------------------------------------
ming=request.form("ming")
sex=request.form("sex")
bumen=request.form("bumen")
zhiwu=request.form("zhiwu")
phone=request.form("phone")
mobile=request.form("mobile")
'--------------------------------------------
if ming="" then ming ="未填" end if
if chayue="" then chayue ="0" end if
'response.write "111="&chayue
'response.end
if mobile ="" then mobile ="未填" end if
if bumen="" then bumen="未填" end if
if zhiwu="" then zhiwu="未填" end if
if phone="" then phone="未填" end if
if mobile="" then mobile="未填" end if
if email="" then email="未填" end if
if url="" then url="未填" end if
if show="" then show="无简介" end if
If pass<>rpass Then
response.write "SORRY <br>"
response.write "请重新输入你的密码"
response.end
end if
%>
<!--#include file="conn.asp" -->
<%
dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="select * from mclass where mclass_id="&request.form("mclass_id")&" and user_id="&session("dd")&""
rs.Open sql,conn,1,3
if rs.eof or rs.bof then
response.write "<p align='center'>该用户已注册过！</p>"
else
if pass ="" then
pass=rs("pass")
else
rs("pass")= md5(pass)
end if
rs("mclass_folder")=mclass_folder
rs("rq")=rq
rs("aq")=aq
rs("url")=url
rs("email")=email
rs("show")=show
rs("ming")=ming
rs("sex")=sex
rs("bumen")=bumen
rs("zhiwu")=zhiwu
rs("phone")=phone
rs("mobile")=mobile
rs("quanxian")=quanxian
rs("chayue")=chayue
rs.Update
%>
<html>
<head>
<title>正在进入管理页面</title>
<meta http-equiv=refresh content="1; url=system_userlist.asp?mclass=<%=session("dd")%>">
<BODY bgcolor="#ffffff" text="#000000" link="#000080" alink="#800000" vlink="#2f2f4f" marginheight=0 marginwidth=0 topmargin=10 leftmargin=20 rightmargin=0>
Loading ....
<p align="center">正在返回...</p>
<p align="center">正在加载请稍后......</p>
</body></html>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
end if
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -