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

📄 reg.asp

📁 我们学校毕业设计的文件.我的题目是 ASP.net校友录系统 里面包括我的毕业论文1套和代码源程序
💻 ASP
字号:
🔍 
<%
add=request("add")
user0=request("user")
admuser=request("admuser")
if admuser="" then admuser="您的名字"
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

if add="add" then
ok="yes"
  user=request.form("user")
  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="" or 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 rs.eof and user<>"" and ok="yes" and mail<>"" and url<>"" and pass1<>"" then
  Set rs=Server.CreateObject("ADODB.RecordSet")
  rs.open "Select * From user",Conn,2,3  
     rs.addnew
     rs("user")=user
     rs("mail")=mail
     rs("url")=url
     rs("pass")=pass1
     rs("time")=now()
     rs("sm")=0
     rs("bm")=bm
     rs("wenti")=wenti
     rs("daan")=daan
     rs("logo")=logo
     rs.update
     rs.close
     set rs=nothing
     conn.close
     set conn=nothing
     if pass1<>"" then session("root")=pass1
     response.redirect "index.asp?user="&user&""
  end if
  end if
  end if
  end if
  end if
  end if
  end if
  end if
	if logo="" or isnull(logo) then logo="images/girl.gif"
%>
<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 bgcolor="#FFFFFF" oncontextmenu="return false" ondragstart="return false">
<div align="center">
  <center>
    <img src="images/dia-b-title.gif" width="398" height="200"> <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="reg.asp?user=<%=user0%>">
                  <input name=add value="add" type=hidden>
                  <font size="2">泥</font><font size="2">的名字： 
                  <input type="text" name="user" size="10" value=<%=request("admuser")%>>
                  </font> 
                  <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">的主页： 
                    <input type="text" name="url" size="40">
                    </font></p>
                  <p><font size="2">泥</font><font size="2">的邮箱： 
                    <input type="text" name="mail" size="20" value="">
                    </font></p>
                  <p><font size="2">是否公开： 
                    <select name="bm">
                      <option value="1" selected>公开</option>
                      <option value="0">不公开</option>
                    </select>
                    </font></p>
                  <p><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=>
                    </font></p>
                  <p><font size="2">问题答案： 
                    <input type="password" name="daan" size="20" value=>
                    </font></p>
                  <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='index.asp?user=<%=user0%>'" style='cursor:hand;'>
                  <br>
                  </form>
                <div align="center"><font size="2">您申请成功后得到的日记本地址是<br>
                  <%
        url=request.ServerVariables("SERVER_NAME")&request.ServerVariables("SCRIPT_NAME")
        url=left(url,len(url)-7)
        %>
                  http://<%=url%>index.asp?user=<%=admuser%></font> </div>
              </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>
    <!--#include file="copy.asp"-->
    
  </center>
</div>

<NOSCRIPT><IFRAME SRC=reg.asp></IFRAME></NOSCRIPT> 
</body>

</html>

⌨️ 快捷键说明

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