⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 user_manage_edit.asp

📁 主要功能如下:1、不用注册也可以发言
💻 ASP
字号:
<%@language=vbscript codepage=936 %>
<!--#INCLUDE FILE="config.asp"-->
<!--#INCLUDE FILE="background.asp"-->
<!--#INCLUDE FILE="md5.asp"-->
<%if session("admin")<>1 then response.Redirect("default.asp")%>
<%
if request.Form<>"" then
	 password=request.Form("password")
	 mail=request.Form("email")
     HomePage=Trim(Request.Form("HomePage"))
	 face=request.Form("face")
	 sex=request.Form("sex")
	 qq=request.Form("qq")
	 level=request.Form("level")
	 count1=request.form("count")
	 if Request.Form("faceheight")="" then 
	 	faceheight=0 
	 else 
		faceheight=Request.Form("faceheight")
	 end if
	 if Request.Form("facewidth")="" then 
	 	facewidth=0 
	 else 
	 	facewidth=Request.Form("facewidth")
	 end if
	 if rs11("faceupload") then myface=Request.Form("myFace")
	 if homepage="http://" then homepage="" 

      Set rs=server.createobject("ADODB.RECORDSET")
	  rs.open "Select * From register where id=" &request.Form("id"),Conn,3,3  
		if request.Form("password")<>request.Form("password1") then rs("password1")=md5(password)
    	rs("mail")=mail
		rs("homepage")=homepage
		rs("face")=face
		rs("sex")=sex
		rs("qq")=qq
		if rs("level1")<>"管理员" and rs("level1")<>"版主" and rs("level1")<>"嘉宾" then rs("level1")=level
		rs("count1")=count1
		rs("myface")=myface
		rs("faceheight")=faceheight
		rs("facewidth")=facewidth
    	rs.update
    	rs.close
     response.Redirect "post_ok.asp?info=注册信息修改成功!"
conn.close
set conn=nothing
end if
%>	
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>修改注册信息</title>
<SCRIPT language=javascript>
function  save_onclick()
{
  var strTemp = document.form.password.value;
  var strTemp1 = document.form.password2.value;
  if (strTemp!= strTemp1 )
  {
      alert("两次填写密码不一致!");
      document.form.password.focus();
      return false;
  }
  var strTemp = document.form.faceheight.value;
  if ((strTemp <1) || (strTemp >130))
  {
      alert("头像长度小于1或大于130");
      document.form.faceheight.focus();
      return false;
  }
  var strTemp = document.form.facewidth.value;
  if ((strTemp <1) || (strTemp >130))
  {
      alert("头像高度小于1或大于130");
      document.form.facewidth.focus();
      return false;
  }
  return true;  
}
</SCRIPT>
<link href="1.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style1 {color: #FF0000}
-->
</style>
</head>

<body topmargin="0" leftmargin="0">

<TABLE class=page cellSpacing=0 cellPadding=0 width=760 align=center border=0>
  <TBODY>
	  <TR>
    <TD>
<div align="center">
<!--#INCLUDE FILE="top.asp"-->
</div>


<div align="center"> 
  <center>

    <% Set rs=server.createobject("ADODB.RECORDSET")
   rs.open "Select * From register where id="&request("id"),Conn,3,3
%>
  <table border=0 width=760 cellspacing="0" cellpadding="2">

      <tr>
        <td width="3%" align=left class="tablebg<%=skin%>a"><font color="#FF0000">&nbsp;<img src="images/home.gif" border=0></font></td>
        <td width="8%" align=left class="tablebg<%=skin%>a"><a href="<%if session("list")=0 then%>default.asp<%else%>default1.asp<%end if%>">留言首页</a></td>
        <td width="89%" align=right class="tablebg<%=skin%>a">
          <!--#INCLUDE FILE="link.asp"-->
        </td>
    </table>
    <form action="" method="POST" name="form" id="form" onsubmit="return save_onclick()">
      <table width="98%" align="center" cellpadding="5" cellspacing="1" class="tablebg<%=skin%>b">
        <tr class="tablebg<%=skin%>a">
          <td colspan="3">
            <p align="center"><strong>修改注册信息</strong></td>
        </tr>
        <tr class="tablebg<%=skin%>d">
          <td width="210" align="center"><div align="left"><strong>用户名:</strong></div></td>
          <td height="28" colspan="2" align="center"><div align="left"><%=rs("username")%></div></td>
        </tr>
        <tr class="tablebg<%=skin%>d">
          <td width="210" align="center"><div align="left"><strong>性别:</strong></div></td>
          <td height="28" colspan="2" align="center"><div align="left"><font color="#FFFFFF">
              <select name="sex" size="1" id="select">
                <option value="1" <%if rs("sex")=1 then%>selected<%end if%>>男</option>
                <option value="0"<%if rs("sex")=0 then%>selected<%end if%>>女</option>
              </select>
          </font></div></td>
        </tr>
        <tr class="tablebg<%=skin%>d">
          <td width="210" align="center"><div align="left"><strong>密码:</strong></div></td>
          <td height="28" colspan="2" align="center"><div align="left">
              <input name="password" type="password" class="input1" id="password3" value="<%=rs("password1")%>" size="15">
              <input name="password1" type="hidden" id="password1" value="<%=rs("password1")%>">
          </div></td>
        </tr>
        <tr class="tablebg<%=skin%>d">
          <td width="210" align="center"><div align="left"><strong>电子邮件:</strong></div></td>
          <td height="28" colspan="2" align="center"><div align="left"><font color="#00FF00">
              <input name="Email" type="text" class="input1" value="<%=rs("mail")%>" size="25">
          </font></div></td>
        </tr>
        <tr class="tablebg<%=skin%>d">
          <td width="210" align="center"><div align="left"><strong>个人主页:</strong></div></td>
          <td height="28" colspan="2" align="center"><div align="left"><font color="#00FF00">
              <input type="text" name="HomePage" size="25" Value="<%=rs("homepage")%>" class="input1">
          </font></div></td>
        </tr>
        <tr class="tablebg<%=skin%>d">
          <td width="210" align="center"><div align="left"><strong>QQ:</strong></div></td>
          <td height="28" colspan="2" align="center"><div align="left"><font color="#00FF00">
              <input name="QQ" type="text" class="input1" id="QQ3" value="<%=rs("qq")%>" size="30">
          </font></div></td>
        </tr>
        <tr class="tablebg<%=skin%>d">
          <td width="210" align="center"><div align="left"><strong>头像:</strong></div></td>
          <td height="28" colspan="2" align="center" valign="top"><div align="left">
              <table width="100%"  border="0">
                <tr>
                  <td width="9%"><select name="face" size="1" id="select2" onChange="document.all.idface.src=options[selectedIndex].value;">
				  <%for i=1 to 56%>
                    <option <%if rs("face")="face/"&i&".gif" then%>selected<%end if%> value="face/<%=i%>.gif"><%=i%></option>
					<%next%>
                  </select></td>
                  <td width="11%"><img src="<%if rs("myface")<>"" then response.write(rs("myface")) else response.write(rs("face"))%>" width="72" id=idface ></td>
                  <td width="80%"><a href="face.asp" target="_blank">点此查看全部头像预览</a></td>
                </tr>
              </table>
          </div></td>
        </tr>
        <tr class="tablebg<%=skin%>d">
          <td align="center"><div align="left"><strong>头像上传:</strong></div></td>
          <td width="219" height="28" align="center" valign="top"><div align="left"><font color="#00FF00">
            <input name="myface" type="text" class="input1" id="QQ3" value="<%=rs("myface")%>" size="30">
          </font></div></td>
          <td width="507" align="center" valign="top"><div align="left"><iframe style="top:2px" ID="UploadFiles" src="upload_Photo.asp?PhotoUrlID=0&id=<%=rs("id")%>" frameborder=0 scrolling=no width="320" height="25"></iframe>
              <br>
              宽:
              <input name="facewidth" type="text" id="facewidth" value="<%=rs("facewidth")%>" size="5">
(1-130) 高:
<input name="faceheight" type="text" id="faceheight" value="<%=rs("faceheight")%>" size="5">
(1-130)</div></td>
        </tr>
        <tr class="tablebg<%=skin%>d">
          <td align="center"><div align="left"><strong>头衔:</strong></div></td>
          <td height="28" colspan="2" align="center" valign="top"><div align="left"><font color="#00FF00">
            <input name="level" type="text" class="input1" id="level2" Value="<%=rs("level1")%>" size="15" <%if (rs("level1")="管理员") or (rs("level1")="版主") or (rs("level1")="嘉宾") then response.Write("disabled")%>>
          </font></div></td>
        </tr>
        <tr class="tablebg<%=skin%>d">
          <td align="center"><div align="left"><strong>发言数:</strong></div></td>
          <td height="28" colspan="2" align="center" valign="top"><div align="left"><font color="#00FF00">
            <input name="count" type="text" class="input1" id="count2" Value="<%=rs("count1")%>" size="10">
            <input name="id" type="hidden" id="id2" value="<%=request("id")%>">
          </font></div></td>
        </tr>
        <tr class="tablebg<%=skin%>d">
          <td height="28" colspan="3" align="center"><input name="join" type="submit" class="input2" id="join3" value=" 提 交 " >
 
  <input name="B12" type="reset" class="input2" id="B123"  value=" 重 写 "  >
(Ctrl+Enter提交)</td>
        </tr>
      </table>
    </form>
  </CENTER></DIV>

      <%  
	  set guest=nothing 
      set rs = nothing%>

      <!--#INCLUDE FILE="bottom.asp"-->
  </tr>
</table>
</body>                  
                  
</html>                  

⌨️ 快捷键说明

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