<hr>[B]5、增加“所有文章”的静态页面输出[/B]<hr>
可以将所有文章输出到一个静态页面上,方便搜索引擎收录
打开c_system_event.asp,找到Function BlogReBuild_Previous()
删除endif 后面的objRS.close
在Call SaveToFile后面增加
CODE:
If (Not objRS.bof) And (Not objRS.eof) Then
Do While Not objRS.eof
Set objArticle=New TArticle
If objArticle.LoadInfoByID(objRS("log_ID")) Then
strPrevious=strPrevious & "<li><a href="""& objArticle.Url & """>" & objArticle.Title & "</a></li>"
End If
Set objArticle=Nothing
objRS.MoveNext
LOOP
End If
objRS.close
strPrevious=TransferHTML(strPrevious,"[no-asp]")
Call SaveToFile(BlogPath & "all.html",strPrevious,"utf-8",True)
all.html就是所有文章的静态页面,你可以调整这个语句让静态页面上增加文章摘要,文章时间等其它信息Do While Not objRS.eof
Set objArticle=New TArticle
If objArticle.LoadInfoByID(objRS("log_ID")) Then
strPrevious=strPrevious & "<li><a href="""& objArticle.Url & """>" & objArticle.Title & "</a></li>"
End If
Set objArticle=Nothing
objRS.MoveNext
LOOP
End If
objRS.close
strPrevious=TransferHTML(strPrevious,"[no-asp]")
Call SaveToFile(BlogPath & "all.html",strPrevious,"utf-8",True)
现在你就可以通过“你的博客地址+all.html“就可以访问所有文章了,你只需要在首页或文章页合适的地方加上这个页面的链接就行了。

