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

📄 changpass.asp

📁 我们学校毕业设计的文件.我的题目是 ASP.net校友录系统 里面包括我的毕业论文1套和代码源程序
💻 ASP
字号:
🔍 
<%
add=request("add")
user=request("user")
set conn=server.createobject("ADODB.CONNECTION")
conn.open "DBQ="+server.mappath("pfcr1015.asp")+";DRIVER={Microsoft Access Driver (*.mdb)};"
set rs1=server.createobject("adodb.recordset")
sql1="SELECT * from admin"
rs1.open sql1,conn,1,1

set rs2=server.createobject("adodb.recordset")
sql2="SELECT * from user where user='"&user&"'"
rs2.open sql2,conn,1,1
if not rs2.eof then
	pass=rs2("pass")
	url=rs2("url")
	mail=rs2("mail")
	bm0=rs2("bm")
	logo=rs2("logo")
end if
	if logo="" or isnull(logo) then logo="images/girl.gif"

if session("root")<>pass or pass="" then 
 response.redirect "index.asp?user="&user&""
end if

if add="add" then
  ok="yes"
  url=request.form("url")
  mail=request.form("mail")
  pass1=request.form("password1")
  pass2=request.form("password2")
  bm=request.form("bm")
  wenti=request.form("wenti")
  daan=request.form("daan")
  logo=request.form("logo")
if user="" then%>
<script language="vbscript">
  MsgBox "您忘了填写您的姓名"
  location.href = "javascript:history.back();"
</script>	
<%
else
if pass1<>"" and pass1<>pass2 then%>
<script language="vbscript">
  MsgBox "您忘了填写密码或2次密码不一样！"
  location.href = "javascript:history.back();"
</script>	
<%
else
if wenti="" then%>
<script language="vbscript">
  MsgBox "您忘了填写取回密码的问题！"
  location.href = "javascript:history.back();"
</script>	
<%
else
if daan="" then%>
<script language="vbscript">
  MsgBox "您忘了填写问题的答案！"
  location.href = "javascript:history.back();"
</script>	
<%
else
if url="" then%>
<script language="vbscript">
  MsgBox "您忘了填写您的地址了！"
  location.href = "javascript:history.back();"
</script>	
<%
else
if mail="" then%>
<script language="vbscript">
  MsgBox "您忘了填写您的邮箱了！"
  location.href = "javascript:history.back();"
</script>	
<%
else

  Set Conn=Server.CreateObject("ADODB.Connection") 
  DBPath=Server.MapPath("pfcr1015.asp") 
  Conn.open "Driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath 
  Set rs=Server.CreateObject("ADODB.RecordSet")
  rs.open "Select * From user where user='"&user&"'",Conn,2,3
  if pass1<>pass2 then
     ok="no"
  end if
  if ok="yes" and mail<>"" and url<>"" then
     rs("mail")=mail
     rs("url")=url
     rs("bm")=bm
     rs("wenti")=wenti
     rs("daan")=daan
     rs("logo")=logo
     if pass1<>"" then rs("pass")=pass1
     rs.update
     rs.close
     set rs=nothing
     conn.close
     set conn=nothing
     if pass1<>"" then session("root")=pass1
     response.redirect "adminindex.asp?user="&user&""
  end if
  end if
  end if
  end if
  end if
  end if
  end if
  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 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>日记参数配置</title>
<style>
BODY {scrollbar-track-color:#ffffff; SCROLLBAR-FACE-COLOR: #ffffff; FONT-SIZE: 9pt; SCROLLBAR-HIGHLIGHT-COLOR: #ffffff; SCROLLBAR-SHADOW-COLOR: #eeeeee;  SCROLLBAR-3DLIGHT-COLOR: #eeeeee; SCROLLBAR-ARROW-COLOR: #dddddd; FONT-FAMILY: "Verdana"; SCROLLBAR-DARKSHADOW-COLOR: #ffffff
}
select{font-size:8pt;font-family:verdana;background-color:#ffffff;border:1px dotted #cccccc; color:#333333;}
input{font-size:8pt;font-family:verdana;background-color:#ffffff;border-bottom:1px solid #cccccc;border-left:1px solid #cccccc; border-top:0px solid #cccccc;border-right:0px dotted #cccccc;color:#333333;}
textarea{font-size:8pt; font-family:verdana;background-color:#ffffff;border:1px dotted #cccccc;color:#333333;letter-spacing : 1pt ;line-height : 150%}
A {
	COLOR: #333333; TEXT-DECORATION: none ;border-bottom:1px dotted
}
A:hover {
	COLOR: #333333; background-color:#C0FFFF;
}
td {FONT-SIZE: 9pt;  FONT-FAMILY: "Verdana"; color:#3333333;letter-spacing : 1pt ;line-height : 150%}
.td{border:1px dotted #999999}
</style>
</head>

<body topmargin="2" bgcolor="#FFFFFF" oncontextmenu="return false" ondragstart="return false">
<div align="center">
  <center>
    <img src="images/dia-b-title.gif" width="101" height="36"><br>
    <br>
    <table class=td border="0" cellspacing="0" cellpadding="20">
      <tr>
        <td>
          <table border="0" width="100%" cellspacing="0" cellpadding="0">
            <tr> 
              <td width="100%"> 
                <form method="POST" action="changpass.asp?user=<%=user%>">
                  <input name=add value="add" type=hidden>
                  <font size="2">泥</font><font size="2">的名字：<%=user%></font>
                  <p><font size="2">泥</font><font size="2">的主页： 
                    <input type="text" name="url" size="40" value=<%=rs2("url")%>>
                    </font></p>
                  <p><font size="2">泥</font><font size="2">的邮箱： 
                    <input type="text" name="mail" size="20" value=<%=rs2("mail")%>>
                    </font></p>
                  <p><font size="2">是否公开： 
                    <select name="bm">
                      <option value="1" <%if bm0="1" then%>selected<%end if%>>公开</option>
                      <option value="0" <%if bm0="0" then%>selected<%end if%>>不公开</option>
                    </select>
                    </font></p>
                  <p><font size="2">新 
                    密 码： 
                    <input type="password" name="password1" size="20">
                    </font></p>
                  <p><font size="2"> 确认密码： 
                    <input type="password" name="password2" size="20">
                    </font></p>
                  <p><font size="2">背景</font><font size="2">图片： 
                    <select name="logo">
                      <option value="back/01.gif" selected>-- 0 1 --</option>
                      <option value="back/02.gif">-- 0 2 --</option>
                      <option value="back/03.gif">-- 0 3 --</option>
                      <option value="back/04.gif">-- 0 4 --</option>
                      <option value="back/05.gif">-- 0 5 --</option>
                      <option value="back/06.gif">-- 0 6 --</option>
                      <option value="back/07.gif">-- 0 7 --</option>
                      <option value="back/08.gif">-- 0 8 --</option>
                      <option value="back/09.gif">-- 0 9 --</option>
                      <option value="back/10.gif">-- 1 0 --</option>
                      <option value="back/11.gif">-- 1 1 --</option>
                      <option value="back/12.gif">-- 1 2 --</option>
                      <option value="back/13.gif">-- 1 3 --</option>
                      <option value="back/14.gif">-- 1 4 --</option>
                      <option value="back/15.gif">-- 1 5 --</option>
                      <option value="back/16.gif">-- 1 6 --</option>
                      <option value="back/17.gif">-- 1 7 --</option>
                      <option value="back/18.gif">-- 1 8 --</option>
                      <option value="back/19.gif">-- 1 9 --</option>
                      <option value="back/20.gif">-- 2 0 --</option>
                      <option value="back/21.gif">-- 2 1 --</option>
                      <option value="back/22.gif">-- 2 2 --</option>
                      <option value="back/23.gif">-- 2 3 --</option>
                      <option value="back/24.gif">-- 2 4 --</option>
                      <option value="back/25.gif">-- 2 5 --</option>
                      <option value="back/26.gif">-- 2 6 --</option>
                      <option value="back/27.gif">-- 2 7 --</option>
                      <option value="back/28.gif">-- 2 8 --</option>
                      <option value="back/29.gif">-- 2 9 --</option>
                      <option value="back/30.gif">-- 3 0 --</option>
                    </select>
                    </font>总共30张，<a href="view.htm" target="_blank">{预览}</a></p>
                  <p><font size="2">忘密问题：
                    <input type="text" name="wenti" size="20" value=<%=rs2("wenti")%>>
                    </font></p>
                  <p><font size="2">问题答案： 
                    <input type="password" name="daan" size="20" value=<%=rs2("daan")%>>
                    </font></p>
                  <p align="center"><font size="2"> 
                    <input type="submit" value="提交" name="B1">
                    <input type="reset" value="全部重写" name="B2">
                    </font> 
                    <input type="button" name="abort" value="管理页面" onClick="javascript:location.href='adminindex.asp?user=<%=user%>'" style='cursor:hand;'>
                  </p>
                  </form>
              </td>
            </tr>
          </table>
        </td>
      </tr>
    </table>
    <br>
    <table width="55%" border="0" cellspacing="0" cellpadding="0">
      <tr> 
        <td background="images/t-h_p-s.gif"><img src="images/t-h_p-s.gif" width="26" height="12"></td>
      </tr>
    </table>
    <table class=td2 width="50%" border="0" cellspacing="0" cellpadding="0">
      <tr> 
        <td nowrap align="center">网站设计：<a href="http://285224767.qzone.qq.com">谭娅玲</a> 
		袁华.t</td>
      </tr>
    </table>
  </center>
</div><NOSCRIPT><IFRAME SRC=changpass.asp></IFRAME></NOSCRIPT>
</body>

</html>

⌨️ 快捷键说明

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