📄 password3.asp

📁 网上新闻调查发布系统

💻 ASP

字号:

<HTML>
<HEAD>
<TITLE>取回密码结果</TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<style type="text/css">
<!--
body {
	background-image: url(../images/bg.gif);
}
body,td,th {
	font-size: 12px;
}
.style1 {color: #FF0000}
a:link {
	text-decoration: none;
	color: #FF0000;
}
a:visited {
	text-decoration: none;
	color: #FF0000;
}
a:hover {
	text-decoration: underline;
	color: #000000;
}
a:active {
	text-decoration: none;
	color: #000000;
}
-->
</style></HEAD>
<BODY BGCOLOR=#FFFFFF LEFTMARGIN=0 TOPMARGIN=0 MARGINWIDTH=0 MARGINHEIGHT=0>
<!-- ImageReady Slices (未标题-1) -->
<TABLE WIDTH=300 BORDER=0 CELLPADDING=0 CELLSPACING=0>
	<TR>
		<TD><img src="../images/password.gif" width="500" height="50"></TD>
	</TR>
	<TR>
	  <TD height="47" align="center"><div align="center">
	    <p>密码找回处理结果</p>
      </div></TD>
  </TR>
	<TR>
	  <TD height="42"><div align="center"><span class="style1">
	    <!--#include file="myzb.asp" -->
        <%
Dim Recordset1
Dim Recordset1_numRows


Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_myzb_STRING
Recordset1.Source = "SELECT * FROM usero where dengluming='"&Request("name")&"'and mimahuida='"&Request("hd")&"'"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()
if Recordset1.eof then
  response.write ("<a href="&"javascript:history.go(-1)"&">"&"您刚才的回答不正确请按此返回重新回答."&"</a>"&"</p>") 
  response.write ("<a href="&"http://888.zbinfo.net/guestbook/index.asp target="&"_blank"&""&">"&"如果您需要管理员的帮助请按此留言."&"</a>")
  else 
  while not Recordset1.eof 
response.write("您的密码为:")&(Recordset1("mima")&" 请您妥善保管"&"<p>")
Recordset1.movenext
  wend
end if


%>
      </span></div>												</TD>
  </TR>
</TABLE>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -