pjblog修改--返回顶部、置顶标志及提交内容时自动保存到粘贴板

1、日志右下角添加了“返回顶部”的链接!
修改两个文件classcls_default.asp和classcls_article.asp
● 分别找到如下代码

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

 查看次数: <%=log_ViewArr(4,0)%>

在这两段代码后台面均添加如下代码

| <a href="javascript:scroll(0,0);" title="返回顶部">TOP ↑</a>

2、发表评论及发表日志的同时复制提交的内容,以免发表失误丢失提交的内容!
● 打开commoncommon.js
找到

//PBlog2 公用JS代码
//Author:PuterJam

在下面添加

//复制评论文本框
function copytext(){
document.all.Message.select();
document.execCommand("copy");
alert("您的发表的内容已经拷贝至剪贴板,丢失后可以使用Ctrl+V(粘贴)找回。")
}

● 打开classcls_article.asp,找到

<input name="submit2" type="submit" class="userbutton" value="发表评论" accesskey="S"/>

修改为

<input name="submit2" type="submit" class="userbutton" value="发表评论" accesskey="S" onclick="copytext();"/>

● 打开blogpost.asp,找到

<input name="SaveArticle" type="submit" class="userbutton" value="提交日志" accesskey="S"/>

修改为

<input name="SaveArticle" type="submit" class="userbutton" value="提交日志" accesskey="S" onclick="copytext();"/>

● 打开blogedit.asp,找到

<input name="SaveArticle" type="submit" class="userbutton" value="保存日志" accesskey="S"/>
<%if lArticle.logIsDraft then%>
<input name="SaveDraft" type="submit" class="userbutton" value="保存并取消草稿" accesskey="D" onclick="document.getElementById('log_IsDraft').value='False'"/>

修改为

<input name="SaveArticle" type="submit" class="userbutton" value="保存日志" accesskey="S" onclick="copytext();"/>
<%if lArticle.logIsDraft then%>
<input name="SaveDraft" type="submit" class="userbutton" value="保存并取消草稿" accesskey="D" onclick="copytext();document.getElementById('log_IsDraft').value='False'"/>

3、为你的置顶日志添加醒目的“置顶”标识!

动态模式:

打开class/cls_default.asp 搜索

<%If CanRead Then%>

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

第一处,原来是这样:

<a class="titleA" href="article.asp?id=<%=webLogArr(0,PageCount)%>"><%=HtmlEncode(webLogArr(3,PageCount))%></a>

 

修改成:

        <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>

 

第二处:

原来是这样

<a href="<%=logLink%>" title="作者:<%=webLogArr(2,PageCount)%> 日期:<%=DateToStr(webLogArr(4,PageCount),"Y-m-d")%>"><%=HtmlEncode(webLogArr(3,PageCount))%></a>

改成:

            <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>

静态模式:

打开class/cls_logAction.asp  

搜索

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

 

上面是普通模式,下面是列表模式

搜索:

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

点赞 (0)

发表回复

您的电子邮箱地址不会被公开。 必填项已用 * 标注

Captcha Code