lostpass.asp

来自「我们的课程设计是一个工资管理系统」· ASP 代码 · 共 58 行

ASP
58 行
字号 
<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>管理中心</title>
<link href="../main.css" rel="stylesheet" type="text/css">
</head>
<body>
<%  dim founderr,errmsg
	dim name,answer,password
	
	if founderr then
		call error()
	else
		if request("action")="step1" then
			call step1()
		elseif request("action")="step2" then
			call step2()
		elseif request("action")="step3" then
			call step3()
		else
			call main()
		end if
	end if
	

sub step1()
	if request("username")="" then
		Founderr=true
		Errmsg=Errmsg+"<br>"+"<li>请输入您的用户名。"
		exit sub
	else
		name=replace(request("name"),"'","")
	end if
	sql = "Select * from 员工信息 where 员工编号='"&name&"'"
	set rs = Server.CreateObject("adodb.recordset")
	rs.open sql,conn,1,1
	if rs.eof and rs.bof then
		Founderr=true
		Errmsg=Errmsg+"<br>"+"<li>您输入的用户名并不存在，请重新输入。"
	else
		if rs("question")="" then
		Founderr=true
		Errmsg=Errmsg+"<br>"+"<li>该用户没有填写密码问题及答案，只有填写的用户方能继续。"
		else
%>
<form action="lostpass.asp?action=step2" method="post"> 
<table cellpadding=0 cellspacing=0 border=0 width="450"  align=center>
    <tr>    
        <td>
        <table cellpadding=6 cellspacing=1 border=0 width=100%>

    <tr>
    <td  valign=middle colspan=2 align=center>
    <b>取回密码</b>（第二步：回答问题）</td></tr>
    <tr>
    <td  valign=middle><b>问

lostpass.asp - 源码说明

本页面展示了「我们的课程设计是一个工资管理系统」中的 lostpass.asp 源码文件，采用 ASP 编程语言编写，共 58 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

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

⌨️ 快捷键说明

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