标题:asp登录程序总提示用户名不存在
只看楼主
ikonglin
Rank: 2
来 自:中国
等 级:论坛游民
帖 子:71
专家分:38
注 册:2008-4-26
结帖率:47.37%
 问题点数:0 回复次数:7 
asp登录程序总提示用户名不存在
我的代码运行后,如果第一次使用正确的用户名和密码登录可以,如果第一次用一个正确的用户名,密码错了,登录后提示密码错误,然后返回登录页面,再输入正确的密码却提示用户名不存在,以后不管输入用户名和密码正不正确都会提示用户名不存在。代码如下
<!-- #include file="conn.asp" -->
<%
dim namestr,passstr
namestr=trim(request.Form("name"))
passstr=trim(request.Form("password"))
set rs=server.CreateObject("adodb.recordset")
sql="select * from admin where name='"& namestr & "'"
rs.open sql,conn,1,1
if rs.eof then
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<script language="javascript">
alert("用户名不存在");
history.back();
</script>
<%
response.End()
else
if rs("password")<>passstr then
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<script language="javascript">
alert("密码错误");
history.back();
</script>
<%
response.End()
end if
session("admin")=namestr
end if
%>
搜索更多相关主题的帖子: 用户名 asp 提示 登录 
2010-12-11 22:36
ikonglin
Rank: 2
来 自:中国
等 级:论坛游民
帖 子:71
专家分:38
注 册:2008-4-26
得分:0 
知道原因了,用history.back()返回原来的页面后,在用户名文本框内的变量不能变动,必须刷新后才能保存值。现在用window.location=url实现返回,返回登录页面是刷新后的页面。
2010-12-11 22:54
天涯听雨
Rank: 2
来 自:东莞
等 级:论坛游民
威 望:4
帖 子:497
专家分:64
注 册:2007-8-25
得分:0 
这程序写的真是有些杯具……

从明天起做幸福的人,喂马劈柴周游世界!
2010-12-12 00:15
ikonglin
Rank: 2
来 自:中国
等 级:论坛游民
帖 子:71
专家分:38
注 册:2008-4-26
得分:0 
我不是搞IT的,是医生,只是对电脑有点兴趣,真不会什么编程,也没学习过,什么算法思想完全不懂,是一边查书一边写的。高手见笑了,多来论坛学习
2010-12-12 08:05
markjet
Rank: 2
等 级:论坛游民
帖 子:14
专家分:19
注 册:2010-6-5
得分:0 
set rs=server.CreateObject("adodb.recordset")
sql="select * from admin where name='"& namestr & "'"
rs.open sql,conn,1,1


这段好像登录的时候只要用户名正确就行了啊!
我有点晕了!

[fly] 若有恒,何须三更眠五更起,最无益,莫过一日曝十日寒[/fly]
2010-12-17 17:32
markjet
Rank: 2
等 级:论坛游民
帖 子:14
专家分:19
注 册:2010-6-5
得分:0 
<script language="javascript">
alert("用户名不存在");
history.back();
</script>
这一段不如写成
<%
response.write ("<script>alert('用户名不存在!');history.back();</script>")
%>

[fly] 若有恒,何须三更眠五更起,最无益,莫过一日曝十日寒[/fly]
2010-12-17 17:36
ikonglin
Rank: 2
来 自:中国
等 级:论坛游民
帖 子:71
专家分:38
注 册:2008-4-26
得分:0 
这是我自学的测试页面,不是用来登录的。慢慢学习
2010-12-19 20:59
hugeannex
Rank: 8Rank: 8
等 级:蝙蝠侠
威 望:6
帖 子:477
专家分:911
注 册:2005-3-20
得分:0 
新手加油!

世事如潮我如水,只叹江湖几人回。
2010-12-20 09:46



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-328735-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.097264 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved