PJ-Blog技巧集合

2007年3月14日 | 分类: | 标签:

<span style="color:Red">为Blog添加漂亮的“载入中”对话框</span>

想不到竟然这么多朋友想知道我的载入画面是怎么做的~~呵呵,好像这个在PJBlog的论坛上曾经见过,不过还是再写一篇日志吧。演示嘛,还是看我的网站就看到了。

首先,打开header.asp,在[head]的后面,插入以下代码:

程序代码

<%'=======X-Force添加的Loading界面==========%>

<style type="text/css">

#loader_container {

text-align:center;

position:absolute;

top:40%;

width:100%;

left: 0;

}

#loader {

font-family:Tahoma, Helvetica, sans;

font-size:11.5px;

color:#000000;

background-color:#FFFFFF;

padding:10px 0 16px 0;

margin:0 auto;

display:block;

width:230px;

border:1px solid #5a667b;

text-align:left;

z-index:2;

}

#loader_bg {background-color:#e4e7eb;

position:relative;

top:8px;

left:8px;

height:7px;

width:213px;

font-size:1px}

#progress {

height:5px;

font-size:1px;

width:1px;

position:relative;

top:1px;

left:0px;

background-color:#77A9E0

}

</style>

<script language="JavaScript">

//读取框

var t_id = setInterval(animate,20);

var pos=0;

var dir=2;

var len=0;

function animate()

{

var elem = document.getElementById('progress');

if(elem != null) {

if (pos==0) len += dir;

if (len>32 || pos>179) pos += dir;

if (pos>179) len -= dir;

if (pos>179 && len==0) pos=0;

elem.style.left = pos;

elem.style.width = len;

}

}

function remove_loading() {

this.clearInterval(t_id);

var targelem = document.getElementById('loader_container');

targelem.style.display='none';

targelem.style.visibility='hidden';

initJS();

}

</script>

<%'============X-Force添加的Loading界面==========%>

然后,找到:

程序代码

<body onload="initJS()" onkeydown="PressKey()">

将其修改为:

程序代码

<body onload="remove_loading()" onkeydown="PressKey()">

<%'===========X-Force的Loading界面==========%>

<div id="loader_container">

<div id="loader">

<div align="center">

本站靓靓の页面正在很用力de加载中... <br>

版权归 www.X-Force.cn 所有

</div>

<div id="loader_bg"><div id="progress"> </div></div>

</div>

</div>

<%'===========X-Force的Loading界面==========%>

好了,就这么简单。

注:尊重版权,转载时请注明出处,谢谢合作。[pagesplitxx]

<span style="color:Red">PJBlog2 Plugin:AboutMePro</span>

这个功能有一定加强的AboutMePro原先只是我对PuterJam的AboutMe插件按照我的需要作了一些小小的改进,使其能够显示更多的内容,因为我觉得PuterJam的显示的信息太少,并且是以表格数据的形式呈现,不够自由和个性化。而且本来也不是插件的形式,更没有打算要公开,但今天有某网友对此表示了兴趣,因此稍微用了点时间将其改为PJBlog2插件,使其更易于使用,同时也顺便添加了一些新的功能。

  由于改的比较匆忙,未作全面测试,若有发现错误请速告知。

  现在的AboutMePro的功能有:

  1.显示的附加信息的数据从特定的日志中获取,因此可包含图片、Flash,甚至音频、视频,只要PJBlog2支持的都可以在AboutMePro中显示,更加自由,富有个性化。

  2.可自由选择隐藏或显示附加信息和个人信息。

  3.可选择是否显示更新信息。

  4.个人档案页面中有修改附加信息的入口,管理员可直接进行修改。

  使用方法:新建一篇关于你要在AboutMePro中显示的附加信息的日志,记住ID,在后台插件基本设置中选择显示附加信息,并添入正确的日志ID。

  具体的显示效果可进入

<a target="_blank" href="http://www.jinnlife.com/LoadMod.asp?plugins=AboutMePro">以下演示地址</a>

  插件名称:AboutMePro

  发布时间:2006-02-17

  设计作者:JinnLynn

  使用说明:本人原创。免费使用,但必须遵循创作共用(Creative Commons)约定。

<img src="http://www.jinnlife.com/images/download.gif" border="0" alt=""/><a target="_blank" href="http://www.jinnlife.com/attachments/Design/Plugin_AboutMePro.rar">点击下载此文件</a>

<span style="color:Red">PJ-Blog教程┊为你的置顶日志添加醒目的“置顶”标识</span>

是不是觉得PJBlog置顶的日志标题不够醒目?想修改吗?其实不难~来,我们加个醒目的标题!

PJBlog分静态日志和动态日志两种模式,且静态和动态时都有普通显示和列表显示日志的选项,所以,我们要改4个地方。

动态模式:

打开class/cls_default.asp 搜索

<div class="UBBPanel"><div class="UBBTitle"><img src="images/code.gif" style="margin:0px 2px -3px 0px" alt="程序代码"/> 程序代码</div><div class="UBBContent"><%If CanRead Then%></div></div>

(共找到2个,一个普通模式,一个列表模式,都要改)

第一处,原来是这样:

<div class="UBBPanel"><div class="UBBTitle"><img src="images/code.gif" style="margin:0px 2px -3px 0px" alt="程序代码"/> 程序代码</div><div class="UBBContent"><a class="titleA" href="article.asp?id=<%=webLogArr(0,PageCount)%>"><%=HtmlEncode(webLogArr(3,PageCount))%></a></div></div>

修改成:

[code]<%'=================X-Force修改的动态普通模式置顶字符=================%>

<a class="titleA" href="article.asp?id=<%=webLogArr(0,PageCount)%>"><%if webLogArr(9,PageCount) then response.Write "<font color='#ff0000'>热点聚焦∴ </font>"%><%=HtmlEncode(webLogArr(3,PageCount))%></a>

<%'=================X-Force修改的动态普通模式置顶字符=================%>[/code]

第二处:

原来是这样<div class="UBBPanel"><div class="UBBTitle"><img src="images/code.gif" style="margin:0px 2px -3px 0px" alt="程序代码"/> 程序代码</div><div class="UBBContent"><a href="<%=logLink%>" title="作者:<%=webLogArr(2,PageCount)%> 日期:<%=DateToStr(webLogArr(4,PageCount),"Y-m-d")%>"><%=HtmlEncode(webLogArr(3,PageCount))%></a></div></div>

我改成:[code]<%'=================X-Force修改的动态列表模式置顶字符=================%>

<a href="<%=logLink%>" title="作者:<%=webLogArr(2,PageCount)%> 日期:<%=DateToStr(webLogArr(4,PageCount),"Y-m-d")%>"><%if webLogArr(9,PageCount) then response.Write "<font color='#ff0000'>热点聚焦∴ </font>"%><%=HtmlEncode(webLogArr(3,PageCount))%></a>

<%'=================X-Force修改的动态列表模式置顶字符=================%>[/code]

静态模式:

打开class/cls_logAction.asp

搜索<div class="UBBPanel"><div class="UBBTitle"><img src="images/code.gif" style="margin:0px 2px -3px 0px" alt="程序代码"/> 程序代码</div><div class="UBBContent">Temp1=Replace(Temp1,"<$log_Title$>",HtmlEncode(log_View("log_Title")))</div></div>

改为:[code]'============X-Force修改的静态普通模式“置顶”字符===========

'原来是:

'Temp1=Replace(Temp1,"<$log_Title$>",HtmlEncode(log_View("log_Title")))

'现在改为:

if log_View("log_IsTop") then

Temp1=Replace(Temp1,"<$log_Title$>","<font color='#ff0000'>热点聚焦∴ </font>"&HtmlEncode(log_View("log_Title")))

Else

Temp1=Replace(Temp1,"<$log_Title$>",HtmlEncode(log_View("log_Title")))

End if

'============X-Force修改的静态普通模式“置顶”字符===========[/code]

刚改完的上面是普通模式,下面是列表模式

搜索:<div class="UBBPanel"><div class="UBBTitle"><img src="images/code.gif" style="margin:0px 2px -3px 0px" alt="程序代码"/> 程序代码</div><div class="UBBContent">Temp2=Replace(Temp2,"<$log_Title$>",HtmlEncode(log_View("log_Title")))</div></div>

改为:[code]'============X-Force修改的静态列表模式“置顶”字符===========

'原本是这样:

'Temp2=Replace(Temp2,"<$log_Title$>",HtmlEncode(log_View("log_Title")))

'现在改为:

if log_View("log_IsTop") then

Temp2=Replace(Temp2,"<$log_Title$>","<font color='#ff0000'>热点聚焦∴ </font>"&HtmlEncode(log_View("log_Title")))

Else

Temp2=Replace(Temp2,"<$log_Title$>",HtmlEncode(log_View("log_Title")))

End if

'============X-Force修改的静态列表模式“置顶”字符===========[/code][pagesplitxx]

<span style="color:Red">Yupoo相册插件更新, For PJBlog增强版V1.2 安装说明 下载</span>

Yupoo相册 For <a target="_blank" href="http://www.pjhome.net/">PJBlog</a>增强版 V1.2 插件安装说明

by xiwen

e-mail: xiwen0217@gmail.com

演示地址:

<span style="color:Red"><a target="_blank" href="http://www.nhljz.cn/">http://www.nhljz.cn</a></span>

===========================================

在原有的Yupoo相册基础上进行了优化,增加了功能,感谢yupoo的gofeeling的帮助修改.

2006年11月15日 V1.2 修改如下:

1.取消通过access数据库记录API信息,转为读写xml来记录API.

2.更新完善自动安装相册的lightbox效果

2006年10月26日 V1.1 修改如下:

1.修正了因为服务器不支持ACCESS2003数据库导致的 Provider=Microsoft.Jet.OLEDB.4.0;Data

Source=F:\****\plugins\yupoo\db\yupoo_config.aspDB

Error: 424:Object required

数据库读写错误.

2.解决绑定API关闭浏览器再次访问相册出现"该系统还未配置我的相册"的错误.

3.简化上一版本的安装步骤,并且不暴露API.

2006年10月19日 V1.0 修改如下:

1. 规范了排列方法,避免出错.

2.相册中图片采用75*75小图标显示,提高下载速度(由于yupoo目前还没有提供相册中图片分页功能,所以有的相册里面照片很多会影响下载速度)

3.结合lightbox插件,点击后可以看到500像素的大图,不需要访问yupoo网站,点开大图后也有链接可以链接到yupoo上的原始图片,

4.增加了根据标签列出照片列表的功能,

--------------------------------------------------------------------------------------------------------------------------------------------

安装yupoo相册(安装方法同原有yupoo相册,步骤如下)

1. 这是利用Yupoo API实现的一个<a target="_blank" href="http://www.pjhome.net/">PJBlog</a>插件的样例, 试用于<a target="_blank" href="http://www.pjhome.net/">PJBlog</a> 2.3以上版本

通过这个插件,您可以在您的<a target="_blank" href="http://www.pjhome.net/">PJBlog</a>上使用来自Yupoo的服务!

2. 将压缩包中的文件解压拷贝到您的<a target="_blank" href="http://www.pjhome.net/">PJBlog</a>安装目录

 

############# 为保证安全 ##########################

(1) 请进入 /plugins/yupoo/db/ 目录,重命名yupoo_config.xml 如:/plugins/db/you_can_not_find_it.xml

 

(2) 然后打开 /plugins/yupoo/common/const.asp 找到

YUPOO_DB_PATH = Context_Path & "plugins/yupoo/db/yupoo_config.xml"

将其中yupoo_config.asp替换成你第一步改变后的名称

###############################################

3. 使用本插件之前,请确保您已经是Yupoo的用户, 并且申请了API KEY

 

注册成为Yupoo用户:

 

<a target="_blank" href="http://www.yupoo.com/account/signup">http://www.yupoo.com/account/signup</a>

申请API KEY

 

<a target="_blank" href="http://www.yupoo.com/services/api/apply">http://www.yupoo.com/services/api/apply</a>

在网站通过您的API KEY申请后, 请登录下面地址配置您的API KEY:

 

<a target="_blank" href="http://www.yupoo.com/services/api/keys">http://www.yupoo.com/services/api/keys</a>

(1)应用程序标题: 随便填写

(2)应用程序描述: 随便填写

(2) 应用程序主页: 请输入<a target="_blank" href="http:///">http://</a>您的PJBLOG所在地址 如: <a target="_blank" href="http://www.stoyard.com/">http://www.stoyard.com</a>/blog

(1) 认证类型: 请选择Web应用

(2) Web应用重定向地址: 请输入<a target="_blank" href="http:///">http://</a>您的PJBLOG所在地址/plugins/yupoo/yp_bind.asp 如: <a target="_blank" href="http://www.stoyard.com/">http://www.stoyard.com</a>/blog/plugins/yupoo/yp_bind.asp

保存配置后即可, 请记下这个界面的API KEY 和 Shared Secret, 作为下一步绑定时使用!

4. 进入

<a target="_blank" href="http://www.pjhome.net/">PJBlog</a>后台管理 -> 界面与插件 -> 安装模块插件 -> 我的Yupoo相册

安装完成后, 进入 <a target="_blank" href="http://www.pjhome.net/">PJBlog</a>后台管理 -> 界面与插件 -> 已装插件管理 -> 我的Yupoo相册 -> 高级设置

 

根据界面提示输入相应地API KEY和Shared Secret 即可完成绑定

如果出现yupoo的登陆界面,则输入 email 和 密码 完成登陆,然后会出现绑定成功画面

 

#####################################

Yupoo API为保证用户的信息安全, 回避了直接采用用户名和密码进行信息绑定的方式,而是通过APIKEY和Shared Key的方式,保证了用户数据在跨站点间数据传递的安全性.

#################################

<strong>

<a target="_blank" href="http://www.stoyard.com/attachments/month_0611/yupoo_pro_1.2.rar">点击下载yupoo相册增强版V1.2</a>

</strong>

<span style="color:Red">[功能] 每篇日志右下角加上"返回顶部"</span>

第一步:编辑class\cls_default.asp文件,找到以下代码:

| 引用: <%=webLogArr(7,PageCount)%> | 查看次数: <%=webLogArr(8,PageCount)%>

在后面加上: | <a href="javascript:scroll(0,0)">返回顶部</a>

第二步:("站点基本设置->静态日志模志"没有开启则不需要做这一步!)

站点基本设置->初始化数据->重新生成所有日志到文件。

如需在单条日志文件也实现此功能

第一步:编辑class\cls_article.asp文件,找到以下代码:

<%=log_ViewArr(12,0)%> | 引用: <%=log_ViewArr(13,0)%> | 查看次数: <%=log_ViewArr(4,0)%>

在后面加上: | <a href="javascript:scroll(0,0)">返回顶部</a>

第二步:("站点基本设置->静态日志模志"没有开启则不需要做这一步!)

站点基本设置->初始化数据->重新生成所有日志到文件。

效果见:http://www.sweethoney.cn

原文地址:http://www.sweethoney.cn/article.asp?id=35

有网友回复可以此代码代替:<a href="?#top">返回顶部</a>

经本人验证,opera,firefox对此代码支持都不好,无法实现返回顶部的功能.

建议使用<a href="javascript:scroll(0,0)">返回顶部</a>建,此代码完美支持opera,firefox,ie[pagesplitxx]

<span style="color:Red"><strong>评论、留言、后台管理等处直接显示用户地址 实现方法</strong></span>

<a target="_blank" href="http://bbs.pjhome.net/viewthread.php?tid=11100&pid=68103&page=1&extra=page%3D1#pid68103">http://bbs.pjhome.net/viewthread.php?tid=11100&pid=68103&page=1&extra=page%3D1#pid68103</a>

<span style="color:Red"><strong>用asp打包或解压xml文件_asp程序</strong></span>

<a target="_blank" href="http://www.isll.cn/article.asp?id=318">http://www.isll.cn/article.asp?id=318</a>

<span style="color:Red"><strong>增加被百度等搜索引擎的优化方法之一</strong></span>

<a target="_blank" href="http://www.isll.cn/article.asp?id=199">http://www.isll.cn/article.asp?id=199</a>

<span style="color:Red"><strong>如何在首页上直接显示登陆</strong></span>

说明,这个并不是我写的,不知道在哪看到的,问的人实在太多,我就给贴上

打开 common/library.asp文件,

**********************************************

用户面板

'**********************************************

在这个范围贴上下面的代码

'**********************************************

输出日记统计信息

'**********************************************

[code]function userPanel()

userPanel=""

if memName<>Empty then userPanel=userPanel&" <b>"&memName&"</b>,欢迎你!<br/>你的权限: "&stat_title&"<br/><br/>"

if stat_Admin=true then userPanel=userPanel+"<a href=""control.asp"" class=""sideA"" accesskey=""3"">系統管理</a>"

if stat_AddAll=true or stat_Add=true then userPanel=userPanel+"<a href=""blogpost.asp"" class=""sideA"" accesskey=""N"">发表日记</a>"

if (stat_AddAll=true or stat_Add=true) and (stat_EditAll or stat_Edit) then

if isEmpty(session(CookieName&"_draft_"&memName)) then

session(CookieName&"_draft_"&memName)=conn.execute("select count(log_ID) from blog_Content where log_Author='"&memName&"' and log_IsDraft=true")(0)

SQLQueryNums=SQLQueryNums+1

end if

if session(CookieName&"_draft_"&memName)>0 then

userPanel=userPanel+"<a href=""default.asp?display=draft"" class=""sideA"" accesskey=""D""><strong>编辑草稿 ["&session(CookieName&"_draft_"&memName)&"]</strong></a>"

else

userPanel=userPanel+"<a href=""default.asp?display=draft"" class=""sideA"" accesskey=""D"">编辑草稿</a>"

end if

end if

if memName<>Empty then

userPanel=userPanel&"<a href=""member.asp?action=edit"" class=""sideA"" accesskey=""M"">修改資料</a><a href=""login.asp?action=logout"" class=""sideA"" accesskey=""Q"">退出系统</a>"

else

userPanel=userPanel&"<form name=""checkUser"" action=""login.asp"" method=""post""><input name=""action"" type=""hidden"" value=""login""/><label><b>用户名︰</b><input name=""username"" type=""text"" size=""12"" class=""userpass"" maxlength=""24""/></label><br/><label><B>密 码︰</B><input name=""password"" type=""password"" size=""12"" class=""userpass""/></label><br/><label><B>验证码︰</B><input name=""validate"" type=""text"" size=""4"" class=""userpass"" maxlength=""4""/>"&getcode()&"</label><br/><label><input name=""KeepLogin"" type=""checkbox"" value=""1""/>记住我的登陆信息</label><br/><input type=""submit"" value=""登 陆"" class=""userbutton""/> <input type=""button"" value=""注 册"" class=""userbutton"" onclick=""location.href='register.asp'""/></form>"

end if

end function[/code]

<span style="color:Red"><strong>调用方法┊PJBLOG首页调用</strong></span>

把本文的代码,新键文件topblog.asp,上传到你的博客空间即可.

在你要显示博客首页调用的地方:

加入如下代码即可

<script language="javascript" src="你的网址/topblog.asp?showtype=4&TopLen=7&titleLength=50">

[code]<!--#include file="const.asp" -->

<!--#include file="conn.asp" -->

<!--#include file="common/cache.asp" -->

<!--#include file="common/function.asp" -->

<!--#include file="common/ubbcode.asp" -->

<%

'==================================================================================================

'File name: topblog.asp

'首页调用文件

'原文更新时间: 2005-12-25

'清风修改时间: 2006-09-22

'QQ: 110125707 MSN: anwellsz@msn.com Blog.Wind88.Net

'showType 输出类型,类型有五种

'留空 = [分类]标题+作者

'1 = [分类]标题+日期

'2 = 标题+作者

'3 = 标题+日期

'4 = 标题

'titleLength 标题长度

'authorLength 作者名称长度

'topLen 调用几条记录

'示例: <script language="javascript" src="你的网址/topblog.asp?showtype=4&TopLen=7&titleLength=50">

'==================================================================================================

getInfo(1)

 

Response.Charset = "UTF-8"

Response.Expires=60

Dim cate_ID,FeedCate,FeedTitle,memName,FeedRows

Dim showType,titleLength,authorLength,topLen

cate_ID=CheckStr(Request.QueryString("cateID"))

showType=Request.QueryString("showType")

titleLength=Request.QueryString("titleLength")

authorLength=Request.QueryString("authorLength")

topLen = Request.QueryString("topLen")

If Not isinteger(topLen) Then topLen = 10

if IsInteger(titleLength)=false then titleLength=20

if IsInteger(authorLength)=false then authorLength=6

FeedCate=False

IF IsInteger(cate_ID) = False Then

SQL="Select TOP "&topLen&" L.log_ID,L.log_Title,l.log_Author,L.log_PostTime,C.cate_Name,C.cate_ID,log_IsTop FROM blog_Content AS L,blog_Category AS C Where C.cate_ID=L.log_cateID AND L.log_IsShow=true AND L.log_IsDraft=false and C.cate_Secret=false orDER BY log_IsTop,log_PostTime DESC"

Else

SQL="Select TOP "&topLen&" L.log_ID,L.log_Title,l.log_Author,L.log_PostTime,C.cate_Name,C.cate_ID,log_IsTop FROM blog_Content AS L,blog_Category AS C Where log_cateID="&cate_ID&" AND C.cate_ID=L.log_cateID AND L.log_IsShow=true AND L.log_IsDraft=false and C.cate_Secret=false orDER BY log_IsTop,log_PostTime DESC"

FeedCate=True

End If

Dim RS,DisIMG,i

Set RS=Conn.ExeCute(SQL)

if RS.EOF or RS.BOF then

ReDim FeedRows(0,0)

else

if FeedCate then FeedTitle=SiteName & " - " & RS("cate_Name")

FeedRows=RS.getrows()

end if

RS.close

set RS=nothing

Conn.Close

Set Conn=Nothing

if ubound(FeedRows,1)=0 then

%>

document.write ("没有找到任何日志")

<%

else

for i=0 to ubound(FeedRows,2)

select case showType

case 1:

%>

document.write ("<div><span style=\"float:right\"><%=DateToStr(FeedRows(3,i),"Y-m-d")%></span>[<a href=\"<%=SiteURL&"default.asp?cateID="&FeedRows(5,i)%>\" target=\"_blank\"><%=toUnicode(FeedRows(4,i))%></a>]<a href=\"<%=SiteURL&"default.asp?id="&FeedRows(0,i)%>\" target=\"_blank\" title=\"<%=toUnicode(FeedRows(1,i))%>\"><%=toUnicode(CutStr(FeedRows(1,i),titleLength))%></a></div>")

<%

case 2:

%>

document.write ("<div><span style=\"float:right\"><a href=\"<%=SiteURL%>\" title=\"<%=toUnicode(FeedRows(2,i))%>\"><%=toUnicode(CutStr(FeedRows(2,i),authorLength))%></a></span><a href=\"<%=SiteURL&"default.asp?id="&FeedRows(0,i)%>\" target=\"_blank\" title=\"<%=toUnicode(FeedRows(1,i))%>\"><%=toUnicode(CutStr(FeedRows(1,i),titleLength))%></a></div>")

<%

case 3:

%>

document.write ("<div><span style=\"float:right\"><%=DateToStr(FeedRows(3,i),"Y-m-d")%></span><a href=\"<%=SiteURL&"default.asp?id="&FeedRows(0,i)%>\" target=\"_blank\" title=\"<%=toUnicode(FeedRows(1,i))%>\"><%=toUnicode(CutStr(FeedRows(1,i),titleLength))%></a></div>")

<%

case 4:

%>

document.write ("<div> <a href=\"<%=SiteURL&"default.asp?id="&FeedRows(0,i)%>\" target=\"_blank\" title=\"<%=toUnicode(FeedRows(1,i))%>\" style=\"color:#0469C4;TEXT-DECORATION: underline\"><%=toUnicode(CutStr(FeedRows(1,i),titleLength))%></a></div>")

<%

case else:

%>

document.write ("<div><span style=\"float:right\"><a href=\"<%=SiteURL%>\" title=\"<%=toUnicode(FeedRows(2,i))%>\"><%=toUnicode(CutStr(FeedRows(2,i),authorLength))%></a></span>[<a href=\"<%=SiteURL&"default.asp?cateID="&FeedRows(5,i)%>\" target=\"_blank\"><%=toUnicode(FeedRows(4,i))%></a>]<a href=\"<%=SiteURL&"default.asp?id="&FeedRows(0,i)%>\" target=\"_blank\" title=\"<%=toUnicode(FeedRows(1,i))%>\"><%=toUnicode(CutStr(FeedRows(1,i),titleLength))%></a></div>")

<%

end select

next

end if

function toUnicode(str) 'To Unicode

dim i, unicodeF, getUnicode

for i=1 to len(str)

unicodeF=Mid(str,i,1)

getUnicode=getUnicode & chr(38) & chr(35) & chr(120) & Hex(ascw(unicodeF)) & chr(59)

next

toUnicode=getUnicode

end function

%>[/code][pagesplitxx]

<span style="color:Red">垃圾引用防止补丁</span>

http://bbs.pjhome.net/viewthread.php?tid=9491&highlight=%B2%E5%BC%FE

<span style="color:Red">修改PJblog2的日志日期归档</span>

PJBlog2的日志日期归档(即Archive栏)当跨越时间过长后,就会导致侧边栏也过长,再加上如果友情链接栏也过长的话就会导致整个页面不协调,今天逛逛PJblog官方交流论坛,在里面发现了网友自己动手改动的简短日期归档,把方法摘录下来,方便下次升级是使用。

在改动之前,首先打开common/cache.asp,用任意的文本或网页编辑软件打开,在275行附近找到处理日志归档的函数archive,我们的修改都在这个函数中完成。

[code]

'-----------------读取日志归档缓存--------------------

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&"<a class=""sideA"" href=""default.asp?log_Year="&blog_archive(1,i)&"&log_Month="&blog_archive(2,i)&""" title=""查看当前日期的日志"">"&blog_archive(1,i)&"年"&Month_array(blog_archive(2,i)-1)&" ["&blog_archive(0,i)&"]</a>"

Next

end if

end function

'=====================End Function========================

[/code]

方法一:来自何昕博客(http://www.hxblog.net/LoadMod.asp?plugins=GuestBookForPJBlog&page=7)

将以下代码覆盖掉原文件中“读取日志归档缓存”后从“if action<>2 then”到“end if”之间的所有代码。

[code]

if action<>2 then

Dim archive_item_Len,Month_array,TempYear,MonthCounter

if ubound(blog_archive,1)=0 then archive="":exit function

Month_array=Array("01月","02月","03月","04月","05月","06月","07月","08月","09月","10月","11月","12月")

archive_item_Len=ubound(blog_archive,2)

TempYear=blog_archive(1,0)

MonthCounter=0

For i=0 to archive_item_Len

IF i=0 Then archive="<a class=""sideA"" style=""margin:0px 0px 0px -2px;"" href=""default.asp?log_Year="&blog_archive(1,i)&""" title=""查看"&blog_archive(1,i)&"年的日志"">"&blog_archive(1,i)&"</a>"

IF blog_archive(1,i)=TempYear Then

archive=archive&"<a style=""margin-right:3px;"" href=""default.asp?log_Year="&blog_archive(1,i)&"&log_Month="&blog_archive(2,i)&""" title="""&blog_archive(1,i)&"年"&blog_archive(2,i)&"月有"&blog_archive(0,i)&"篇日志"">"&Month_array(blog_archive(2,i)-1)&"</a>"

MonthCounter=MonthCounter+1

IF MonthCounter=5 Then MonthCounter=0:archive=archive&"<br/>"

Else

MonthCounter=1

archive=archive&"<a class=""sideA"" style=""margin:6px 0px 0px -2px;"" href=""default.asp?log_Year="&blog_archive(1,i)&""" title=""查看"&blog_archive(1,i)&"年的日志"">"&blog_archive(1,i)&"</a>"

archive=archive&"<a style=""margin-right:3px;"" href=""default.asp?log_Year="&blog_archive(1,i)&"&log_Month="&blog_archive(2,i)&""" title="""&blog_archive(1,i)&"年"&blog_archive(2,i)&"月有"&blog_archive(0,i)&"篇日志"">"&Month_array(blog_archive(2,i)-1)&"</a>"

TempYear=blog_archive(1,i)

End IF

Next

end if

[/code]

此外为了使月份能够按顺序输出还需要将该函数前面的“写入日志归档缓存”中的“Month([log_PostTime]) Desc”改为“Month([log_PostTime]) ASC”。

OK,最后再到后台管理中重建数据缓存就一切搞定了。

PS:某些皮肤的侧边较窄,如果发生撑破侧边栏的话,可将代码中的“MonthCounter=6”的数字改小,或者改动margin-right:3px; 。

方法二:来自异次元の时空隧道(http://www.x-force.cn/article.asp?id=101)

将以下代码覆盖掉原文件中“读取日志归档缓存”后从“if action<>2 then”到“end if”之间的所有代码。

[code]

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)

'==========X-Force修改的日志归档下拉列表==========

archive="<div style='OVERFLOW: hidden; HEIGHT:0px'> </div><select onChange='window.location.href=this.options[this.selectedIndex].value'>"

archive=archive&"<option selected value='#'>日志归档</option>"

For i=0 to archive_item_Len

archive=archive&"<option value='default.asp?log_Year="&blog_archive(1,i)&"&log_Month="&blog_archive(2,i)&"'>"&blog_archive(1,i)&"年"&Month_array(blog_archive(2,i)-1)&" ["&blog_archive(0,i)&"]</option>"

'==========X-Force修改的日志归档下拉列表===========

Next

archive=archive&"</select>"

end if

[/code]

[pagesplitxx]

<span style="color:Red">为PJBLOG添加侧边栏整合模块</span>

具体修改如下:

1. 先下载所需的图片及CSS文件: <a target="_blank" href="http://fsnhljz.ys168.com">点击这里去下载文件:侧边栏整合模块</a>

解压缩以后将tabSide文件夹上传到blog的根目录下。

2. 新建一个侧边拦模块,为其加入以下代码:

[code]

<link href="tabSide/style.css" rel="stylesheet" type="text/css" />

<script type="text/javascript">

var lastNum = 0;

function $(id){

return document.getElementById(id);

}

function Select(num){

if (lastNum != 0){

$("sideTab" + lastNum).className = $("sideTab" + lastNum).className.replace("sideTabSelect", "sideTabUnselect");

$("sideTabContent" + lastNum).style.display = "none";

}

$("sideTab" + num).className = $("sideTab" + num).className.replace("sideTabUnselect", "sideTabSelect");

$("sideTabContent" + num).style.display = "block";

lastNum = num;

}

</script>

<div id="sideTabContainer">

<div id="sideTabRow1" class="sideTabRow">

<div id="sideTab1" class="sideTab sideTabL sideTabUnselect" onmouseover="Select(1)">标签A</div>

<div id="sideTab2" class="sideTab sideTabR sideTabUnselect" onmouseover="Select(2)">标签B</div>

<div class="sideTabContentContainer">

<div id="sideTabContent1" class="sideTabContent sideTabContentL">标签A的内容</div>

<div id="sideTabContent2" class="sideTabContent sideTabContentR">标签B的内容</div>

</div>

</div>

<div id="sideTabRow2" class="sideTabRow">

<div id="sideTab3" class="sideTab sideTabL sideTabUnselect" onmouseover="Select(3)">标签C</div>

<div id="sideTab4" class="sideTab sideTabR sideTabUnselect" onmouseover="Select(4)">标签D</div>

<div class="sideTabContentContainer">

<div id="sideTabContent3" class="sideTabContent sideTabContentL">标签C的内容</div>

<div id="sideTabContent4" class="sideTabContent sideTabContentR">标签D的内容</div>

</div>

</div>

</div>

<script type="text/javascript">

Select(1);

</script>

[/code]

将其中红色部分的文字替换为想要整合的侧边栏的标题,蓝色替换为侧边栏的内容。

3. 修改需要整合的插件

将需要整合的侧边栏插件的install.xml文件中的sideA替换为tabSideA,然后修复插件。

注:

整合过后的插件请设置为隐藏,但不要卸载。

最新回复不是插件,它的相关代码在cache.asp文件里面。

<span style="color:Red">在pjblog日志内放置Google AdSense广告</span>

今天和大家说说,怎么在你的博客日志中添加Google AdSense广告代码,我博客中的广告代码是我昨天刚刚放上去的,问了弄这个代码,我连续在网上找了2天,广告是放上去了,可是广告就是不能和所写的文章混合在一起,让我郁闷了2天,期间我因为弄错代码,差点把网站都毁了,还好以前作了备份,还原成功。

现在我网站广告代码弄成功了,多亏异次元の世界和摇摆2位帅哥精心帮助才以成功。好东西当然要分享咯。下面就写下是怎么修改加入代码的,高手们不要笑我哈。

具体效果见我的博客:http://www.520reb.cn

我的博客是动态模式下的:

用修改class下面的cls_article.asp即可。在114行左右找到:

<div id="logPanel" class="Content-body">

在其后面添加如下代码:

<!-- Google广告代码 -->

<div id="vad" class="paper01" style="float:right;">

<div class="aditem_paper01">

<script type="text/javascript"><!--

google_ad_client = "pub-9147000246483358";

google_ad_width = 468;

google_ad_height = 60;

google_ad_format = "468x60_as";

google_ad_type = "text_image";

google_ad_channel = "";

google_color_border = "FFFFFF";

google_color_bg = "FFFFFF";

google_color_link = "38B63C";

google_color_text = "000000";

google_color_url = "F2984C";

//-->

</script>

<script type="text/javascript"

src="http://pagead2.googlesyndication.com/pagead/show_ads.js">

</script>

</div></div><!-- Google广告代码 -->

注:绿色字为你自己的广告代码

看见红色的代码了吗?就是这段代码可以使文章和广告代码融合在一起,

把right改成left就可以把广告放在左边。

好了,在日志内添加广告就是这么简单。

最后不要忘了到后台重新生成日志哦。

希望广大站长一起加入赚美元的行列吧。

<span style="color:Red">上一篇错位问题。</span>

修改cls_article.asp

搜索"上一篇"

你会发现围绕它们的那个<div> (或者是<span>) 的style有width属性,去掉即可

<span style="color:Red">右边最新日志显示过长</span>

link.css

.sideA{} 把width改到你觉得合适就好

<span style="color:Red">PJblog的一个小BUG: 会员发表评论,提示验证码错误!</span>

打开 blogcomm.asp ,找到:<div class="UBBPanel"><div class="UBBTitle"><img src="images/code.gif" style="margin:0px 2px -3px 0px" alt="程序代码"/> 程序代码</div><div class="UBBContent">IF (memName=empty or blog_validate=true) and cstr(lcase(Session("GetCode")))<>cstr(lcase(validate)) or IsEmpty(Session("GetCode")) Then</div></div>替换为:<div class="UBBPanel"><div class="UBBTitle"><img src="images/code.gif" style="margin:0px 2px -3px 0px" alt="程序代码"/> 程序代码</div><div class="UBBContent">IF (memName=empty or blog_validate=true) and (cstr(lcase(Session("GetCode")))<>cstr(lcase(validate)) or IsEmpty(Session("GetCode"))) Then</div></div>其实就是在这一句的前后加了一对括号 "()" 。但问题得以解决

<span style="color:Red">PJBlog个性日期显示类</span>

说明:

1.此修改需要改动PJBlog的部分源文件和您正在使用的皮肤的CSS,请先备分下面列出的文件。

2.这种显示方法是从WP上看见并且加之模仿的,并非参考大头 (Bigheadlyf)所发表的修改方法。(大头的方法也不错,这个几乎和他的显示效果一样,只是某些地方的修改不大一样。地址:http://bbs.pjhome.net/thread-15452-1-1.html)

3.由于我的Blog改动较大加之修改了半个多月了,如有些地方疏忽没有写对的地方,请您指出,我会 立即修改,Thx!!!

实现思路:

1. 修改common/function.asp的日期转换函数。

2. 修改class/cls_default.asp,cls_article.asp的日期显示。

3. 修改相应皮肤的CSS。

详细修改方法:

1. 修改common/function.asp的日期转换函数。

查找代码:[code]Case "ym"

DateToStr=Right(Year(DateTime),2)&DateMonth[/code]

在下面增加:[code]Case "y-m"

DateToStr=Right(Year(DateTime),2)&"-"&DateMonth[/code]

2.修改class/cls_default.asp,cls_article.asp的日期显示。

首先修改class/cls_default.asp

查找代码:<div class="UBBPanel"><div class="UBBTitle"><img src="images/code.gif" style="margin:0px 2px -3px 0px" alt="程序代码"/> 程序代码</div><div class="UBBContent"><div class="Content-top"><div class="ContentLeft"></div><div class="ContentRight"></div></div></div>

替换为:<div class="UBBPanel"><div class="UBBTitle"><img src="images/code.gif" style="margin:0px 2px -3px 0px" alt="程序代码"/> 程序代码</div><div class="UBBContent"><div class="Content-top"><div class="ContentLeft"><div class="DateYM"><%=DateToStr(webLogArr(4,PageCount),"y-m")%></div><div class="DateDay"><%=DateToStr(webLogArr(4,PageCount),"d")%></div></div><div class="ContentRight"></div></div></div>

然后修改cls_article.asp

查找代码:<div class="UBBPanel"><div class="UBBTitle"><img src="images/code.gif" style="margin:0px 2px -3px 0px" alt="程序代码"/> 程序代码</div><div class="UBBContent"><div class="Content-top"><div class="ContentLeft"></div><div class="ContentRight"></div></div></div>

替换为:<div class="UBBPanel"><div class="UBBTitle"><img src="images/code.gif" style="margin:0px 2px -3px 0px" alt="程序代码"/> 程序代码</div><div class="UBBContent"><div class="Content-top"><div class="ContentLeft"><div class="DateYM"><%=DateToStr(log_ViewArr(9,0),"y-m")%></div><div class="DateDay"><%=DateToStr(log_ViewArr(9,0),"d")%></div></div><div class="ContentRight"></div></div></div>

请注意:class/cls_default.asp和cls_article.asp的日期输出调用类不一样

3。修改相应皮肤的CSS。

修改皮肤的CSS是按照您当前的皮肤以及您的个性设置来详细修改的,在这里不能统一,所以我只能给个CSS的大概思路,大家去慢慢按照自己的习惯去修改。(包括日期的背景,“年-月”的字体的设置,“日”的字体的设置。。。)

修改您的皮肤的layout.css

找到/*---日志标题框--*/

在.Content-top{。。。。}下面修改增加

[code].Content-top .ContentLeft{width:40px;height:40px;float:left;background:url('datebg.jpg') no-repeat;} /*---日期框的大体--*/

.Content-top .ContentLeft .DateYM{text-align:center;margin:4px 0px 0px 1px;padding:0px 0px 0px 0px;color:#fff;font-size:10px !important;font-size:10px;} /*---年-月的设置--*/

.Content-top .ContentLeft .DateDay{text-align:center;margin:0px 0px 0px 0px;padding:0px 0px 0px 0px;color:#fff;font-size:18px !important;font-size:18px;font-weight:bold;} /*---日的设置--*/[/code]

好了,这次修改到此也就华丽的结束了,祝大家修改愉快!!- -||

<span style="color:Red">PJBLOG页面广告投放终极教程(全坛最全,威客365版)</span>

http://bbs.pjhome.net/viewthread.php?tid=32208&extra=&page=1

声明: 本文遵循 BY-NC-SA 3.0 协议. 转载请注明转自: PJ-Blog技巧集合
支持本博发展,请勿过滤广告。
  1. 2009年11月9日10:11

    博主各国游玩,还会写代码?博主是做什么工作的?

XHTML: 您可以使用这些标签: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>

注意: 评论者允许使用'@user空格'的方式将自己的评论通知另外评论者。例如, ABC是本文的评论者之一,则使用'@ABC '(不包括单引号)将会自动将您的评论发送给ABC。请务必注意user必须和评论者名相匹配(大小写一致)。