WenRou's Blog

新浪微薄腾讯微薄

最新碎语:测试图片碎语哦

您的位置:WenRou's Blog >Blog> pjblog登陆失败修改方法[附:文件下载]

pjblog登陆失败修改方法[附:文件下载]

本文由 温柔幻刀发表于 爱你的365天 http://www.wenrouge.com/ 版权所有,未经允许,不得转载,谢谢! 在pj官方论坛里面 搜索 “登陆问题” 我们会发现有不少的朋友都有这样那样的问题,另人头痛。请大家先 看完我的整段文字再开始动手解决您的问题, 关于Blog无法登陆的问题,puterjam(也就是pjblog的创始人)给出了相应的解决办法,详细情况见 http://www.pjhome.net/article.asp?id=413 但是实际上并非所有用户都能够解决问题。我按照puterjam的方法做了,但是我并没有解决问题。甚至我开给了everyone全部权限。依旧没有成功。 而且puterjam的这种方案需要服务器权限,对于一般的用户而言,这种方法显然是不现实的。 puterjam在论坛中给了我们这样的提示: http://bbs.pjhome.net/viewthread.php?tid=4407&extra=page%3D1 但是请不要相信西面跟帖子的jasonxyk会员的话:“需要把pjblog所在的文件夹共享,然后把那“在网络上共享文件夹”和“允许网络用户更 改我的文件”这两个选上” 这只会导致安全问题,对于问题的解决没有半点帮助!! 在pj官方论坛寻找答案的时候还见到了有的朋友提出这样的问题:就是登陆后 空白信息,见 http://bbs.pjhome.net/viewthread.php?tid=16496&highlight=%B5%C7%C2%BD%CE%CA%CC%E2 这个问题以前我也碰见过了,这个是服务器设置问题,按照http://www.pjhome.net/article.asp?id=413的方法应该可以解决,如果还不行的 话,那下面的操作也许回对您有帮助: 打开您的服务器上的的IIS管理器,选择您要操作的站点,右键》属性》主目录》配置》选项》启用父路径。 最后请参考 http://bbs.pjhome.net/viewthread.php?tid=5653&highlight=iis 尤其是最后一项,将您的站点文件夹 赋予 everyone 至少有写入权限 ,当然anan77 朋友给的是 everyone 全部权限 这个和puterjam的 http://www.pjhome.net/article.asp?id=413有异曲同工之妙, 不同的是puterjam只赋予了数据库权限,而这里赋予了整个站点文件夹权限(当然也包括站点里面的数据库也赋予权限了) 但是我想puterjam的方法可能更安全些。请大家先试用puterjam的方案,再参考anan77 给出的作者:游泳的鱼的方案。谢谢! ( 如果你在使用PJBLOG的过程中,发现明明自己刚登陆了,但跳转回首页的时候又发现自己不是登陆状态,连接试几次都这样,根本就使用 不了BLOG。同时你也会发现跑到别人的PJBLOG也是登陆了。这样的情况不是数据库权限的问题,因为别人都用得好好的,而维独你不能用。你 千万别以为自己的机器有问题,就算你重装100次系统也是这个样子。 我的PJBLOG也是一开始在本地调试很好用,可上传到空间之后就出现了上述问题。初步辨别为COOKIES验证的问题,因为我用LBS的程序也 是这样,程序在一定上存在相互学习。我为此研究了COOKIES验证程序,发现里面有一项验证COOKIES是否有效是通过验证最后登陆IP来确定的 ,我想这里面里面一定有问题,因为我是校园网的,可能刚登陆记录的IP(外网连接IP?)和从COOKIES记录的IP(内网IP地址?)不一样,我 们是通过那个外网IP上网的,而COOKIES是在本地,所以就有可能取到本地的IP了,我把那一句验证IP的程序屏蔽掉后,再上传到空间就可以正 常登陆了!!! ) 请注意:以上文字择录自:http://bbs.pjhome.net/viewthread.php?tid=3770&extra=&highlight=%B5%C7%C2%BD%CE%CA%CC%E2&page=1 作者winbry 给出了解决办法,但是很可惜作者的下载连接已经失效. 经过我在网络的搜索,发现了解决办法,现在将解决办法告诉大家,特别是局域网的用户,因为你的电脑本机ip和外网ip肯定不一致,所以请 参考以下解决办法。 如果还不能解决请联系QQ:29329300 或者访问我的BLOG: https://www.wenrouge.com/ 如果你懒得改或不会改的话请直接用我给的文件覆盖原文件即可! 下面是修改方法... 1.首先修改common/checkUser.asp(主要是这个!!修改了这个就已经解决了问题了,后面的login.asp修改您可以按照自己的情况谨慎修改!也可以不用修改!) 将以下原码 CODE: '进行MD5密码验证,转换旧帐户密码验证方式 dim strSalt strSalt=randomStr(6) memLogin("mem_salt")=strSalt memLogin("mem_LastIP")=getIP() memLogin("mem_lastVisit")=now() memLogin("mem_hashKey")=HashKey memLogin("mem_Password")=SHA1(Password&strSalt) Response.Cookies(CookieName)("memName")=memLogin("mem_Name") Response.Cookies(CookieName)("memHashKey")=HashKey if Request.Form("KeepLogin")="1" then Response.Cookies(CookieName).Expires=Date+365 memLogin.Update ReInfo(0)="登录成功" ReInfo(1)=""&memLogin("mem_Name")&",欢迎你的再次光临。
点击返回主页" ReInfo(2)="MessageIcon" ReInfo(3)=true End IF else if memLogin("mem_Password")<>SHA1(Password&memLogin("mem_salt")) then ReInfo(0)="错误信息" ReInfo(1)="用户名与密码错误
请返回重新输入" ReInfo(2)="ErrorIcon" logout(false) else memLogin("mem_LastIP")=getIP() memLogin("mem_lastVisit")=now() memLogin("mem_hashKey")=HashKey Response.Cookies(CookieName)("memName")=memLogin("mem_Name") Response.Cookies(CookieName)("memHashKey")=HashKey if Request.Form("KeepLogin")="1" then Response.Cookies(CookieName).Expires=Date+365 memLogin.Update ReInfo(0)="登录成功" ReInfo(1)=""&memLogin("mem_Name")&",欢迎你的再次光临。
点击返回主页" ReInfo(2)="MessageIcon" ReInfo(3)=true end if end if memLogin.Close Set memLogin=Nothing login=ReInfo end function 修改成 CODE: '进行MD5密码验证,转换旧帐户密码验证方式 dim strSalt strSalt=randomStr(6) memLogin("mem_salt")=strSalt memLogin("mem_LastIP")=getIP() memLogin("mem_lastVisit")=now() memLogin("mem_hashKey")=HashKey memLogin("mem_Password")=SHA1(Password&strSalt) Response.Cookies(CookieName)("memName")=memLogin("mem_Name") Response.Cookies(CookieName)("memHashKey")=HashKey if Cint(Request.Form("KeepLogin"))<>0 then Response.Cookies(CookieName).Expires=Date+Cint(Request.Form("KeepLogin")) memLogin.Update ReInfo(0)="登陆成功" ReInfo(1)=""&memLogin("mem_Name")&",欢迎你的再次光临。
点击返回主页" ReInfo(2)="MessageIcon" ReInfo(3)=true End IF else if memLogin("mem_Password")<>SHA1(Password&memLogin("mem_salt")) then ReInfo(0)="错误信息" ReInfo(1)="用户名与密码错误
请返回重新输入" ReInfo(2)="ErrorIcon" logout(false) else memLogin("mem_LastIP")=getIP() memLogin("mem_lastVisit")=now() memLogin("mem_hashKey")=HashKey Response.Cookies(CookieName)("memName")=memLogin("mem_Name") Response.Cookies(CookieName)("memHashKey")=HashKey if Cint(Request.Form("KeepLogin"))<>0 then Response.Cookies(CookieName).Expires=Date+Cint(Request.Form("KeepLogin")) memLogin.Update ReInfo(0)="登陆成功" ReInfo(1)=""&memLogin("mem_Name")&",欢迎你的再次光临。
点击返回主页" ReInfo(2)="MessageIcon" ReInfo(3)=true end if end if memLogin.Close Set memLogin=Nothing login=ReInfo end function 然后搜索 CODE: memLogin("mem_LastIP")=getIP() 有三处!将其删除... 再搜索 CODE: if CheckCookie("mem_LastIP")<>Guest_IP or isNull(CheckCookie("mem_LastIP")) then logout(true) else memName=CheckStr(Request.Cookies(CookieName)("memName")) memStatus=CheckCookie("mem_Status") end if 替换为 CODE: memName=CheckStr(Request.Cookies(CookieName)("memName")) memStatus=CheckCookie("mem_Status") 2.修改login.asp:(这个也可能会显示不正常,请谨慎,其实也不用修改了!!修改了common/checkUser.asp就已经解决了问题哦!) 将以下代码替换
断 CODE:
用户登录


<%if blog_useCode then%>
<%end if%>
 
附:首页显示登陆框的方法(如果您喜欢的话可以修改) 在library.asp里查找 退出系统" 将以下代码替换原来的 CODE: else userPanel=userPanel&"




" end if end function 联系QQ:29329300 欢迎访问我的BLOG: https://www.wenrouge.com/ 主站: http://www.wenrou.cn/ 点击下载此文件

---

转载请注明本文标题和链接:《pjblog登陆失败修改方法[附:文件下载]

分享到:

发表评论

1 + 8 =
路人甲 表情
看不清楚?点图切换 Ctrl+Enter快速提交

网友评论(4)

hello world
silktralirriz 14年前 (2011-04-02) 回复
@silktralirriz:大家都hello
wenrou 14年前 (2011-04-02) 回复
照你说的修改了还是不行啊……我的QQ:446988646
傲灵听梦 15年前 (2010-07-15) 回复
没法加你的QQ啊  我的 木瓜世界 不能登陆 要空间商帮忙改 可还是不行啊我QQ664318697 希望得到你的帮助温柔幻刀回复:已经加你的QQ,很乐意帮助你!
copyto 17年前 (2008-02-22) 回复