Google网站管理员工具提示PJBlog3重复的标题标记解决方法

今天登录Google网站管理员工具,在"故障诊断→HTML建议"看到提示很多页面有重复的标题:



详细报告如下:



熟悉PJBlog的朋友知道,"ar​tic​le.​asp​?id​=xxxx"(A)是PJBlog文章页面的链接,那"de​fau​lt.​asp​?id​=xxxx"(B)是什么呢?测试了下,原来它是起了个中转的作用,最终还是跳转到A,这样的话,只要找出所有链接B改为A就好了,那问题是链接B在哪边呢?经过一番寻找,在首页文章列表中终于找着了:



PJBlog3重复的标题标记解决方法

①.打开class/cls_default.asp,找到如下代码:

分类:<a href="default.asp?cateID=<%=webLogArr(1,PageCount)%>" title="<%=getCate.cate_Intro%>"><%=getCate.cate_Name%></a> | <a href="?id=<%=webLogArr(0,PageCount)%>">固定链接</a>

修改如下(红色新增):

分类:<a href="default.asp?cateID=<%=webLogArr(1,PageCount)%>" title="<%=getCate.cate_Intro%>"><%=getCate.cate_Name%></a> | <a href="ar​tic​le.​asp?id=<%=webLogArr(0,PageCount)%>">固定链接</a>

②.打开header.asp,找到如下代码:

If InStr(Replace(LCase(Request.ServerVariables("URL")), "\", "/"), "/default.asp")<>0 Then
    Dim Tid
    If CheckStr(Request.QueryString("id"))<>Empty Then
        Tid = CheckStr(Request.QueryString("id"))
    End If
    If Len(Tid)>0 Then
        Dim rUrl
        If blog_postFile = 2 Then
            rUrl = caload(Tid)
        else
             rUrl = "article.asp?id=" & Tid
        end if
        RedirectUrl (rUrl)
        Response.end
    End If
End If

修改为:

If InStr(Replace(LCase(Request.ServerVariables("URL")), "\", "/"), "/default.asp")<>0 Then
    Dim Tid
    If CheckStr(Request.QueryString("id"))<>Empty Then
        Tid = CheckStr(Request.QueryString("id"))
    End If
    If Len(Tid)>0 Then
        Dim rUrl
        If blog_postFile = 2 Then
            rUrl = caload(Tid)
        ElseIf InStr(Request.ServerVariables("HTTP_REFERER"),Request.ServerVariables("HTTP_HOST")) > 0 Then '站外不跳转
             rUrl = "article.asp?id=" & Tid
        End If
        If rUrl<>"" Then
            RedirectUrl (rUrl)
            Response.end
        End If
    End If
End If


评论: 0 | 引用: 0 | 查看次数: 46444
发表评论
登录后再发表评论!