📄 user_info.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="user_chkpass.asp"-->
<!--#include file="inc/function.asp"-->
<!--#include file="inc/md5.asp"-->
<html>
<head>
<title>修改我的blog资料</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="Admin_STYLE.CSS" rel="stylesheet" type="text/css">
<body leftmargin="2" topmargin="0" marginwidth="0" marginheight="0" class="bgcolor">
<br>
<%
if CheckUserLogined()=False then
response.Redirect "user_login.asp"
end if
dim rsuser,action,sqlUser,founderr,errmsg
action=trim(request("action"))
if action="SaveModify" then
call savemodify()
end if
sub savemodify()
dim UserID,Password,PwdConfirm,Question,Answer,Sex,Email,Homepage,OICQ,MSN
dim blogname,user_showlog_num,user_showcomment_num,user_showmessage_num,user_shownewlog_num
dim user_shownewcomment_num,user_shownewmessage_num,user_showlogword_num,en_blogteam
UserID=trim(request("UserID"))
if UserID="" then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>参数不足！</li>"
exit sub
else
userID=Clng(userID)
end if
Password=trim(request("Password"))
PwdConfirm=trim(request("PwdConfirm"))
Question=trim(request("Question"))
Answer=trim(request("Answer"))
Sex=trim(Request("Sex"))
Email=trim(request("Email"))
Homepage=trim(request("Homepage"))
OICQ=trim(request("OICQ"))
MSN=trim(request("MSN"))
blogname=trim(request("blogname"))
user_showlog_num=clng(trim(request("user_showlog_num")))
user_showcomment_num=clng(trim(request("user_showcomment_num")))
user_showmessage_num=clng(trim(request("user_showmessage_num")))
user_shownewlog_num=clng(trim(request("user_shownewlog_num")))
user_shownewcomment_num=clng(trim(request("user_shownewcomment_num")))
user_shownewmessage_num=clng(trim(request("user_shownewmessage_num")))
user_showlogword_num=trim(request("user_showlogword_num"))
en_blogteam=request("en_blogteam")
if not ot_user then
if Password<>"" then
if strLength(Password)>12 or strLength(Password)<6 then
founderr=true
errmsg=errmsg & "<br><li>密码不能大于12小于6，如果你不想修改密码，请保持为空。</li>"
end if
if Instr(Password,"=")>0 or Instr(Password,"%")>0 or Instr(Password,chr(32))>0 or Instr(Password,"?")>0 or Instr(Password,"&")>0 or Instr(Password,";")>0 or Instr(Password,",")>0 or Instr(Password,"'")>0 or Instr(Password,",")>0 or Instr(Password,chr(34))>0 or Instr(Password,chr(9))>0 or Instr(Password,"⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -