请教各位大侠一个问题

<!--#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 行
  • 0
    点赞
  • 0
    评论
  • 0
    收藏
  • 一键三连
    一键三连
  • 扫一扫,分享海报

©️2021 CSDN 皮肤主题: 编程工作室 设计师:CSDN官方博客 返回首页
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

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

余额充值