预览模式: 普通 | 列表

pjblog扩展统计代码

在library.asp(common目录下面)的191行也就是 str=replace(str,"$blog_OnlineNums$",vOnline)下面添加查询代码(注意修改建站日期)

運行天數統計
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做文章关键字程序修改扩展方法

网页关键字对于搜索引擎的收录与排名是至关重要的。但是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文章复制自动加版权信息

我在两处插入了代码:
在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>

我想做人了!

曾经认为是今生今世的人,原来,于她,我什么都不是,连感情的主角都不是。所以,就选择放弃吧!也挺好。没什么,没有谁,谁都一样活,谁是谁的谁呢?也许,她会恨我这样的无情,会恨我当初答应她的那些承诺没能够一一兑现;也许,今生我们相见了也会装作互不相识,匆匆地擦肩而过;也许,等到我们都老了的时候会不经意间想起曾经还有那么一个人自己爱过的人;也许..............  事实上没有那么多的也许,现实就是现实。勇敢地面对现实,接受现实,挑战现实。未来的路还很长,为了一个不值得自己爱的人而虚度年华太不值得了,就像一位经济学家所说的那样:“人的一生最可怕的是永远在做‘赔本’的买卖。”


我要做人!我堕落了好久了,该是我清醒的时候了。未来的路还很长,我不想自己就这么一直堕落下去。我的未来不是梦,我的未来是那么的精彩。看啊!未来在向我招手呢!未来,等等我!我马上就来了。别落下我啊!
标签: 感触

一篇关于高三回忆的文章——《花开不败》


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

[阅读全文]

清除鼠标右键中的多余项,程序代码法

例如:建一个文本档案。然后把源代码复制进去后。保存成.bat形式的。到时候只要运行那个文件就行了。





创建一个文本文档,输入 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 运行即可... 注:(清除多余右键显卡)
?lt;?php if (!defined('IN_F2BLOG')) die ('Access Denied.');?>