📄 lostpw.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="config.asp"-->
<%
sel=Request.QueryString ("sel")
if sel="" then sel=1
select case sel
case 1
%>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
RS.open "select [domain] from [domain] where noreg=0 order by top asc",Conn,1,1
while not rs.eof
for i= 0 to rs.fields.count-1
msg=msg&"<option value="& rs.fields(i).value &">"&rs.fields(i).value&"</option>"
next
rs.movenext
wend
%>
<HTML><HEAD><TITLE>重发密码</TITLE><META http-equiv=Content-Language content=zh-cn>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<STYLE>.input1 {
BORDER-RIGHT: #000000 1px solid; BORDER-TOP: #000000 1px solid; FONT-SIZE: 12px; BACKGROUND: #666666; BORDER-LEFT: #000000 1px solid; COLOR: #f6e700; BORDER-BOTTOM: #000000 1px solid; HEIGHT: 16px
}
A {
COLOR: #ffffff; TEXT-DECORATION: underline
}
TD {
FONT-SIZE: 12px; COLOR: #000000; WORD-BREAK: break-all
}
A:link {
COLOR: #000000; TEXT-DECORATION: none
}
A:visited {
COLOR: #000000; TEXT-DECORATION: none
}
A:hover {
COLOR: #ffffff; TEXT-DECORATION: underline
}
A:active {
TEXT-DECORATION: none
}
A.menu {
COLOR: #ffffff
}
A.menu:visited {
COLOR: #ffffff
}
A.menu:hover {
COLOR: #ccff00
}
.en {
FONT-SIZE: 11px; FONT-FAMILY: verdana
}
SELECT {
FONT-SIZE: 12px; COLOR: #000000
}
.input2 {
BORDER-TOP-WIDTH: 1px; BORDER-LEFT-WIDTH: 1px; FONT-SIZE: 12px; BORDER-BOTTOM-WIDTH: 1px; HEIGHT: 18px; BACKGROUND-COLOR: #cccccc; BORDER-RIGHT-WIDTH: 1px
}
.Ftable {
BORDER-RIGHT: #66ccff 1px solid; BORDER-TOP: #66ccff 1px solid; FONT-SIZE: 12px; BORDER-LEFT: #66ccff 1px solid; BORDER-BOTTOM: #000000 1px solid; HEIGHT: 18px; BACKGROUND-COLOR: #66ccff
}
</STYLE>
<META content="Microsoft FrontPage 5.0" name=GENERATOR></HEAD><BODY bgColor=#e1e1e1 topMargin=60><DIV align=center><CENTER><form name="form1" method="post" action="lostpw.asp?sel=2"><table class=ttbb
style="BORDER-RIGHT: 1px dotted; BORDER-TOP: 1px dotted; BORDER-LEFT: 1px dotted; BORDER-BOTTOM: 1px dotted; BORDER-COLLAPSE: collapse"
bordercolor=#111111 height=244 cellspacing=0 cellpadding=0 width=569 border=0>
<tbody><tr>
<td style="" width=569 bgcolor=#ffffff colspan=2
height=45>
<img border="0" src="images/25999.gif"></td>
</tr><tr><td width=569 bgcolor=#0374b8 colspan=2 height=24><script src=js/menu.js></script></td></tr><tr><td valign=top width=71 bgcolor=#66ccff height=194 rowspan=2><p align=center><img height=234 src="images/lost.gif" width=52
border=0></p>
</td><td class=en width=496 background=images/bg.gif bgcolor=#66ccff
height=220 valign="top">
<p><font color=#ffffff size=4><b>重发密码::::....</b></font> </p><p>账号：http://
<input type="text" class="input2" name="username" size="12" maxlength="20">.
<select class="input2" name="seldomain"><%=msg%>
</select> <input type="submit" class="input2" name="Submit" value=" 发送密码 "><br></p></td></tr><tr><td align=right bgcolor=#66ccff height=14><img height=20
src="images/bottomr.gif" width=20
border=0></td>
</tr></tbody></table></form></CENTER></DIV><script src=js/foot.js></script></BODY></HTML><%
case 2
username=trim(Request.Form ("username"))
if username="" then Response.Redirect "lostpw.asp"
username=CStr(Replace(username,chr(13)&chr(10),""))
seldomain=trim(Request.Form ("seldomain"))
if server.HTMLEncode(username)<>username or InStr(username,"【")<>0 or InStr(username,"】")<>0 or InStr(username," ")<>0 or InStr(username," ")<>0 or InStr(username,"⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -