急!!!在线等,asp高手请帮帮忙

来源:百度知道 编辑:UC知道 时间:2024/06/22 16:17:00
这段代码用来修改登入密码,但现在改不了,老是提示原密码错误,帮忙分析下代码有无错误,谢谢!
代码如下:
<!--#include file=include/checksession.asp-->
<!--#include file=include/md5.asp-->
<!--#include file=../include/conn.asp-->
<%if Request.Form("submit")<>"" then
dim rs,errmsg,password1,password2,password3
errmsg=""
password1=md5(trim(replace(Request.Form("password1"),"'","''")))
password2=trim(Request.Form("password2"))
password3=trim(Request.Form("password3"))
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from SiteManager where adm_in='" & session("onManage") & "' and pa_ssword='"&password1&"'",conn,3,3
if password1="" then
errmsg="请输入原密码!"
elseif rs.EOF then
errmsg="原密码错误!"
elseif password2="" or

session("onManage") 有问题ba

password1=md5(trim(replace(Request.Form("password1"),"'","''")))

这句话应该有问题。

password1=md5(trim(replace(Request.Form("password1"),"'","''")))

这里加的字符替换是干啥的,你直接这样不就得了

password1=md5(trim(Request("password1")))

从错误来看,应该是在数据库中没有找到长符合SQL查询的内容!看一下,是不是Session值不对,或者就是将
password1=md5(trim(replace(Request.Form("password1"),"'","''")))
改为
password1=md5(trim(replace(Request.Form("password1"),"'","")))
replace的作用是防止登录者输入 ' 取代以空!

你改一下这里elseif password2<>password3 then 改为:else password2<>password3 then多了个if,你先试一下