asp登陆问题 急。谢谢

yjlj87 yjlj87 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
conn.asp

<%
dim conn
dim connstr
dim db
db="reg.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.Open connstr
%>



<%
dim Vedo,reVedo

Vedo=trim(Request.Form("Vedo"))
reVedo=trim(Request.Form("reVedo"))
User=trim(Request.Form("Name"))
Pass=trim(Request.Form("Passwd"))

if Vedo<>reVedo then
response.write("<script>alert('验证码不正确!');location.href='../admin/';</script>")
founderr=true
else
set rs=conn.execute("select * from [reg] where Name='"&User&"' and Passwd='"&Pass&"'")
if not rs.eof then
session("admin_name")=trim(Request.Form("Name"))
response.Redirect "index.asp"
else
response.Write("<script>alert('用户名及密码不正确,请重新登录!');location.href('login.asp')</script>")
end if
end if
%>




我在运行的时候不管用户名密码是对是错都会提示(用户名及密码不正确,请重新登录)。这个是怎么回事呀?
请高手帮忙了。 谢谢。
...全文
评论 25
收藏 已收藏
分享
返回顶部
yjlj87
ASP 28,401 成员 356,940 内容