📄 edit.asp

📁 很好的企业网站管理系统!可以适应各种不同的小型企业!
💻 ASP
字号:
<%
'==========================================
'
'  晓宇听幽网站内容管理系统 2004
'
'  主页地址：http://www.xoYu.com
'
'==========================================
'程序名称：晓宇听幽网站内容管理系统
'英文名称：xoYu News 2004 Professional
'程序创建时间：2003-7-10
'程序完成时间：2003-9-11
'最后修改时间：2003-10-10
'==========================================
user=Request.cookies("xoYuStudioUserName")
if user<>"" then
  user=replace(user," ","+++ close")
else
  response.write("<li>您没有进入本页面的权限,本次操作已被记录!<br><li>如果你是本站会员请先<a href=login.asp target=_top>登陆</a>后进入.")
  response.end
end if
server_vv=len(Request.ServerVariables("SERVER_NAME"))
server_v1=left(Cstr(Request.ServerVariables("HTTP_REFERER")),server_vv)
server_v2=left(Cstr("http://"&Request.ServerVariables("SERVER_NAME")),server_vv)
if server_v1<>server_v2 and server_v1<>"" and server_v2<>"" then
response.write("<script>alert('错误：禁止从站点外部提交数据!.')</script>")
response.end
end if
%>
<!--#include file="mdb_path_user.asp"-->
<!--#include file="char.inc"-->
<!--#include file="config.asp"-->
<!--#include file="md5.asp"-->
<%
pwd=md5(replace(request.form("pwd")," ","+++ close"))
set rs=server.CreateObject("ADODB.RecordSet")
rs.open "select * from UserInfo where user='"&user&"'",conn,1,2
if rs.eof then
xoYuStudioMsg="错误:"&user&"用户资料读取错误,请重新登陆!"
else
if request("type")="save" then
if pwd="" then
xoYuStudioMsg="错误:要修改资料必需填写原密码!"
else
if pwd<>rs("pwd") then
xoYuStudioMsg="错误:原密码错误!"
else
qm=htmlencode(request.form("qm"))
if len(qm)>250 then
xoYuStudioMsg="错误:个性签名多于250个字符!"
else
if request.form("pwd1")<>"" or request.form("pwd2")<>"" then
if request.form("pwd1")<>request.form("pwd2") then
xoYuStudioMsg="错误:要修改两次输入密码不相同,密码没被修改;<br><font color=""#FF0000"">·</font>"
else
rs("pwd")=md5(request.form("pwd1"))
end if
end if
rs("email")=request.form("email")
rs("oicq")=request.form("oicq")
rs("homepage")=request.form("homepage")
rs("sex")=request.form("sex")
rs("face")=request.form("face")
rs("qm")=qm
rs("softurl")=request.form("softurl")
response.cookies("xoYuStudioUserSoftUrl")=request.form("softurl")
xoYuStudioMsg=xoYuStudioMsg&"成功:修改资料完成!"
rs.Update
end if
end if
end if
end if
email=rs("email")
oicq=rs("oicq")
homepage=rs("homepage")
sex=rs("sex")
face=rs("face")
qm=rs("qm")
softurl=rs("softurl")
end if
rs.close
set rs=nothing  
conn.close  
set conn=nothing
%>
<html>

<head>
<meta copy="程序制作：xoyu（QQ：5964887）www.xoyu.com">
<title>晓宇听幽 网站内容管理系统—添加文章</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="admin.css" type="text/css">
</head>

<body topmargin="0" leftmargin="0">
<form action="edit.asp" method="post">
<input type="hidden"  name="type" value="save">
<div align="center">
  <center>
<%if request("type")="save" then%><table width="95%" border="0" cellspacing="1" cellpadding="3"  align=center class="tableBorder">
  <tr>
    <td width="100%" class="forumrow"><font color="#FF0000"><%=xoYuStudioMsg%></font> 
	<p>时间:<%=Now()%></td>
  </tr>
</table>
<%end if%><table width="95%" border="0" cellspacing="1" cellpadding="3"  align=center class="tableBorder" height="347">
    <tr>
      <td width="100%" height="1" bgcolor="#799AE1">
<p><b>修改个人资料</b></p>
      </td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" height="20">      
      　用户名：<input disabled name="u" value="<%=user%>" size="15"></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" height="20">      
      　原密码：<input name="pwd" size="15" type="password">
      <font color="#FF0000">*</font></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" height="15">      
      <b><font color="#000080">修改登陆密码</font></b></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" height="20">      
      　新密码：<input name="pwd1" size="15" type="password">
      <font color="#808080">不能有空格,不修改请留空</font></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" height="20">      
      确认密码：<input name="pwd2" size="15" type="password"><font color="#808080"> 
      同上</font></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" height="15">      
      <font color="#000080"><b>修改其它资料</b></font></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" height="20">      
      　　性别：<select size="1" name="sex">
      <option selected value="男">男</option>
      <option<%if sex="女" then%> selected<%end if%> value="女">女</option>
      </select></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" height="20">      
      　　头像：<input name="face" size="15" value="<%=face%>">
      <font color="#808080">代号请看:[</font><a target="_blank" href="face.asp">头像列表</a><font color="#808080">]</font></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" height="20">      
      　　OICQ：<input name="oicq" size="15" value="<%=oicq%>"></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" height="20">      
      　E-Mail：<input name="email" size="32" value="<%=email%>"></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" height="20">      
      个人主页：<input name="homepage" size="32" value="<%=homepage%>"></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" valign="top" height="61">      
      个性签名：<textarea rows="3" name="qm" cols="59"><%=qm%></textarea><font color="#808080"><br>
      250字符内,不支持HTML语言,支持<a target="_blank" href="../help/ubb.htm">ubb</a>语言.</font></td>
    </tr>
    <tr>
      <th width="100%" bgcolor="#DFDFDF" height="22">      
      <p align="center">      
      <input<%if webuseredit<>"1" then%> disabled<%end if%> name="b1" type="submit" value="确认修改">&nbsp;      
      <input name="b2" type="reset" value="全部还原"></p>
     </th>     
    </tr>
  </table>
  </center>
</div>
</form>
</body>
</html>
💿 文件大小 8692 K
👤 上传用户 Rebecca_SYF
📂 所属分类其他行业
🏷️ 相关标签

#企业网站 #管理系统
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -