📄 reg.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("classsky.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("classsky.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 4.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: #000000; TEXT-DECORATION: none }
A:visited {COLOR: #000000; TEXT-DECORATION: none}
A:active {COLOR: #ffffff; TEXT-DECORATION: none}
A:hover {COLOR: #000000; background-color: #E8FCD0}
td {FONT-SIZE: 9pt; FONT-FAMILY: "Verdana"; color:#3333333;letter-spacing : 1pt ;line-height : 150%}
</style>
</head>
<body bgcolor="#FFFFFF" oncontextmenu="return false" ondragstart="return false">
<div align="center">
<center>
<img src="images/title.gif" width="197" height="58"> <br>
<br>
<table class=td border="0" cellspacing="0" cellpadding="1" width="478">
<tr>
<td>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%">
<form method="POST" action="reg.asp?user=<%=user0%>">
</form>
<div align="center">
<table style="FILTER: alpha(opacity=72)" width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="4%"><img src="ta/t-ha8.gif" width="30" height="30"></td>
<td width="91%" height="30" background="ta/t-ha9.gif"> </td>
<td width="5%"><img src="ta/t-ha17.gif" width="30" height="30"></td>
</tr>
<tr>
<td background="ta/t-ha35.gif"> </td>
<td>
<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" value="http://classsky.com/">
</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.jpg" selected>-- 0 1 --</option>
<option value="back/02.jpg">-- 0 2 --</option>
<option value="back/03.jpg">-- 0 3 --</option>
<option value="back/04.jpg">-- 0 4 --</option>
<option value="back/05.jpg">-- 0 5 --</option>
<option value="back/06.jpg">-- 0 6 --</option>
<option value="back/07.jpg">-- 0 7 --</option>
<option value="back/08.jpg">-- 0 8 --</option>
<option value="back/09.jpg">-- 0 9 --</option>
<option value="back/10.jpg">-- 1 0 --</option>
<option value="back/11.jpg">-- 1 1 --</option>
<option value="back/12.jpg">-- 1 2 --</option>
<option value="back/13.jpg">-- 1 3 --</option>
<option value="back/14.jpg">-- 1 4 --</option>
<option value="back/15.jpg">-- 1 5 --</option>
<option value="back/16.jpg">-- 1 6 --</option>
<option value="back/17.jpg">-- 1 7 --</option>
<option value="back/18.jpg">-- 1 8 --</option>
<option value="back/19.jpg">-- 1 9 --</option>
<option value="back/20.jpg">-- 2 0 --</option>
<option value="back/21.jpg">-- 2 1 --</option>
<option value="back/22.jpg">-- 2 2 --</option>
<option value="back/23.jpg">-- 2 3 --</option>
<option value="back/24.jpg">-- 2 4 --</option>
<option value="back/25.jpg">-- 2 5 --</option>
</select>
</font>总共25张，<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>
<td background="ta/t-ha18.gif"></td>
</tr>
<tr>
<td><img src="ta/t-ha34.gif" width="30" height="30"></td>
<td height="30" background="ta/t-ha27.gif"> </td>
<td><img src="ta/t-ha26.gif" width="30" height="30"></td>
</tr>
</table>
</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
<br>
<br>
<table class=td2 width="50%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td nowrap align="center">免费服务由<a href="http://classsky.com/">|班级天空|</a>提供<font size="1">/
Skin By <a href="http://blueyr.com">Blueyr.Com</a></font><font size="1"><br>
<a href="http://classsky.com/" target="_blank"><img src="images/copy.gif" width="305" height="5" border="0"></a>
</font></td>
</tr>
</table>
</center>
</div>
<NOSCRIPT><IFRAME SRC=reg.asp></IFRAME></NOSCRIPT>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -