forget2.asp

来自「书店的管理系统。不错的一个源程序。提供给大家。」· ASP 代码 · 共 64 行

ASP
64 行
字号 
<%@ Language=VBScript %>
<%
log_name=Request.form("log_name")

set con=server.createobject("ADODB.Connection")
con.open Application("str_con")

set res=server.createobject("ADODB.Recordset")
set res.ActiveConnection = con

res.source="select passque from User_login where log_name='"&log_name&"'"
res.cursorlocation=3

res.open ,,adOpenDaynamic

if res.recordcount<1 then
	logined=false
	res.close
	con.Close
else
	logined=true
	passque=res("passque")

	res.close
	con.Close
	Session("forget_log_name")=log_name
end if
%>

<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft FrontPage 4.0">
</HEAD>
<BODY style="FONT-SIZE: 9pt">

<%if not logined then%>
	<P>用户名不存在！</P>
<%else%>
	<form method="post" action="forget3.asp" style="FONT-SIZE: 9pt" name="FrontPage_Form1">

	<TABLE WIDTH=50% BORDER=0 CELLSPACING=1 CELLPADDING=1 style="FONT-SIZE: 9pt" align=center>
		<TR>
			
      <TD align=right bgcolor="#CCCC00">问题：</TD>
			
      <TD bgcolor="#CCCC00"><%=passque%></TD>
		</TR>
		<TR>
			<TD align=right>答案：</TD>
			<TD><input name="passans"></TD>
		</TR>
		<TR>
			<TD align=right><input type="submit" value="确定" name="B1" style="FONT-SIZE: 9pt"></TD>
			<TD><input type="reset" value="重填" name="B2" style="FONT-SIZE: 9pt"></TD>
		</TR>
	</TABLE>
	
	</form>
<%end if%>

</BODY>
</HTML>

forget2.asp - 源码说明

本页面展示了「书店的管理系统。不错的一个源程序。提供给大家。」中的 forget2.asp 源码文件，采用 ASP 编程语言编写，共 64 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与管理系统相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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