第一步,修改c_system_event.asp文件,加入代码(其实是在文件的结尾加一个函数):
'*********************************************************
' 目的:一周热门日志显示 by 七夜 2005.11.22
'*********************************************************
Function BlogReBuild_Hotinaweek()
Dim i
Dim s
Dim objRS
Dim objStream
Dim objArticle
'Hotinaweek
Dim strPrevious
Set objRS=objConn.Execute("SELECT [log_ID],[log_title] FROM [blog_Article] WHERE ([log_ID]>0) AND ([log_Level]>1) and datediff('d',log_posttime,now())<8 ORDER BY [log_ViewNums] DESC")
If (Not objRS.bof) And (Not objRS.eof) Then
For i=1 to ZC_PREVIOUS_COUNT
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
If objRS.eof Then Exit For
Next
End If
objRS.close
strPrevious=TransferHTML(strPrevious,"[no-asp]")
Set objStream = Server.CreateObject("ADODB.Stream")
With objStream
.Type = adTypeText
.Mode = adModeReadWrite
.Open
.Charset = "utf-8"
.Position = objStream.Size
.WriteText = strPrevious
.SaveToFile BlogPath & "/include/hotinaweek.asp",adSaveCreateOverWrite
.Close
End With
Set objStream = Nothing
If strPrevious<>"" And ZC_STATIC_TYPE="shtml" Then
Call RemoveBOM("hotinaweek.asp")
End if
BlogReBuild_Hotinaweek=True
End Function
第二步,也是修改这个文件,在Blog ReBuild增加一行(大概在1138行可以找到这个模块,在1165行的分类BlogReBuild_Categorys后面一行加就可以了。我用的是z-blog的plus最新版。)
BlogReBuild_Hotinaweek
第三步,修改 c_html_js.asp文件,在(大概63到64行)
ElseIf f="misc" Then
f="MISC"
后面加上
ElseIf f="Hotinaweek" Then
f="Hotinaweek"
这样前面的工作就做好了,重建索引和文件重建后在include文件夹下面看看有没有Hotinaweek.asp,里面应该是有默认的按点击排名的十条,如果想显示更多的条数,在后台的全局管理里面的程序选项里有一个ZC_PREVIOUS_COUNT变量,是默认的显示最新文章数量,一周热门也是用的这个变量,其默认值为10,可以修改这个变量的值来控制显示的文章数目,但如果修改这个变量的数值,那么最新文章的数量也会随之改变。
第四步,最后在首页调用这个就可以了。调用方法,假如放在文章分类的后面,那么在
<div class="function" id="divCatalog">
<h3><#ZC_MSG026#></h3>
<ul>
<#CACHE_INCLUDE_CATALOG#>
</ul>
</div>
后面加上
<div class="function" id="divHotinaweek">
<h3>一周热门</h3>
<ul>
<script language="JavaScript" src="<#ZC_BLOG_HOST#>c_html_js.asp?include=Hotinaweek" type="text/javascript"></script>
</ul>
</div>
这段代码就可以了,索引重建和文件重建后再看,应该出来了把,这下写的够详细了把!所用代码由论坛上的七夜提供。






