www.gusucode.com > 共享世纪内容管理系统 2.1 build 080704 全站开源版 > admin/edit.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="WWW.2KY.CN 共享世纪">
<title>共享世纪新闻文章管理系统—添加文章</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="admin.css" type="text/css">
</head>
<!--#include file="top.asp"-->
<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">
    <tr>
      <td width="100%">
      <table border="0" cellpadding="0" cellspacing="0" width="100%">
        <tr>
          <th width="50%" bgcolor="#99CCFF"><b>修改个人资料</b></th>
          <th width="50%" bgcolor="#99CCFF">
          <p align="right">[<font color="#000000"><a href="right.asp"><u><font color="#FFFFFF">进入管理中心</font></u></a></font>]</th>
        </tr>
      </table>
      </td>
    </tr>
    <tr>
      <td width="100%" class="forumrow">      
       用户名:<input disabled name="u" value="<%=user%>" size="15"></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow">      
       原密码:<input name="pwd" size="15" type="password">
      <font color="#FF0000">*</font></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow">      
      <b><font color="#000080">修改登陆密码</font></b></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow">      
       新密码:<input name="pwd1" size="15" type="password">
      <font color="#808080">不能有空格,不修改请留空</font></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow">      
      确认密码:<input name="pwd2" size="15" type="password"><font color="#808080"> 
      同上</font></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow">      
      <font color="#000080"><b>修改其它资料</b></font></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow">      
        性别:<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">      
        头像:<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">      
        OICQ:<input name="oicq" size="15" value="<%=oicq%>"></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow">      
       E-Mail:<input name="email" size="32" value="<%=email%>"></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow">      
      个人主页:<input name="homepage" size="32" value="<%=homepage%>"></td>
    </tr>
    <tr>
      <td width="100%" class="forumrow" valign="top">      
      个性签名:<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">      
      <p align="center">      
      <input<%if Session("xoYuStudioAdminDj")<4 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>