请教各位大侠一个问题

<!--#include file="up.asp"-->
<!--#include file="inc/md5.asp"-->
<%
dim menu,getpwd,name,question,sr,answer,newpwd,repwd,newname,sql
menu=request.querystring("menu")
select case menu
case""
%>
<form method=POST name=kbbs action="?menu=postname">
  <div align="center">重 设 密 码
  </div>
  <p style="margin: 10">请输入你的用户名: <input type="text" name="name" size="20"> <input type="submit" value=" 提   交 " name="B1"> <input type="reset" value=" 重   置 " name="B2">
</form>
<%
case"postname"
getpwd=true
name=Request.Form("name")
set rs=conn.execute("select question from [user] where name='"&name&"'")
if rs.eof then
mes="·该用户不存在·"
getpwd=false
else
question=rs("question")
set sr=conn.execute("select name from [admin] where name='"&name&"'")
if not sr.eof then
mes="该用户是管理员或版主,忘记密码请与管理员联系!"
getpwd=false
end if
set sr=nothing
end if
set rs=nothing
if getpwd=false then
%>
错 误 信 息
<%else%>
<form method="POST" action="?menu=get">回答问题<input type="hidden" name="name" size="20" value="<%=name%>">
<p style="margin: 6">提示问题:<%=kbbs(question)%></p><p style="margin: 6">问题回答:<input type="text" name="answer" size="20"></p><p style="margin: 6">
<input type="submit" value=" 提   交 " name="B1"> <input type="reset" value=" 重   置 " name="B2"></p> </form>
<%end if%>
<%case"get"
name=Request.Form("name")
answer=Request.Form("answer")

set rs=conn.execute("select name from [user] where name='"&name&"' and answer='"&answer&"'")
if rs.eof then
%>
<a href="javascript:history.go(-1)"> <img border="0" src="pic/re.gif"> 错 误 返 回</a>
<%else%>
<form method="POST" action="?menu=change">更 改 密 码<p style="margin: 6">
<input type="hidden" name="name" size="20" value="<%=name%>"><input type="hidden" name="answer" size="20" value="<%=answer%>">新 密 码:
    <input type="password" name="newpwd" size="20">
  </p><p style="margin: 6">
重复密码:
    <input type="password" name="repwd" size="20">
  </p><p style="margin: 6">
<input type="submit" value=" 提   交 " name="B1"> <input type="reset" value=" 重   置 " name="B2"></p></form>
<%
end if
set rs=nothing%>
<%case"change"
name=Request.Form("name")
answer=Request.Form("answer")
newpwd=Request.Form("newpwd")
repwd=Request.Form("repwd")

%>
错 误 信 息<p style="margin: 10">·你的密码含有非法字符·</p>
<%
if newpwd<>repwd then%>
错 误 信 息<p style="margin: 10">·你的重复密码与原密码不相同·</p>
<%
else
set rs=conn.execute("select userid from [user] where name='"&name&"' and answer='"&answer&"'")
if rs.eof then%>
错 误 信 息<p style="margin: 10">·非法操作·</p>
<%
else

conn.execute("update [user] set password='"&newpwd&"' where name='"&name&"'")

%>修 改 密 码<%=t2&d1%><p style="margin: 10">·你的密码已经修改,请<a href="login.asp">登陆</a>·</p>

<%
end if
set rs=nothing%>
<%
%>
<%
end if
end select%>
<!--#include file="copyright.asp"-->
Microsoft JET Database Engine (0x80040E14)
UPDATE 语句的语法错误。
/b2/bbs/bbs/getpwd.asp, 第 79 行
工地仓库管理系统(源码+数据库+毕业论文+开题+任务书+答辩ppt)java开发springboot框架javaweb,可做计算机毕业设计或课程设计 【功能需求】 本系统分为采购员、领料员、出库员、入库员、项目经理、管理员6个角色 采购员功能 采购员点击个人账户和输入密码登录系统,可以查看新材料申请详情以及进行材料采购操作,在采购页面输入具体的采购材料以及数量提交,可以在个人中心中修改个人资料。 领料员功能 领料员登录后,可以查看材料库存明细,进行领取申请,提交具体的申请单,以及提交新材料的领取申请,等待管理者的审核,还可以在个人中心进行个人资料信息的修改。 出库员功能 出库员登录后,可以查看材料库存明细,可以对领料员上传的领取申请进行审核处理,还可以提交材料处理申请至系统。 入库员功能 入库员登录后,可以查看材料库存明细,可以对采购的材料进行入库操作,还可以在个人中心中进行个人信息资料的修改。 项目经理功能 项目经理登录后,主要功能包括入库员、出库员、领料员、采购员用户的管理,进行材料分类,管理材料库存,查看领取申请,以及审核新材料申请,审核材料采购以及材料处理。 管理员功能 管理员登录后,主要功能包括项目经理、入库员、出库员、领料员、采购员用户的管理,进行材料分类,管理材料库存,查看领取申请,以及审核新材料申请,审核材料采购以及材料处理、系统日志等。 【环境需要】 1.运行环境:最好是java jdk 1.8,我们在这个平台上运行的 2.IDE环境:IDEA,Eclipse,Myeclipse都可以 3.tomcat环境:Tomcat 7.x,8.x,9.x版本均可 4.数据库:MySql 5.7/8.0等版本均可 【购买须知】 本源码项目经过严格的调试,项目已确保无误,可直接用于课程实训或毕业设计提交。里面都有配套的运行环境软件,讲解视频,部署视频教程,一应俱全,可以自己按照教程导入运行。附有论文参考,使学习者能够快速掌握系统设计和实现的核心技术。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值