3333 查看 6 回复

主题：[分享]关于注册激活用户账号时，可以重复激活的问题解决方法！ [收藏主题]

转到：

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:klsyp123 性别:女 积分:216分 威望:105 帖子:40 精华:0 广播:0 粉丝:0 登录次数:16 次 注册时间:2007/4/11 14:33:00 最后登录:2014/6/12 20:56:41 klsyp123 当前离线 40 主题 0 广播 0 粉丝 级别:学前班 用户积分:216 分 登录次数:16 次 注册时间:2007/4/11 最后登录:2014/6/12	klsyp123 发表于：2012/4/16 20:51:32   | 只看该作者 查看该作者主题 楼主  有生源 找课程 就上科汛课堂街! 在user文件夹下的 ActiveCode.asp  文件，代码如下 复制代码 Sub DoCheck() Dim UserId:UserID=KS.ChkClng(KS.S("UserID")) Dim CheckNum:CheckNum=KS.S("CheckNum") Dim RS:Set RS=Server.CreateObject("ADODB.RECORDSET") RS.Open "Select top 1 UserName,RndPassWord,Email,CheckNum,locked,AllianceUser From KS_User Where UserId=" & UserId ,Conn,1,3 If RS.Eof And RS.Bof Then rs.close:set rs=nothing Response.Write "<script>alert('对不起，用户不存在！');history.back();</script>":response.end else if rs("checknum")<>checknum then rs.close:set rs=nothing Response.Write "<script>alert('激活码有误，请重新输入！');history.back();</script>":response.end else rs("locked")=0 rs.update 这是检查用户的激活链接中用户名和 激活码是否正确的代码，但是此处有一个问题，导致了用户可以重复的点击激活链接，进行激活！ 先将该处的代码加以修改，让用户只能激活一次！ 复制代码   Sub DoCheck()          Dim UserId:UserID=KS.ChkClng(KS.S("UserID"))    Dim CheckNum:CheckNum=KS.S("CheckNum")          Dim RS:Set RS=Server.CreateObject("ADODB.RECORDSET")    RS.Open "Select top 1 UserName,RndPassWord,Email,CheckNum,locked,AllianceUser From KS_User Where UserId=" & UserId ,Conn,1,3    If RS.Eof And RS.Bof Then     rs.close:set rs=nothing     Response.Write "<script>alert('对不起，用户不存在！');history.back();</script>":response.end    else      if rs("checknum")<>checknum then       rs.close:set rs=nothing       Response.Write "<script>alert('激活码有误，请重新输入！');history.back();</script>":response.end      elseif 0 = rs("locked") then       rs.close:set rs=nothing       Response.Write "<script>alert('您的账号已经激活，请勿重复激活！');history.back();</script>":response.end      else       rs("locked")=0     rs.update
	做官网 就用科汛智能建站系统!
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:hejian 性别:男 积分:3522分 威望:3388 帖子:1201 精华:0 广播:4 粉丝:4 登录次数:563 次 注册时间:2006/12/26 15:48:00 最后登录:2024/1/21 7:05:56 hejian 当前离线 1201 主题 4 广播 4 粉丝 级别:九年级 用户积分:3522 分 登录次数:563 次 注册时间:2006/12/26 最后登录:2024/1/21	hejian 发表于：2012/4/16 22:07:02   | 只看该作者 查看该作者主题 沙发  有课程 找生源 就上科汛课堂街
	http://www.84n.net/[/url] http://www.njwed.net/[/url] http://www.05556.com/[/url] 科汛商学院助您快速入门
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:jiemengdaquan 性别:男 积分:35分 威望:59 帖子:30 精华:0 广播:0 粉丝:0 登录次数:8 次 注册时间:2012/4/11 13:43:52 最后登录:2013/1/20 22:57:17 jiemengdaquan 当前离线 30 主题 0 广播 0 粉丝 级别:学前班 用户积分:35 分 登录次数:8 次 注册时间:2012/4/11 最后登录:2013/1/20	jiemengdaquan 发表于：2012/4/16 23:35:06   | 只看该作者 查看该作者主题 藤椅  做考试题库 就用#科汛在线考试系统!
	交换链接 www.jiemengdaquan.org 交换链接 www.jia266.com 友情链接 www.koukouche.com 有课程 找生源 就上科汛课堂街
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:xieyuyun3 性别:男 积分:2065分 威望:3622 帖子:1056 精华:0 广播:0 粉丝:0 登录次数:144 次 注册时间:2011/12/22 15:28:46 最后登录:2012/10/16 15:18:21 xieyuyun3 当前离线 1056 主题 0 广播 0 粉丝 级别:八年级 用户积分:2065 分 登录次数:144 次 注册时间:2011/12/22 最后登录:2012/10/16	xieyuyun3 发表于：2012/4/17 9:01:54   | 只看该作者 查看该作者主题 板凳  有生源 找课程 就上科汛课堂街! 不错，分析的很好
	广州耳鼻喉***[/url] www.020wgk.com[/url] 做官网 就用科汛智能建站系统!
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:xdnk 性别:男 积分:307分 威望:673 帖子:273 精华:0 广播:0 粉丝:0 登录次数:77 次 注册时间:2012/2/17 13:25:53 最后登录:2012/7/1 14:05:03 xdnk 当前离线 273 主题 0 广播 0 粉丝 级别:二年级 用户积分:307 分 登录次数:77 次 注册时间:2012/2/17 最后登录:2012/7/1	xdnk 发表于：2012/4/18 16:02:56   | 只看该作者 查看该作者主题 报纸  做官网 就用科汛智能建站系统! 谢谢了。。。
	<a href=http://www.xdnk120.com >哈尔滨***</a>http://www.xdnk120.com http://www.men120.com 有课程 找生源 就上科汛课堂街
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:junxiong30 性别:男 积分:77分 威望:168 帖子:87 精华:0 广播:0 粉丝:0 登录次数:2 次 注册时间:2012/5/20 9:48:04 最后登录:2012/5/20 23:43:47 junxiong30 当前离线 87 主题 0 广播 0 粉丝 级别:学前班 用户积分:77 分 登录次数:2 次 注册时间:2012/5/20 最后登录:2012/5/20	junxiong30 发表于：2012/5/20 11:43:41   | 只看该作者 查看该作者主题 地板  有课程 找生源 就上科汛课堂街 总之先顶了没错
	进一步，柳暗花明 做新职业技能培训平台 就选#科汛网校
	支持(0) | 反对(0) 顶端 底部

加为好友 发送消息 空间 | 微博 | 邮件 | QQ号码 用户:hangbei350795 性别:女 积分:62分 威望:150 帖子:52 精华:0 广播:0 粉丝:0 登录次数:5 次 注册时间:2012/5/20 11:22:22 最后登录:2012/8/26 22:28:43 hangbei350795 当前离线 52 主题 0 广播 0 粉丝 级别:学前班 用户积分:62 分 登录次数:5 次 注册时间:2012/5/20 最后登录:2012/8/26	hangbei350795 发表于：2012/5/20 12:31:40   | 只看该作者 查看该作者主题 7楼  做考试题库 就用#科汛在线考试系统! 感谢分享、 www.qipai56.com www.qipai69.com
	www.qipai56.com www.qipai69.com www.yhqp6.com www.qpk8.com 科汛商学院助您快速入门
	支持(0) | 反对(0) 顶端 底部

＜上一主题 | 下一主题 ＞

<< 返回列表 首 页 1