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

📄 edit_user.asp

📁 流溪网络办公系统:管理员: 用户名:admin 密码:
💻 ASP
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<!--#include file="connsf.asp" -->
<!--#include file="md5.inc" -->
<!--#include file="checkstr.asp" -->
<!--#include file="config.asp" -->
<%'检验用户
user=checkstr(session("user"))
pass1=ucase(md5(session("pass")))
str="select 姓名,能否发送 from user_teacher where 用户名='"&user&"' and 密码='"&pass1&"'"
set rs=conn.execute(str)
if rs.eof then
    response.redirect("user_login.asp")
else
    user_name=rs("姓名")
	sendyesno=rs("能否发送")
end if
rs.close
%>
<%doing=Trim(Request.QueryString("doing"))%>

<%'修改基本资料
if doing="edit_basic" then
    sex=Trim(Request.Form("sex"))
	address=Trim(Request.Form("address"))
	  address=checkstr(address)
	  if address="" then address=" "
	postadd=Trim(Request.Form("postadd"))
	  postadd=checkstr(postadd)
	  if postadd="" then postadd=" "
	photno=Trim(Request.Form("photno"))
	  photno=checkstr(photno)
	  if photno="" then photno=" "
	
	sql="select * from user_teacher where 用户名='"&user&"' and 密码='"&pass1&"'"
          rs.open sql,conn,2,3
	      rs("性别")=sex
	      rs("家庭地址")=address
	      rs("邮政编码")=postadd
		  rs("电话")=photno
          rs.update
          rs.close
		  
end if
%>
<%'修改用户密码
if doing="edit_pass" then
   old_pass=Trim(Request.Form("old_pass"))
   if old_pass<>session("pass") then
       msg="输入原密码错!"
   else
      new_pass=Trim(Request.Form("new_pass1"))
	  new_pass1=ucase(md5(new_pass))
	  	sql="select * from user_teacher where 用户名='"&user&"' and 密码='"&pass1&"'"
          rs.open sql,conn,2,3
	         rs("密码")=new_pass1
          rs.update
          rs.close
		  session("pass")=new_pass
		  pass1=ucase(md5(session("pass")))
   end if
end if
%>
<%'修改用户所处职务部门
if doing="edit_zwbm" then
  new_bumen=Trim(Request.Form("new_bumen"))
  new_zhiwu=Trim(Request.Form("new_zhiwu"))
    new_zhiwu=replace(new_zhiwu," ","")
	new_zhiwu=replace(new_zhiwu,",","|")
	new_zhiwu="|"&new_zhiwu&"|"

	  	sql="select * from user_teacher where 用户名='"&user&"' and 密码='"&pass1&"'"
          rs.open sql,conn,2,3
	         rs("职务")=new_zhiwu
			 rs("部门")=new_bumen
          rs.update
          rs.close
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>修改个人资料</title>
<!--#include file="css.css" -->

<script LANGUAGE="javascript">
<!--
function editpass_onsubmit() {
var i, n;
if (document.editpass.new_pass1.value=="")
	{
	  alert("对不起,请输入新密码!")
	  document.editpass.new_pass1.focus()
	  return false
	 }
else if (document.editpass.new_pass1.value.length < 5)
	{
	  alert("对不起,新密码须不少于6位!")
	  document.editpass.new_pass2.focus()
	  return false
	 }
else if (document.editpass.new_pass1.value.length > 20)
	{
	  alert("对不起,新密码须不多于20位!")
	  document.editpass.new_pass1.focus()
	  return false
	 }
else if (document.editpass.new_pass1.value != document.editpass.new_pass2.value)
	{
	  alert("对不起,二次密码不一致!")
	  document.editpass.new_pass2.focus()
	  return false
	 }
}

//Function to open pop up window
function openWin(theURL,winName,features) {
  	window.open(theURL,winName,features);
}
//-->
</script>

</head>

<body topmargin="1"  oncontextmenu="return false">
<div align="center">
  <table width="760" border="0" cellpadding="0" cellspacing="0" class="tabletblg">
    <tr>
      <td><!--#include file="top.asp" --></td>
    </tr>
  </table>
  <table width="760" border="0" cellpadding="0" cellspacing="0" class="tablelrb">
    <tr>
      <td class="fontsize04"> </td>
    </tr>
  </table>
  <table width="760" border="0" cellpadding="0" cellspacing="0" class="tablelrb">
    <tr>
      <td height="30" bgcolor="#6699FF">   
<!--#include file="menu.asp" -->
      </td>
    </tr>
  </table>
  <table width="760" border="0" cellpadding="0" cellspacing="0" class="tablelrb">
    <tr>
      <td class="fontsize04"> </td>
    </tr>
  </table>
  <table width="760" border="0" cellpadding="0" cellspacing="0" bgcolor="#6699FF" class="tablelrb">
    <tr>
      <td height="30" class="fontsize14">  <%=user_name%>,你好!欢迎使用留溪网上传文系统。  现在可以修改你的个人资料。</td>
    </tr>
  </table>
  <table width="760" border="0" cellpadding="0" cellspacing="0" class="tablelrb">
    <tr>
      <td class="fontsize04"> </td>
    </tr>
  </table>
  <table width="760" border="0" cellpadding="0" cellspacing="0" class="tablelrb">
    <tr>
      <td bgcolor="#6699FF"><table width="600" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td class="fontsize10"> </td>
          </tr>
        </table> 
<%str="select * from user_teacher where 用户名='"&user&"'"
set rs=conn.execute(str)%>
        <table width="750" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td><form name="form1" method="post" action="edit_user.asp?doing=edit_basic">
                <table width="740"  border="1" align="center" cellpadding="2" cellspacing="0" borderColorLight="#000000" borderColorDark="#ffffff" bgcolor="#99CCFF">
                  <tr> 
                    <td width="60" rowspan="7" class="fontsize14"><div align="center" class="fontsize14h20">修<br>
                        改<br>
                        用<br>
                        户<br>
                        基<br>
                        本<br>
                        资<br>
                        料</div></td>
                    <td width="260" height="26" class="fontsize14"> 
                      <div align="center">用 户 名:</div></td>
                    <td width="420" class="fontsize12wu"><%=user%></td>
                  </tr>
                  <tr> 
                    <td width="260" height="26" class="fontsize14"> 
                      <div align="center">用户姓名:</div></td>
                    <td width="420" class="fontsize12wu"><%=user_name%></td>
                  </tr>
                  <tr> 
                    <td width="260" height="26" class="fontsize14"> 
                      <div align="center">用户性别:</div></td>
                    <td width="420" class="fontsize14"><select name="sex" class="inputtext" id="sex">
                        <option value="男" <%if rs("性别")="男" then%>selected<%end if%>>男</option>
                        <option value="女" <%if rs("性别")="女" then%>selected<%end if%>>女</option>
                      </select></td>
                  </tr>
                  <tr> 
                    <td width="260" height="26" class="fontsize14"> 
                      <div align="center">用户地址:</div></td>
                    <td width="420" class="fontsize12wu"><input name="address" type="text" class="inputtext" id="address" value="<%=rs("家庭地址")%>" size="50"></td>
                  </tr>
                  <tr> 
                    <td width="260" height="26" class="fontsize14"> 
                      <div align="center">邮政编码:</div></td>
                    <td width="420" class="fontsize12wu"><input name="postadd" type="text" class="inputtext" id="postadd" value="<%=rs("邮政编码")%>"></td>
                  </tr>
                  <tr> 
                    <td width="260" height="26" class="fontsize14"> 
                      <div align="center">电话号码:</div></td>
                    <td width="420" class="fontsize12wu"><input name="photno" type="text" class="inputtext" id="photno" value="<%=rs("电话")%>"></td>
                  </tr>
                  <tr> 
                    <td height="34" colspan="2" class="fontsize14">
<div align="center"> 
                        <input name="Submit" type="submit" class="inputbox" value=" 修 改 ">
                               
                        <input name="Submit2" type="reset" class="inputbox" value=" 重 置 ">
                      </div></td>
                  </tr>
                </table>
              </td></form>
          </tr>
        </table>
        <table width="600" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td class="fontsize10"> </td>
          </tr>
        </table>
        <table width="750" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td>
<form name="editpass" LANGUAGE="javascript" onsubmit="return editpass_onsubmit()" method="post" action="edit_user.asp?doing=edit_pass">
                <table width="740"  border="1" align="center" cellpadding="2" cellspacing="0" borderColorLight="#000000" borderColorDark="#ffffff" bgcolor="#99CCFF">
                  <tr> 
                    <td width="60" rowspan="4" class="fontsize14"><div align="center" class="fontsize14h20">修<br>
                        改<br>
                        密<br>
                        码</div></td>
                    <td width="260" height="26" class="fontsize14"> <div align="center">原来密码:</div></td>
                    <td width="420" class="fontsize12wu"><input name="old_pass" type="password" class="inputtext" id="old_pass"></td>
                  </tr>
                  <tr> 
                    <td width="260" height="26" class="fontsize14"> <div align="center">新设密码:</div></td>
                    <td width="420" class="fontsize12wu"><input name="new_pass1" type="password" class="inputtext" id="new_pass1"></td>
                  </tr>
                  <tr> 
                    <td width="260" height="26" class="fontsize14"> <div align="center">验证密码:</div></td>
                    <td width="420" class="fontsize12wu"><input name="new_pass2" type="password" class="inputtext" id="new_pass2"></td>
                  </tr>
                  <tr> 
                    <td height="34" colspan="2" class="fontsize14"> <div align="center"> 
                        <input name="Submit3" type="submit" class="inputbox" value=" 修 改 ">
                               
                        <input name="Submit22" type="reset" class="inputbox" value=" 重 置 ">
                      </div></td>
                  </tr>
		<%if msg<>"" then%>
                  <tr> 
                    <td height="24" colspan="3" class="fontsize14"><div align="center"><strong><font color="#FF0000"><%=msg%></font></strong></div></td>
                  </tr>
		<%end if%>
                </table>
              </td></form>
          </tr>
        </table>
        <table width="600" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td class="fontsize10"> </td>
          </tr>
        </table>
        <table width="750" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td><form name="form2" method="post" action="edit_user.asp?doing=edit_zwbm">
                <table width="740"  border="1" align="center" cellpadding="2" cellspacing="0" borderColorLight="#000000" borderColorDark="#ffffff" bgcolor="#99CCFF">
                  <tr> 
                    <td width="60" rowspan="3" class="fontsize14"><div align="center" class="fontsize14h20">修改<br>
                        职务<br>
                        部门 </div></td>
                    <td width="180" height="26" class="fontsize14"> <div align="center">选择部门:</div></td>
                    <td width="500" class="fontsize12wu"><select name="new_bumen" class="inputtext" id="new_bumen">
                        <%str="select * from woa_bumeng"
  set rs1=conn.execute(str)
  if not rs1.eof then
  do while not rs1.eof%>
                        <option value="<%=rs1("部门")%>" <%if rs("部门")=rs1("部门") then%>selected<%end if%>><%=rs1("部门")%></option>
                        <%rs1.movenext
  loop
  end if
  rs1.close%>
                      </select></td>
                  </tr>
                  <tr> 
                    <td width="180" height="26" valign="top" class="fontsize14"> 
                      <div align="center">
                        <p class="fontsize14h20">选择职务:</p>
                      </div></td>
                    <td width="500" class="fontsize12wu"><table width="100%" border="0" cellspacing="0" cellpadding="2">
                        <tr> 
<%str="select * from woa_zhuwu"
  set rs1=conn.execute(str)
  if not rs1.eof then
  m=0
  do while not rs1.eof%>
                          <td width="25%"><input name="new_zhiwu" type="checkbox" id="new_zhiwu" value="<%=rs1("职务")%>" <%if instr(rs("职务"),"|"&rs1("职务")&"|")>0 then%>checked<%end if%>> 
                            <span class="fontsize12"><%=rs1("职务")%></span></td>
<%rs1.movenext
  m=m+1
      if m mod 4=0 then response.write "</tr><tr>"
  loop
  end if
  rs1.close%>
                        </tr>
                      </table></td>
                  </tr>
                  <tr> 
                    <td height="34" colspan="2" class="fontsize14"> <div align="center"> 
                        <input name="Submit32" type="submit" class="inputbox" value=" 修 改 ">
                               
                        <input name="Submit222" type="reset" class="inputbox" value=" 重 置 ">
                      </div></td>
                  </tr>
                </table>
            </td></form>
          </tr>
        </table>
        <table width="600" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td class="fontsize10">  </td>
          </tr>
        </table> </td>
    </tr>
  </table>
  <table width="760" border="0" cellpadding="0" cellspacing="0" class="tablelr">
    <tr>
      <td class="fontsize04"> </td>
    </tr>
  </table>
  <table width="760" border="0" cellspacing="0" cellpadding="0">
    <tr>
<%rs.close%>
      <td><!--#include file="bottom.asp" --></td>
    </tr>
  </table>
</div>
</body>
</html>

⌨️ 快捷键说明

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