一笑而过

【建造师之家】建造师|造价工程师|造价员|监理工程师|考试资料免费下载!

« 来电精灵Pro 0.85C PhoneSharp0.83a3 破解版韬光养晦 »

将PJBlog2的存档列表改为下拉菜单形式

觉得PJBlog的日志归档(Archives)列表太长,十分不爽,就索性将它改成了下拉菜单的形式。
修改方法:打开common目录下的cache.asp,
将以下代码:

if action<>2 then
Dim archive_item_Len,Month_array
if ubound(blog_archive,1)=0 then archive="":exit function
Month_array=Array("一月","二月","三月","四月","五月","六月","七月","八月","九月","十月","十一月","十二月")
archive_item_Len=ubound(blog_archive,2)
For i=0 to archive_item_Len
archive=archive&""&blog_archive(1,i)&"年"&Month_array(blog_archive(2,i)-1)&" ["&blog_archive(0,i)&"]"
Next
end if


改成:
if action<>2 then
Dim archive_item_Len,Month_array
if ubound(blog_archive,1)=0 then archive="":exit function
Month_array=Array("一月","二月","三月","四月","五月","六月","七月","八月","九月","十月","十一月","十二月")
archive_item_Len=ubound(blog_archive,2)
archive=archive&""
end if
  • 相关文章:

发表评论:

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

日历

最新评论及回复

最近发表