注册后自动登录的修改方法

 
正在载入,请稍候……
一般情况下,访客注册后都是为了登入,而原PJ注册后还需要再次输入账户进行登入,步骤复杂化了。也许当初舜子疏忽了吧,不过现在有人提供了这个修正方法,赞一个哈。

发表时间:2006-12-28
适用版本: 2.6
作    者: 戒聊

修改方法如下:

1.打开register.asp,找到144行.
程序代码 程序代码
dim strSalt,AddUser

修改为:
程序代码 程序代码
dim strSalt,AddUser,hashkey

2.在144行下面插入一行.代码如下:
程序代码 程序代码
hashkey=SHA1(randomStr(6)&now())

3,现在插入一行后应该是148行了.找到:
程序代码 程序代码
AddUser=array(array("mem_Name",username),array("mem_Password",password),array("mem_Sex",Gender),array("mem_salt",strSalt),array("mem_Email",email),array("mem_HideEmail",int(HideEmail)),array("mem_HomePage",homepage),Array("mem_LastIP",getIP))

修改为:
程序代码 程序代码
    AddUser=array(array("mem_Name",username),array("mem_Password",password),array("mem_Sex",Gender),array("mem_salt",strSalt),array("mem_Email",email),array("mem_HideEmail",int(HideEmail)),array("mem_HomePage",homepage),Array("mem_LastIP",getIP),Array("mem_lastVisit",now()),Array("mem_hashKey",hashkey))

4,找到大概在156行左右的如下代码:
  
程序代码 程序代码
ReInfo(0)="用户注册成功"

   把这行下面的ReInfo(1)整行替换为:
    
程序代码 程序代码
ReInfo(1)="<b>注册并自动登录成功,三秒钟返回首页!</b><br/><a href=""default.asp"">如果您的浏览器没有自动跳转,请点击这里</a><meta http-equiv=""refresh"" content=""3;url=default.asp""/>"

5,找到Session(CookieName&"_LastDo")="RegisterUser",在其上插入一行添加如下代码.    
程序代码 程序代码
    Response.Cookies(CookieName)("memName")=username
    Response.Cookies(CookieName)("memHashKey")=hashkey
    Response.Cookies(CookieName).Expires=Date+365


6,搞定,大功告成.呵呵...有兴趣的朋友可以试下.

本站测试成功,实用的功能啊,当初舜子没完善好哦。 谷歌AD正在载入,请稍候……
点此快速转到评论处,留下您的宝贵见解吧^_^

本文如需转载,请详细注明出处,尊重版权,尊重别人的劳动成果,谢谢合作哦!
Google内容AD正在载入,请稍候……

相关日志
详细信息
日志搜索
推荐收藏
反向链接
本站声明

    相关日志:

     
评论: 2 | 引用: 0 | 查看次数: 8252 | 打印此页 | 关闭此页 | 返回顶部 | 直达底部
评论列表 ↓ 点击显示/隐藏2条博友们的评论
发表评论

① 若您已是本站注册用户,请填入名称和密码,发表留言后即默认登陆.
② 若您尚未在本站注册,为了保护您的发言权,建议您注册账号,进而保护您的名称在本站不被他人所占用.若未特别说明,本站原创或转载的文章,均遵循创作共用协议.^_^
③ 若您不想注册,可以只填写用户名进行发表.
④ 转载本站文章,请注明出处,或者填写文章的引用通告地址,谢谢!
⑤ 本站注册是免费,自由的,但发表 评论/留言 即默认您遵守本站用户协议.
昵 称: 要想好哦.
密 码: 游客评论不需要密码.
验证码: 刷新验证码 | 不区分大小写.
内 容:
选 项:
(发表评论后,帮点点广告,友情支持下)
虽然发表评论不用注册,但是为了保护您的发言权,建议您注册账号.
字数限制 500 字 | UBB代码 开启 | [img]标签 关闭