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="确认修改"> <input name="b2" type="reset" value="全部还原"></p> </th> </tr> </table> </center> </div> </form> </body> </html>