| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 845 人关注过本帖
标题:为什么只能登陆一个用户!
取消只看楼主 加入收藏
中国男孩
Rank: 1
等 级:新手上路
帖 子:291
专家分:7
注 册:2006-3-19
结帖率:0
收藏
 问题点数:0 回复次数:3 
为什么只能登陆一个用户!

我的一个注册程序,不知道错在哪里?
我注册了好多用户,但是登陆时,却只能登陆一个用户,而且是第一个注册的那个用户:
代码如下:
<!--#Include file="linkdata.asp"-->
<!--#Include file="hnzjzz_md5.asp"-->
<%
if request("action")="login" then Call login()
if request("action")="quit" then Call quit()
Sub login()
name=md5(Replace(Trim(Request.form("user_name")),"","'"))
pass=md5(Replace(Trim(Request.form("user_pass")),"","'"))

Set rs= Server.CreateObject("ADODB.Recordset")
sql="select id,user_name,user_pass from users"
rs.open sql,conn,1,1
if name<>rs("user_name") then
Response.Write "<script language=javascript>alert('用户不正确!');self.location=(""login.asp"");</script>"
elseif pass<>rs("user_pass") then
Response.Write "<script language=javascript>alert('密码不正确!');self.location=(""login.asp"");</script>"
else
Response.Write "<script language=javascript>alert('登陆成功!');self.location=(""Myzone.asp"");</script>"
Session("user_name")=rs("user_name")
end if
End Sub

Sub quit()
Session("user_name")=""
Response.Write "<script language=javascript>alert('退出成功!');self.location=(""login.asp"");</script>"
End Sub
%>

搜索更多相关主题的帖子: login 用户 form name 
2007-10-29 16:16
中国男孩
Rank: 1
等 级:新手上路
帖 子:291
专家分:7
注 册:2006-3-19
收藏
得分:0 
可,还是不行啊

我很想把计算机学好!!
2007-10-29 16:52
中国男孩
Rank: 1
等 级:新手上路
帖 子:291
专家分:7
注 册:2006-3-19
收藏
得分:0 
回复:(tianyu123)以下是引用中国男孩在2007-10-29 ...

呵呵,谢谢大侠,我按照你的方法,去做,可以了,
但是,我不懂,那程序的意思,你能帮我翻译一下吗?
小弟,谢了


我很想把计算机学好!!
2007-11-01 17:44
中国男孩
Rank: 1
等 级:新手上路
帖 子:291
专家分:7
注 册:2006-3-19
收藏
得分:0 

呵呵,谢谢,我懂了


我很想把计算机学好!!
2007-11-02 20:24
快速回复:为什么只能登陆一个用户!
数据加载中...
 
   



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

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