asp中用户密码修改的代码
答案:2 悬赏:80
解决时间 2021-01-30 19:44
- 提问者网友:我一贱你就笑
- 2021-01-30 01:35
asp中用户密码修改的代码
最佳答案
- 二级知识专家网友:空山清雨
- 2021-01-30 02:26
简单方便的:<%
if request.form("submit") = "修改密码" then
apwd=request.Form("apwd")
pwd=request.form("pwd")
uname=session("login")
if pwd<>"" then
if pwd=apwd then
sql="select*from us where user='"&uname&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
rs("pwd")=pwd
rs.update
rs.close
set rs=nothing
Response.Write("alert('密码修改成功!')")
else
response.Write("alert('密码不相同')")
end if
else
Response.Write("alert('密码框不能为空!')")
end if
end if
%>
if request.form("submit") = "修改密码" then
apwd=request.Form("apwd")
pwd=request.form("pwd")
uname=session("login")
if pwd<>"" then
if pwd=apwd then
sql="select*from us where user='"&uname&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
rs("pwd")=pwd
rs.update
rs.close
set rs=nothing
Response.Write("alert('密码修改成功!')")
else
response.Write("alert('密码不相同')")
end if
else
Response.Write("alert('密码框不能为空!')")
end if
end if
%>
全部回答
- 1楼网友:我住北渡口
- 2021-01-30 03:39
if Request.QueryString("action")="Edit" then
id=request("id")
OldPassword=replace(trim(Request("OldPassword")),"'","")
NewPassword=replace(trim(Request("NewPassword")),"'","")if strLength(NewPassword)>16 or strLength(NewPassword)<5 then
response.write"<script language=javascript>alert('请输入的密码位数不能小于5位或大于16位!');history.go(-1);</script>"
response.End
end ifset rs=server.createobject("adodb.recordset")
sql="select * from admin where Id="&id
rs.open sql,conn,1,3'更新管理员密码
if md5(OldPassword)<>rs("PassWord")then
response.write"<script language=javascript>alert('原密码错误,请返回重新输入!');history.go(-1);</script>"
response.End
else
rs("PassWord")=md5(NewPassword)
end if
rs.update
rs.close
id=request("id")
OldPassword=replace(trim(Request("OldPassword")),"'","")
NewPassword=replace(trim(Request("NewPassword")),"'","")if strLength(NewPassword)>16 or strLength(NewPassword)<5 then
response.write"<script language=javascript>alert('请输入的密码位数不能小于5位或大于16位!');history.go(-1);</script>"
response.End
end ifset rs=server.createobject("adodb.recordset")
sql="select * from admin where Id="&id
rs.open sql,conn,1,3'更新管理员密码
if md5(OldPassword)<>rs("PassWord")then
response.write"<script language=javascript>alert('原密码错误,请返回重新输入!');history.go(-1);</script>"
response.End
else
rs("PassWord")=md5(NewPassword)
end if
rs.update
rs.close
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯