由于GAE(Google App Engine)被墙,导致PJBlog过去发布在GAE的源码无法正常下载,我们已于2015年1月4日转移至论坛附件。如发现类似问题,敬请反馈。

[PJBlog^2019]用户聚居地 - ASP中文开源博客系统PJBlog

 找回密码
 立即加入PJHOME

QQ登录

只需一步,快速开始

扫一扫,访问微社区

PJHOME-PJBlog官方论坛 你的关注和支持,是PJBlog不断成长的动力 指南 - 建议 - 展示 - 风云互联 - 合作

PJBlog3 经典版本(推荐) 最终版本:PJBlog3 V3.2.9.518(2011/11/01) 安装 - 升级 - 转换 - 模板 - 插件 - 反馈

PJBlog5 云博客(不推荐) 公测版本:PJBlog5 V1 公测版(2015/01/01) 发布 - 交流 - 文档 - 主题 - 插件 - 云平台

查看: 18523|回复: 44

[ 原创]2008/05/01 更新 为PJblog增加通过密码保护找回密码的功能(忘记密码功能)

[复制链接]
发表于 2008-4-13 05:30 | 显示全部楼层 |阅读模式
为PJblog增加通过密码保护找回密码的功能(忘记密码功能),本人原创
本人今晚真的没睡啦,写了2个小时,修改了2个小时,把BUG都修补了。
要修改的源文件有:common/library.asp   member.asp   register.asp
详细方法和演示见本站:http://www.levevio.cn/evio/article.asp?id=143


2008/05/01 更新 经测试,请把升级文件升级后,将类型“是/否”改为“文本”,然后删除3个字段内的值就不会出现原二级密码的错误。


谢谢 四川-果果 的指正,修补方法见 26#
===========================================================================
(2008/04/16更新)
现将二级密码和密码保护2个功能文件打包下载,请仔细阅读里面说明,按相应操作进行。
基本上如果没有修改过里面文件内容的可以直接覆盖,没有问题的。
下载:

===========================================================================
修改方法入下:
打开member.asp
1.找到
  1. <tr><td align="right" width="85"><strong>密码重复:</strong></td><td align="left" style="padding:3px;"><input name="Confirmpassword" type="password" size="18" class="userpass" maxlength="16"/> 必须和上面的密码一样</td></tr>
复制代码
在下面加上
  1. <tr><td align="right" width="85"><strong>密保问题:</strong></td><td align="left" style="padding:3px;"><input name="mbquestion" type="text" size="18" class="userpass" maxlength="16"/><font color="#FF0000">&nbsp;*</font> </td></tr>
  2.       
  3.       <tr><td align="right" width="85"><strong>密保答案:</strong></td><td align="left" style="padding:3px;"><input name="mbanswer" type="text" size="18" class="userpass" maxlength="16"/><font color="#FF0000">&nbsp;*</font></td></tr>
复制代码
2.找到
  1. dim UID,username,Oldpassword,password,Confirmpassword,Gender,email,homepage,QQ,HideEmail,checkUser
复制代码
直接后面加上
  1. ,mbquestion,mbanswer
复制代码
3.找到
  1. password=trim(CheckStr(request.form("password")))
  2. Confirmpassword=trim(CheckStr(request.form("Confirmpassword")))
复制代码
下面添加
  1. mbquestion=trim(CheckStr(request.form("mbquestion")))
  2. mbanswer=trim(CheckStr(request.form("mbanswer")))
复制代码
4.找到
  1. if password<>Confirmpassword then
  2.      ReInfo(0)="错误信息"
  3.      ReInfo(1)="<b>密码验证失败!请重新输入。</b><a href=""javascript:history.go(-1);"">单击返回</a>"
  4.      ReInfo(2)="ErrorIcon"
  5.      SaveMem=ReInfo
  6.      exit function
  7.   end if  
  8. end if
复制代码
下面添加
  1. if len(mbquestion)=0 or (len(mbquestion)<6 or len(mbquestion)>16) then
  2.      ReInfo(0)="错误信息"
  3.      ReInfo(1)="<b>请输入6到16位密保问题!</b><a href=""javascript:history.go(-1);"">单击返回</a>"
  4.      ReInfo(2)="WarningIcon"
  5.      SaveMem=ReInfo
  6.      exit function
  7. end if

  8. if len(mbanswer)=0 or (len(mbanswer)<6 or len(mbanswer)>16) then
  9.      ReInfo(0)="错误信息"
  10.      ReInfo(1)="<b>请输入6到16位密保答案!</b><a href=""javascript:history.go(-1);"">单击返回</a>"
  11.      ReInfo(2)="WarningIcon"
  12.      SaveMem=ReInfo
  13.      exit function
  14. end if
复制代码
5.找到
  1. "update blog_member set mem_Sex="&Gender&",mem_Email='"&email&"',mem_HideEmail="&HideEmail&",mem_HomePage='"&homepage&"',mem_QQ='"&QQ&"'
复制代码
后面增加
  1. ,mem_mbquestion='"&mbquestion&"',mem_mbanswer='"&mbanswer&"'
复制代码
打开register.asp
1.找到
  1. <tr><td align="right" width="85"><strong>密码重复:</strong></td><td align="left" style="padding:3px;"><input name="Confirmpassword" type="password" size="18" class="userpass" maxlength="16"/><font color="#FF0000">&nbsp;*</font> 必须和上面的密码一样</td></tr>
复制代码
在下面增加
  1. <tr><td align="right" width="85"><strong>密保问题:</strong></td><td align="left" style="padding:3px;"><input name="mbquestion" type="text" size="18" class="userpass" maxlength="16"/><font color="#FF0000">&nbsp;*</font> </td></tr>
  2.       
  3.       <tr><td align="right" width="85"><strong>密保答案:</strong></td><td align="left" style="padding:3px;"><input name="mbanswer" type="text" size="18" class="userpass" maxlength="16"/><font color="#FF0000">&nbsp;*</font></td></tr>
复制代码
2.找到
  1. dim username,password,Confirmpassword,Gender,email,homepage,validate,HideEmail,checkUser
复制代码
后面增加
  1. ,mbquestion,mbanswer
复制代码
3.找到
  1. password=trim(CheckStr(request.form("password")))
  2. Confirmpassword=trim(CheckStr(request.form("Confirmpassword")))
复制代码
下面增加
  1. mbquestion=trim(CheckStr(request.form("mbquestion")))
  2. mbanswer=trim(CheckStr(request.form("mbanswer")))
复制代码
4.找到
  1. if password<>Confirmpassword then
  2.      ReInfo(0)="错误信息"
  3.      ReInfo(1)="<b>密码验证失败!请重新输入。</b><a href=""javascript:history.go(-1);"">单击返回</a>"
  4.      ReInfo(2)="ErrorIcon"
  5.      register=ReInfo
  6.      exit function
  7. end if
复制代码
下面增加
  1. if len(mbquestion)=0 or (len(mbquestion)<6 or len(mbquestion)>16) then
  2.      ReInfo(0)="错误信息"
  3.      ReInfo(1)="<b>请输入6到16位密保问题!</b><a href=""javascript:history.go(-1);"">单击返回</a>"
  4.      ReInfo(2)="WarningIcon"
  5.      register=ReInfo
  6.      exit function
  7. end if

  8. if len(mbanswer)=0 or (len(mbanswer)<6 or len(mbanswer)>16) then
  9.      ReInfo(0)="错误信息"
  10.      ReInfo(1)="<b>请输入6到16位密保答案!</b><a href=""javascript:history.go(-1);"">单击返回</a>"
  11.      ReInfo(2)="WarningIcon"
  12.      register=ReInfo
  13.      exit function
  14. end if
复制代码
5.找到
  1. AddUser=array(array("mem_Name",username),array("mem_Password",password)
复制代码
后面增加
  1. ,array("mem_mbquestion",mbquestion),array("mem_mbanswer",mbanswer)
复制代码
打开common/library.asp
找到
  1. <a href=""login.asp"" class=""sideA"" accesskey=""L"">登录</a><a href=""register.asp"" class=""sideA"" accesskey=""U"">用户注册</a>
复制代码
后面增加
  1. <a href=""repass.asp"" class=""sideA"" accesskey=""U"">找回密码</a>
复制代码
===========================
BUG修复  member.asp找到
if request.form("hiddenEmail")=1 then
   HideEmail=true
  else
   HideEmail=false
end if

在其上填加

if blog_mem("mem_mbquestion")="" then
ReInfo(0)="错误信息"
     ReInfo(1)="<b>不允许填写密保!</b><br/><a href=""javascript:history.go(-1);"">单击返回重新注册</a>"
     ReInfo(2)="ErrorIcon"
     SaveMem=ReInfo
     exit function
end if


=======================以上步骤完成后下载升级文件
将里面的repass.asp传到网站的根目录。用update.asp升级数据库,直接放网站根目录升级。
以下是动画演示文件,请放心下载,无毒。
fs2you网盘地址
http://www.fs2you.com/files/02d9095e-08da-11dd-9aa3-00142218fc6e/
--------------------------------------------------------------------------------
在使用过程中,如果发现什么BUG,请直接给我留言。我会尽快修复。
http://www.levevio.cn/evio/LoadMod.asp?plugins=AJAXGuestBook  这里给我留言
---------------------------------------------------------------------------
[2008/04/14更新]请安装此插件的朋友,下载repass.asp文件进行覆盖,优化了加密方式。点击下载

[ 本帖最后由 evio 于 2008-5-3 14:49 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?立即加入PJHOME

x
欢迎来到PJHOME社区,PJ有你更精彩!!
发表于 2008-4-13 06:02 | 显示全部楼层
不错的功能。
沙发支持!辛苦了!
刚测试一下,找回密码后能返回首页就方便点,呵呵~~

[ 本帖最后由 Hurt 于 2008-4-13 06:05 编辑 ]
欢迎来到PJHOME社区,PJ有你更精彩!!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-4-13 06:03 | 显示全部楼层
呵呵,你是第一个哈~
欢迎来到PJHOME社区,PJ有你更精彩!!
回复 支持 反对

使用道具 举报

发表于 2008-4-13 06:21 | 显示全部楼层
不错,不过用不上
欢迎来到PJHOME社区,PJ有你更精彩!!
回复 支持 反对

使用道具 举报

发表于 2008-4-13 07:02 | 显示全部楼层
不错
欢迎来到PJHOME社区,PJ有你更精彩!!
回复 支持 反对

使用道具 举报

发表于 2008-4-13 09:41 | 显示全部楼层
先给精华再看。呵呵。
欢迎来到PJHOME社区,PJ有你更精彩!!
回复 支持 反对

使用道具 举报

发表于 2008-4-13 10:05 | 显示全部楼层
update.asp上传到根目录升级显示  无法找到该页

原来是我传错目录了

[ 本帖最后由 maoxiaomin 于 2008-4-13 10:11 编辑 ]
欢迎来到PJHOME社区,PJ有你更精彩!!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-4-13 12:35 | 显示全部楼层
谢谢戒聊了~
欢迎来到PJHOME社区,PJ有你更精彩!!
回复 支持 反对

使用道具 举报

发表于 2008-4-13 14:25 | 显示全部楼层
这种帖绝对要支持 楼主辛苦...
欢迎来到PJHOME社区,PJ有你更精彩!!
回复 支持 反对

使用道具 举报

发表于 2008-4-13 14:33 | 显示全部楼层
我想完善的功能.被你抢先一步了..不过还是支持下..
呵呵,evio加油哦.
欢迎来到PJHOME社区,PJ有你更精彩!!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即加入PJHOME

本版积分规则

关闭

PJHOME小黑板报上一条 /1 下一条

小黑屋|手机版|纯文字版|BBS.PJHOME.NET ( 粤ICP备12036560号-1 )

GMT+8, 2019-11-19 15:36 , Processed in 0.214591 second(s), 25 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表