getpws1.asp

来自「校园二手交易系统,具有完备的后台操作以及应用功能!」· ASP 代码 · 共 56 行

ASP
56
字号
<!--#include file="top.asp"-->
   
	

		<!--#include file="Inc/msgbox.asp"-->
<%
'****************************************************
' 多多校园电子商务工作室        Power by ddtaobao.com
' Email:kayvin@sohu.com    OICQ:6334278     站长:小羽
' Web: http://www.ddtaobao.com    淘宝旺旺:qq63334278
' Copyright (C) 2006 ddtaobao.com All Rights Reserved
'****************************************************
Dim strsql,rs,user_name
user_name=request.Form("user_name")
strsql="select user_question from [dduser] where user_name='"& user_name &"'"
set rs=conn.execute(strsql)
if rs.bof or rs.eof then
  call msgbox("没有这个用户名","Back","")
  response.End()
end if
%>




<form name="form1" method="post" action="GetPws2.asp?user_name=<%=user_name%>">
      <table width="580" border="0" align="center" cellpadding="4" cellspacing="3" >
        <tr>
          <td width="101"><div align="right">密码问题:</div></td>
          <td width="372"><%=rs(0)%></td>
        </tr>
		<tr>
          <td width="101"><div align="right">输入答案:</div></td>
          <td width="372"><input name="user_answer" type="text" class="input2" id="user_answer"></td>
        </tr>
        <tr>
          <td> </td>
          <td><input type="submit" class=input name="Submit" value="提交">&nbsp;&nbsp;
			<input type="reset" class=input name="Submit1" value="重置"></td>
        </tr>
      </table>
    </form>
	


		<!--#include file="bottom.asp"-->
</div>

</body>

</html>

<%
conn.Close
Set conn=Nothing
%>

⌨️ 快捷键说明

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