[原创]PJBlog3 V3.2.8.352后台关键字前台无效的Bug修复

有网友说PJBlog3 V3.2.8.352后台设置的关键字前台无效.这个功能记得刚开始用pj的时候玩过,后来就一直没用了.没想到352的这个功能也有问题.对比了下v3.0.6.170版本,这个版本是可以的,于是又开始了痛苦的代码对比、分析.
  PJ的集成度高,但是毕竟是老手开发的,所以有注释,这点比较好,于是根据猜测,从注释开始搜索,呵呵,第一次搜索就命中,找到问题所在.
找到/common/ubbcode.asp文件,拉到最下面.
        If AutoKEY = 1 Then
            Dim log_Keywords, log_KeywordsContent
            For Each log_Keywords IN Arr_Keywords
                log_KeywordsContent = Split(log_Keywords, "$|$")
                If Left(log_KeywordsContent(1),1) = "|" Then log_KeywordsContent(1) = Replace(log_KeywordsContent(1), "|", vbNullString,1,1)
                If Right(log_KeywordsContent(1),1) = "|" Then log_KeywordsContent(1) = Left(log_KeywordsContent(1),Len(log_KeywordsContent(1))-1)
                re.Pattern = "(\<(.*)\>)(" & Replace(log_KeywordsContent(1), "$", "\$") & ")"
                If log_KeywordsContent(3)<>"None" Then
                    strContent=re.Replace(strContent, "$1<a href="""&log_KeywordsContent(2)&""" target=""_blank""><img src=""images/keywords/"&log_KeywordsContent(3)&""" border=""0"" alt=""""/>$2</a>")
                Else
                    strContent=re.Replace(strContent, "$1<a href="""&log_KeywordsContent(2)&""" target=""_blank"">$2</a>")
                End If
            Next
        End If

替换为
        If AutoKEY = 1 Then
            Dim log_Keywords, log_KeywordsContent
            For Each log_Keywords IN Arr_Keywords
                log_KeywordsContent = Split(log_Keywords, "$|$")
                If log_KeywordsContent(3)<>"None" Then
                    strContent = Replace(strContent, log_KeywordsContent(1), "<a href="""&log_KeywordsContent(2)&""" target=""_blank""><img src=""images/keywords/"&log_KeywordsContent(3)&""" border=""0"" alt=""""/> "&log_KeywordsContent(1)&"</a>")
                Else
                    strContent = Replace(strContent, log_KeywordsContent(1), "<a href="""&log_KeywordsContent(2)&""" target=""_blank"">"&log_KeywordsContent(1)&"</a>")
                End If
            Next
        End If
然后保存上传即可.

  这个操作是将352的关键字替换函数还原为170的.至此,该问题解决.

测试:heycoffee

[本日志由 黑咖啡 于 2011-04-14 02:23:13 编辑]
上一篇: 降落了
下一篇: 《西藏往事》--音乐美,景色美,人物美,故事美,爱情美
文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags: 原创 PJ PJblog 3.2.8 352 后台 关键字 前台 无效 bug 修复
相关日志:
评论: 3 | 引用: 0 | 查看次数: -
test123
回复回复test123[2011-05-20 17:38:17 | | | del | 取消审核]
[ 正在加载评论信息,请稍候... ]
2010中国1
回复回复2010中国1[2011-05-13 20:44:02 | | | del | 取消审核]
[ 正在加载评论信息,请稍候... ]
月末
回复回复月末[2011-04-16 22:29:49 | | | del | 取消审核]
[ 正在加载评论信息,请稍候... ]
发表评论
昵 称:
密 码: 游客发言不需要密码.
邮 箱: 支持Gravatar头像.
网 址: 输入网址便于回访.
内 容:
验证码:
选 项:
虽然发表评论不用注册,但是为了保护您的发言权,建议您注册帐号.