天天看點

用腳本為本blog增加了幾項自定義功能

 這段時間的工作主要是研究用戶端的腳本程式設計,是以順便使用腳本為blog提供了幾個小功能,這些功能有的是便于讀者閱讀,而有的是便于作者管理blog的。包括:banner廣播、頁面反色、搜尋跟蹤和Google廣告。下面分别說說他們是怎麼弄得。

    從上到下說吧,第一個添加一個Banner廣播,這個是幹什麼用的呢?就是寫一些問候的話語放在這裡了,效果如下圖:

用腳本為本blog增加了幾項自定義功能

    這個廣播播的内容是:怎麼老是這些廣告啊,真是煩人:<

    這個東西的實作基于了頁面的布局,這個Banner條目的位置正好是我使用這個主題的一個ID為sub的DIV裡。是以我替換DIV裡的内容,就弄出這個廣播了。我這裡都是介紹google廣告的,當然你可以自己訂制放任何的東西。

    添加Banner廣播的代碼如下:

用腳本為本blog增加了幾項自定義功能

<script language="javascript">

用腳本為本blog增加了幾項自定義功能

</script>

用腳本為本blog增加了幾項自定義功能
用腳本為本blog增加了幾項自定義功能

第三個功能是提供了一個Google的廣告,是通過Google

AdSense計劃加入的。由于Google廣告是先詳細分析頁面内容,然後再提供與頁面緊密相關的廣告條目,是以可以給浏覽文章的人提示很友好的廣告内容。當然點選Google也會給我們帶來一點點的好處

用腳本為本blog增加了幾項自定義功能

,AdSense是會根據點選付費的。

    注入Search Tracker的代碼如下: 

用腳本為本blog增加了幾項自定義功能

<script Language="javascript">

用腳本為本blog增加了幾項自定義功能

    由于Baidu搜尋引擎接受的是GB碼的escape形式,是以在代碼使用了一段VBScript來編碼。

用腳本為本blog增加了幾項自定義功能

<script language="vbscript"> 

用腳本為本blog增加了幾項自定義功能

function vbGetGBCode(str) 

用腳本為本blog增加了幾項自定義功能

    dim i, length, s 

用腳本為本blog增加了幾項自定義功能

    length = len(str) 

用腳本為本blog增加了幾項自定義功能

    for i=1 to length 

用腳本為本blog增加了幾項自定義功能

        hexCode = hex(asc(str.charAt(i-1))) 

用腳本為本blog增加了幾項自定義功能

        if (len(hexCode) mod 2) = 0 then

用腳本為本blog增加了幾項自定義功能

            s = s & "%" & mid(hexCode, 1, 2)

用腳本為本blog增加了幾項自定義功能

            if ( len(hexCode) = 4 ) then

用腳本為本blog增加了幾項自定義功能

                 s = s & "%" & mid(hexCode, 3, 2)

用腳本為本blog增加了幾項自定義功能

            end if 

用腳本為本blog增加了幾項自定義功能

        else 

用腳本為本blog增加了幾項自定義功能

            s = s & "%0" & hexCode 

用腳本為本blog增加了幾項自定義功能

        end if 

用腳本為本blog增加了幾項自定義功能

    next 

用腳本為本blog增加了幾項自定義功能

    vbGetGBCode = s 

用腳本為本blog增加了幾項自定義功能

end function 

用腳本為本blog增加了幾項自定義功能

</script> 

    而Google搜尋引擎是接受encodeURIComponent的編碼,是以就簡單多了。

    注入百度Tracker的效果如圖所示:

用腳本為本blog增加了幾項自定義功能

    本來這些功能除了反色以外都可以很容易的在伺服器端做的,不過毛主席不是教導過大家'自己動手風衣足食'嘛

用腳本為本blog增加了幾項自定義功能

本文轉自部落格園鳥食軒的部落格,原文連結:http://www.cnblogs.com/birdshome/,如需轉載請自行聯系原部落客。

繼續閱讀