打开都是
告别没意思的生活...
网上找办法优化了下
看能不能提高点访问量
呵呵

在PJBlog博客根目录下找到header.asp文件,打到如下这一行:
If InStr(Replace(LCase(Request.ServerVariables("URL")), "", "/"), "/article.asp") = 0 Then
将如下加红部分代码复制到此行的前面即可,此段主要是增加了 TAG、关键字搜索、插件、分类相关页面的Title优化,而Pjblog本身对于这些类型只是默认的博客Title,全部跟主页显示的一样。


'标题搜索优化开始
IF Request.QueryString("tag") <> "" Then
BlogTitle = Request.QueryString("tag") & " - Tags" & " - " & BlogTitle
End If
IF Request.QueryString("SearchContent") <> "" Then
Dim stype
Select Case (LCase(Trim(Request.QueryString("searchType"))))
Case "title":stype="日志标题"
Case "content":stype="日志内容"
Case "comments":stype="日志评论"
Case "trackback":stype="引用通告"
End select
BlogTitle = Request.QueryString("SearchContent") & " - " & stype & "搜索结果" & " - " & BlogTitle
End If
IF Request.QueryString("plugins") <> "" Then
BlogTitle = Request.QueryString("plugins") & " - 其他" & " - " & BlogTitle
End If
IF IsInteger(cateID) = True Then
Dim Cate
Set Cate = New Category
Cate.Load(cateID)
BlogTitle = Cate.Cate_Name & " - " & BlogTitle
End If
'标题搜索优化结束



搞了半天没用,重新找了个方法:4月28日更新

打开header.asp
找到
复制代码在后面插入
复制代码找到BlogTitle = siteName & "-" & blog_Title
复制代码修改为If R_Atitle() = "" Then

BlogTitle = siteName & "-" & blog_Title

Else

BlogTitle = R_Atitle() & siteName

End If
复制代码请在下面下载附件

点我下载