修改去掉Zblog列表插件文章排行调用标题前面的时间
一、其中找的只是修改网页看到的时间,去掉方法有两种,如下:
1、找到网站根目录下的FUNCTION文件夹下面的c_system_base.asp文件,用记事本编辑查找Day(objArticle.PostTime),2),定位到这,来看到如下代码:
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 &
""
" title="
""
& objArticle.HtmlTitle &
""
"><span class="
"article-date"
">["
& Right(
"0"
& Month(objArticle.PostTime),
2
) &
"/"
& Right(
"0"
& Day(objArticle.PostTime),
2
) &
"]</span>"
& objArticle.Title &
"</a></li>"
End If
Set objArticle=Nothing
objRS.MoveNext
If objRS.eof Then Exit For
把上面代码中的["& Right("0" & Month(objArticle.PostTime),2) & "/" & Right("0" & Day(objArticle.PostTime),2) &"]删除保存上传覆盖,然后后台重建即可。
2、找到个人主题模板下面的CSS文件,在CSS代码里面添加.article-date{display:none;} 然后保存上传覆盖源文件即可。
这种修改去掉页面上的时间效果如图:
这个是修改前的
这个是修改后的效果
二、安装了巴士飞扬的列表插件,在文章调用时,鼠标放在文章标题上面会看到显示的时间,源码里看到形式(生成时间+文章名字)
例如:
1
|
<li><a href= "http://www.xxxx.com/post/8.html" title= "[2011-3-16 12:45:41] 洗鼻器原理介绍" >洗鼻器原理介绍</a></li> |
修改后title时间去掉就成这样:
1
|
<li><a href= "http://www.xxxx.com/post/8.html" title= "洗鼻器原理介绍" >洗鼻器原理介绍</a></li> |
具体是这样修改的:
找到巴士飞扬的文章调用的列表插件,在网站根目录下PLUGIN/busfly_randomsort/ 的include.asp文件。
用记事本编辑查找Not b_objRS.eof 定位到如下代码:
If (Not b_objRS.bof) And (Not b_objRS.eof) Then
For i=1 to out_count
Set busfly_randomsort_objArticle=New TArticle
If busfly_randomsort_objArticle.LoadInfoByID(b_objRS("log_ID")) Then
strOut=strOut & "<li><a href="""& busfly_randomsort_objArticle.Url & """ title=""[" & busfly_randomsort_objArticle.PostTime & "] " & busfly_randomsort_strReplace(busfly_randomsort_objArticle.Title,busfly_randomsort_chReplace) & """>" & busfly_randomsort_cutTitle(busfly_randomsort_objArticle.Title,busfly_randomsort_INTCUTLEN) & "</a></li>"
End If
Set busfly_randomsort_objArticle=Nothing
b_objRS.MoveNext
If b_objRS.eof Then Exit For
从上面代码中可以看出,影响中国时间显示的代码是[" & busfly_randomsort_objArticle.PostTime & "] 把这个代码删除保存上传覆盖后重建即可。
注意不要删除错哦,为了大家修改方便,我直接用删除号的代码替代,大家可以把下面的代码复制覆盖上面这段代码即可。(主要是引号和空格的问题,弄得反复试了几次才可以)
If (Not b_objRS.bof) And (Not b_objRS.eof) Then
For i=1 to out_count
Set busfly_randomsort_objArticle=New TArticle
If busfly_randomsort_objArticle.LoadInfoByID(b_objRS("log_ID")) Then
strOut=strOut & "<li><a href="""& busfly_randomsort_objArticle.Url & """ title=""" & busfly_randomsort_strReplace(busfly_randomsort_objArticle.Title,busfly_randomsort_chReplace) & """>" & busfly_randomsort_cutTitle(busfly_randomsort_objArticle.Title,busfly_randomsort_INTCUTLEN) & "</a></li>"
End If
Set busfly_randomsort_objArticle=Nothing
b_objRS.MoveNext
If b_objRS.eof Then Exit For
修改后,网页上看上去跟原来一样没什么变化,变化的是源代码里面的时间隐藏去掉了。
菜鸟一枚,写得不好,神人勿喷。
本文由洗鼻器博客http://www.eduotao.com
相关新闻>>
- 发表评论
-
- 最新评论 更多>>