pjblog扩展统计代码
作者:我是禽兽 日期:2008-02-24 10:12
運行天數統計
str=replace(str,"$blog_RunDays$",DateDiff ("d","2006-06-04",date))
今日評論數
str=replace(str,"$Today_blog_CommNums$",Conn.ExeCute("Select COUNT(comm_ID) FROM blog_Comment Where Year(comm_PostTime)=Year(Now) and Month(comm_PostTime)=Month(Now) and Day(comm_PostTime)=Day(Now)")(0))
今日日志數
str=replace(str,"$Today_blog_LogNums$",Conn.ExeCute("Select COUNT(log_ID) FROM blog_Content Where Year(log_PostTime)=Year(Now) and Month(log_PostTime)=Month(Now) and Day(log_PostTime)=Day(Now)")(0))
今日留言數
str=replace(str,"$Today_MessageNums$",Conn.ExeCute("Select COUNT(book_id) FROM blog_book Where Year(book_PostTime)=Year(Now) and Month(book_PostTime)=Month(Now) and Day(book_PostTime)=Day(Now)")(0))
今日訪問數
str=replace(str,"$Today_VisitNums$",Conn.ExeCute("Select COUNT(coun_ID) FROM blog_Counter Where Year(coun_Time)=Year(Now) and Month(coun_Time)=Month(Now) and Day(coun_Time)=Day(Now)")(0))
今日引用數
str=replace(str,"$Today_blog_TbCount$",Conn.ExeCute("Select COUNT(tb_ID) FROM blog_Trackback Where Year(tb_PostTime)=Year(Now) and Month(tb_PostTime)=Month(Now) and Day(tb_PostTime)=Day(Now)")(0))
所有日志浏览量总和
str=replace(str,"$All_ViewNums$",Conn.Execute("Select SUM(log_ViewNums) FROM blog_Content")(0))
将后台BlogInfo模块的代码替换成下面的
日 志总数:今日$Today_blog_LogNums$篇,共$blog_LogNums$篇<br />评论总数:今日$Today_blog_CommNums$篇,共$blog_CommNums$篇<br />留言总数:今日$Today_MessageNums$条,共$blog_MessageNums$条<br />引用总数:今日$Today_blog_TbCount$篇,共$blog_TbCount$篇<br />会员总数:$blog_MemNums$人<br />在线人数:$blog_OnlineNums$人<br />今日访问:$Today_VisitNums$次<br />总计访问:$blog_VisitNums$次<br />日志浏览:$All_ViewNums$次<br />建站日期:2006-08-08<br />运行天数:$blog_RunDays$天
PJBLOG用TAG做文章关键字程序修改扩展方法
作者:我是禽兽 日期:2008-02-24 10:11
网页关键字对于搜索引擎的收录与排名是至关重要的。但是PJBLOG的关键字由程序作者设置成了他自己的固定关键字。对于我们发表的文章没有益处,只对PJBLOG作者可能有贡献。PJ为什么这样做不清楚,这得问他本人。
PJBLOG每篇日志都可以自己设置几个TAGS。这个TAGS主要是为了方便访客通过TAGS访问索引具有相同TAGS的日志。对于SEO可能起不到多少作用。因为这些TAGS并不被放如META的KEYWORDS内容中。PJBLOG论坛有网友提供了PJBLOG主程序修改,实现日志TAGS自动设置成文章的KEYWORDS
现转载过来以备不时之需:
首先打开article.asp,找到
if blog_postFile then
SQL="Select top 1 log_ID,log_CateID,log_title,Log_IsShow,log_ViewNums,log_Author,log_comorder,log_DisComment FROM blog_Content Where log_ID="&id&" and log_IsDraft=false"
else
SQL="Select top 1 log_ID,log_CateID,log_title,Log_IsShow,log_ViewNums,log_Author,log_comorder,log_DisComment,log_Content,log_PostTime,log_edittype,log_ubbFlags,log_CommNums,log_QuoteNums,log_weather,log_level,log_Modify,log_FromUrl,log_From,log_tag FROM blog_Content Where log_ID="&id&" and log_IsDraft=false"
end if
把它改成
SQL="Select top 1 log_ID,log_CateID,log_title,Log_IsShow,log_ViewNums,log_Author,log_comorder,log_DisComment,log_Content,log_PostTime,log_edittype,log_ubbFlags,log_CommNums,log_QuoteNums,log_weather,log_level,log_Modify,log_FromUrl,log_From,log_tag FROM blog_Content Where log_ID="&id&" and log_IsDraft=false"
然后打开header.asp,找到
<meta name="keywords" content=
改成
pjblog文章复制自动加版权信息
作者:我是禽兽 日期:2008-02-24 10:09
我在两处插入了代码:
在article.asp中50行
getBlogHead BlogTitle,getCate.cate_Name,getCate.cate_ID
%>
下面插入以下代码:
程序代码
<!--复制自动上加来源-->
<script type="text/javascript" charset="UTF-8">
document.body.oncopy=function(){
event.returnValue=false;
var t=document.selection.createRange().text;
var s="本文来源于<%=SiteName%> [<%=siteURL%>] 详细地址为:<%=siteURL%>article.asp?id=<%=id%> ";
clipboardData.setData('Text',' '+t+' '+s+' ');
}
</script>
在default.asp中第25行DIV下边插入
程序代码
<script type="text/javascript" charset="UTF-8">
document.body.oncopy=function(){
event.returnValue=false;
var t=document.selection.createRange().text;
var s="文本来源于『<%=SiteName%>』 〖<%=siteURL%>〗";
clipboardData.setData('Text',' '+t+' '+s+' ');
}
</script>
另附月光上的Z-Blog系统和WordPress:
对于Z-Blog系统来说,编辑b_article-single.html这个模板文件,在适当位置加入下面这些代码即可。
<script type="text/javascript">
document.body.oncopy=function(){
event.returnValue=false;
var t=document.selection.createRange().text;
var s="本文来源于<#ZC_BLOG_TITLE#> <#ZC_BLOG_HOST#> , 原文地址:<#article/url#> ";
clipboardData.setData('Text',' '+t+' '+s+' ');
}
</script>
对于WordPress系统来说,编辑themes下的模板文件single.php,在适当的位置加入以下代码即可。
<script type="text/javascript">
document.body.oncopy=function(){
event.returnValue=false;
var t=document.selection.createRange().text;
var s="本文来源于<?php bloginfo('name'); ?> <?php echo get_settings('home'); ?> , 原文地址: <?php the_permalink() ?> ";
clipboardData.setData('Text',' '+t+' '+s+' ');
}
</script>
我想做人了!
作者:我是禽兽 日期:2008-02-23 22:57
我要做人!我堕落了好久了,该是我清醒的时候了。未来的路还很长,我不想自己就这么一直堕落下去。我的未来不是梦,我的未来是那么的精彩。看啊!未来在向我招手呢!未来,等等我!我马上就来了。别落下我啊!
一篇关于高三回忆的文章——《花开不败》
作者:我是禽兽 日期:2008-02-23 17:22

我不知道应该怎样写,准确地说是不知道用怎样的文字把这一年的心情完整地串起来,让它们如绚丽的水晶不失原味地挂在那儿,让你们分享,让你们明白。
在这个热得要命的八月写下第一个字符的时候,我突然注意到窗外成片绽放着许多不知名的小花,红的,黄的,粉白的,澄蓝的,花花绿绿地漾在一起,满目漂亮的色彩。天啊,这些花是什么时候开放的呢?这样如火如荼的势头应该不会只有几天的时间吧。
我不知道这一年里这些花儿是不是也是这样漂亮地开放着,如果是,我想我应该感谢它们。我嗅得出空气里有许多甜美的味道,有一个很美丽的词突然冒出来:花开不败!
花开不败。
花开不败啊! 我想我终于可以平静下来,告诉你们这一年里发生的许多故事,我想无论将来再发生什么事情,这一年里的点点滴滴、滴滴点点,我是再也不会忘记了。
高三开始的前一个星期,开了一次家长会。
那是一次很严肃的家长会,一次没有人缺席,甚至没有人迟到的家长会。班主任在那次会议上调动起了家长几乎所有的情感。高三的重要性自是不用多言的,所谓"成也高三,败也高三",无论过去孩子们多么辉煌,也不论他们多么失败。班主任那么一个瘦弱的小姑娘,竟然靠在讲台边上一讲就是斗志昂扬的两个小时,无非是让我们相信,什么事情都是有可能发生的,奇迹或恶果,都会在这一年里戏剧般地粉墨登场。
学校为了让每个学生清楚地了解自己在班级、年级,甚至在区里、全市的排名位置,精心制作了一张高一高二的各科成绩排名表。现在想起来,我不得不佩服那张表的细致程度了。每一门成绩的总分、标分、名次,与年级里的均分对比情况,甚至还有精心设计的由此得出的成绩曲线走势图,最后还附带综合名次的具体分析。密密麻麻地挤满了一张纸,真可谓煞费苦心。
清除鼠标右键中的多余项,程序代码法
作者:我是禽兽 日期:2008-02-23 17:14
创建一个文本文档,输入 regsvr32 /u /s igfxpph.dll reg delete HKEY_CLASSES_ROOTDirectoryBackgroundshellexContextMenuHandlers /f reg add HKEY_CLASSES_ROOTDirectoryBackgroundshellexContextMenuHandlers ew /ve /d {D969A300-E7FF-11d0-A93B-00A0C90F2719} 保存为 任意名字.bat 运行即可... 注:(清除多余右键显卡)
