如何在google blog裡面坎入易讀的程式碼樣式

其實有時候上網查一些資料的時候會鬱悶
因為有些網友提供了做法但可能是他個人筆記的形式 就會看不太懂
或是他的做法換到我的環境就不行了 
這次我要分享在google blog裡面如何坎入一個程式碼的小頁框，因為常常看到別人在用 覺得這樣子程式真的很好讀 像這樣 

這裡可以放程式碼

上網查了之後有一個人教了做法
可是我用他的做法卻一直設定不好 只好回去再看官方的網站 最後終於成了
步驟如下
先到SyntaxHighlighter的網站直接按download 把整包東西下載回來
下載回來解壓縮之後 找到裡面scripts的資料夾
複製一個必要的檔案shCore.js及另外一個shBrush????.js請注意????就是依照你要寫的程式碼下載對應的brush，例如我要寫的是java及SQL，就下載shBrushJava.js和shBrushSql.js 
再到另外一個styles的資料夾，複製shCore.css和shThemeDefault.css

所以現在我們有5個檔案了
shCore.js
shBrushJava.js
shBrushSql.js
shCore.css
shThemeDefault.css
把這些檔案上傳到網頁空間 例如dropbox或是google site 因為待會在google blog設定的時侯會用到

現在到google blog設定範本>編輯HTML 如下圖



按下編輯HTML之後 在<head> </head>之間 放入以下的code
請注意'https://sites.google.com/site/xytsite/css/'這一段是我的網頁空間 你必須替換成你的網頁空間網址
如下圖
然後發表新文章的時侯 請用HTML模式 請記得放在<div></div>的中間

在你要展示code的地方 使用<pre class="brush: java"> 中間放你要的code</pre>

至於<pre class="brush: java"> brush後面要放的代碼 就是要寫的程式的代碼 在下面這個網頁有交代 http://alexgorbatchev.com/SyntaxHighlighter/manual/brushes/

看到了吧 如果你要寫的是c++，就得宣告成這樣<pre class="brush: cpp"> 或是<pre class="brush: c">

如下圖



預覽結果

Note: 如果你選擇的是動態檢視範本 這個code就沒辦法正確展示 可能是裡面的javascripe會互相干擾 我對javascripe不熟 目前還查不出來問題在哪裡

留言

張貼留言

這個網誌中的熱門文章

R中Try and Catch的寫法

圖片
在R裡的Try and Catch可能比較少人用到 因為R code出現錯誤時不會導致R整個停機 只會出現錯誤訊息 而且可以繼續運作 但是因為我的系統是用Java去call R，R如果有error會停止運作然後害我整個系統死機 所以我需要一個方法可以先楨測我的R code有沒有error，如果有錯就不往下執行了 範例如下: 如果我直接在R裡面執行 a<-'abc' b<-1 c<-b/a 會看直接看到錯誤，因為我不能把字串去除以一個數值 所以我加了try and catch之後 Erroresult<- tryCatch({ a<-'abc' b<-1 c<-b/a }, warning = function(war) { print(paste("MY_WARNING: ",war)) }, error = function(err) { print(paste("MY_ERROR: ",err)) }, finally = { print(paste("End Try&Catch")) }) 結果就會像這樣了，Error已經不是紅色，而是一個字串輸出，可以像我一樣把tryCatch的結果再另存到一個變數，例如Erroresult，這樣你就可以把這個error message存著 Try and Catch的架構像這樣，其中warning,error,finally的結構一定要有，不然會報錯 tryCatch({ #要執行的指令放這裡 },warning = function(war){ print(paste("MY_WARNING: ",war)) #如果有warning則輸出warning,"MY_WARNING: "這一行可以自己改 },error = function(err) { print(paste("MY_ERROR: ",err)) #如果有error則輸出error,"
閱讀完整內容

如何將DSM(NAS)變成Mail Server

圖片
最近我的法國老闆指派給我一個新的任務 他想要把家裡的NAS變成mail server 從此以後收發mail不求人 說這樣子就有自由了(法國人可以不要動不動就扯到自由嗎) 身為家裡的資訊長兼軟體工程師兼財務長兼保潔阿姨 這個工作派下來之後我還真不曉得可以指派給誰 只好自己動手了 其實我也沒有設定過mail Server 都是從骨哥大師那裡查到一個一個步驟 撞牆之後再查一次 設定了好幾天以後終於成功了 用手機或是email軟體都可以收發才算大功告成 發現沒有人把整個流程寫下來 那我就來寫吧 多做善事看能不能以後不要下地獄 或是下了地獄至少不要上刀山下油鍋 當個觀眾就可以了 希望閰王爺有看到這一篇blog 我選擇用中華電信申請浮動ip送的固定ip + 去登記一個自已喜歡的網域來處理 申請網域的公司是法國老闆選的這家 gandi 我覺得服務很不錯啊  鄉民可以參考看看 首先我設定讓DSM可以自動撥號連網 取得固定ip  在DSM的應用程式裡面 選擇EZ-INTERNET 一開始會請你設定可以通過防火牆的port有那些 記得要把 mail server 跟 mail station 打勾 然後填入中華電信的帳號密碼 設定完成以後 你的DSM就可以自動撥號取得一組ip 假設是112.77.115.94 然後要到申請網域公司的網站 例如我就是到 gandi 去設定很重要的MX碼，同時也告訴gandi要把我註冊的網域跟我的ip連在一起哦 以gandi的介面為例，假設我申請了一個網域叫做abc.com 就要有一個 A type recored Name @ , Value "你的ip" 然後要有一個MX recored Name @ Value abc.com. 這樣子就等於是宣告所有寄到@abc.com的信都要指到112.77.115.94這個位址 因為我的法國老板喜歡@後面直接接網域名稱abc.com 所以要用@來設定 如果你想要設定成例如 email.abc.com 就要把 A type recored Name 改成 email, Value "你的ip" 對應的MX recored Name email, Value abc.com. 以此類推 鄉民們可以看到 我還另外
閱讀完整內容

使用VBA記錄股市每分鐘的交易記錄

其實也是一個很簡單的程式，但是看起來就不像是高手寫的，因為一直跳來跳去 假設工作表2是DDE的資料，將DDE的資料每分鐘copy到工作表1 Dim i As Single '宣告變數i Dim Workday As Integer  '宣告變數Workday Private Sub workbook_open() '當這個excel檔案打開時，執行以下程序 Workday = Application.Evaluate("WEEKDAY(TODAY())-1")     '算出今天是一星期中的第幾天，並將數值存入Workday If Workday >= 1 And Workday <= 5 Then   '判斷是否為工作天     If Format(Time, "hh:mm:ss") >= "09:00:00" And Format(Time, "hh:mm:ss") <= "13:31:00" Then   '判斷是否為盤中         Call a  '執行程序a     Else         Application.OnTime TimeValue("00:09:00"), "ThisWorkBook.a"  '如果不是在盤中則等待明天九點開盤     End If End If End Sub Private Sub a() '宣告一個程序a    i = 2    '將i預設為2,因為資料是由第2行開始貼上    Call b   '執行程序b  End Sub  Private Sub b() '宣告一個程序b     Range("Stock200").Rows("2:201").Copy     'Copy範圍"Stock200"中的第2到第201列     工作表1.Cells(i, 1).PasteSpecial xlPasteValues '從工作
閱讀完整內容