Perton 網誌

FreeMind 指令編輯器 (Script Editor) 的使用入門 - 1

首先，認識資料節點使用Script前後的差異：
1. 未使用 Script 前的樣式

2. 使用 Script 後的樣式

建立 Script 的步驟：
1. Tools / Script Editor ( 工具／指令編輯器 )

2. 創建新指令

3. 編寫指令程式碼

4. 儲存後結束

指令程式的執行

單一節點的程式運行
要先點選，要執行且設定有指令碼的節點後，再開啟指令編輯器。

執行同一 Mind map 檔案中的所有指令：
Tools > Evaluate ( 工具／執行， Alt + F8 )

分解會計科目、會計名稱的技巧

這是一個 Excel 使用函數的技巧，應用函數 LEN()、LENB()的差異，正確地取得所需要的資料。

LEN() ：可取得字串的字數長度，中英文字字數都是算為 1
LENB()：可取得字串的Byte長度，英文字算為 1，中文字算為 2

	A
1	1010現金	LEN() =>6, LENB() =>8
2	100201第一銀行	LEN() =>10, LENB() =>14

1010	=LEFT(A1, 2*LEN(A1) – LENB(A1))
現金	=RIGHT(A1, LENB(A1) – LEN(A1))
100201	=LEFT(A2, 2*LEN(A2) – LENB(A2))
第一銀行	=RIGHT(A2, LENB(A2) – LEN(A2))

掃瞄多頁文件，儲存到一個檔案中 !!

可以使用外接掃瞄設備，Scan 文件內容並存檔的軟體工具程式，一般來說有：
1. Paint (小畫家)
2. 掃瞄器與數位相機精靈 (附屬應用程式)
3. Microsoft Office Document Imaging
4. HP 有一工具軟體，也可以做到一檔多頁的功能。

但是，大都程式只能掃一頁就要存成一個檔案；若是多頁文件就無法儲存在同一個檔案裏面。

以下說明，使用 Microsoft Office Document Imaging 來操作，該如何做到一檔多頁的存取。

1. 開啟 Microsoft Office Document Imaging

** 可以自訂掃瞄內容的環境

**掃瞄文件的尺寸，假若不是正規常用的A4，也可以設定特定尺寸的寬高值。

2. 要儲存多頁文件，記得將提示掃描其他頁面(P) 選項加以勾選起來

3. 每一頁文件掃瞄完成後，就是有提示已掃描的頁數，及繼續或完成的按鈕可用。

如何將檔案儲放在 Google Docs(文件)中？

要將檔案儲放在 Google Docs(文件)中，

首先要有 GMail 帳號
進 Google 網站 (http://www.google.com/)
選擇文件功能
點選進入欲存放檔案的資料夾中(沒有，則可以自行創建)
從local 資料區，點選要上傳的檔案，並拖拉到 Google 文件視窗中，放開；檔案就開始上傳，下面是上傳過程的截圖
上傳完成後，勾選該檔案以設定”共享”
將上述的 Link 字串複製下來。
進入 Fackbook，新加 Link。
(這方式和上圖中的 Fackbook 有不同的效果)
點選 Link 後的效果：

C/C++ 編譯器選項

HelloWorld.cpp 編譯的方式

cl HelloWorld.cpp => 會有額外的錯誤訊息
cl /EHsc HelloWorld.cpp => 可避免產生額外的錯誤訊息
cl /clr HelloWorld.cpp

cl 編譯器的選項，可參考相關文件

假設，有一 XML 檔案(MENU_CHT.xml) 內容如下：
-----------------------------------------------------------
<?xml version="1.0" encoding="utf-8"?>
<MENU>
<A prgkey="BA" caption="基礎工程" enable="true">
    <A1 prgkey="PB" caption="公用資料" enable="true">
    …
    </A1>
</A>
… (含 A 元素，共有 21個子元素)

</MENU>
-----------------------------------------------------------

使用 VBA 程式來讀取，各式指令將取得不同的結果值，要注意哦

    Set XMLDoc = New MSXML2.DOMDocument
    strFileXML = ActiveWorkbook.Path & "\" & "MENU_CHT.xml"
    intState = XMLDoc.Load(strFileXML)      ' intState 數值說明; (-1) 成功
    If intState Then                                  'MsgBox "讀取 XML 成功"
        Set xFirst = XMLDoc.FirstChild
'        MsgBox xFirst.nodeName              ==> xml
'
        Set xRoot = XMLDoc.documentElement
'        MsgBox xRoot.nodeName             ==> MENU

'        MsgBox XMLDoc.childNodes        ==> 2
'        MsgBox xRoot.childNodes           ==> 21

        For i = 1 To Level1nodes.Length
            ' 取得元素內容
            Set Level1node = Level1nodes.NextNode
'            MsgBox Level1node.nodeName

            ' 取得屬性內容
            Set Level1Attr = Level1node.Attributes
            'MsgBox Level1Attr.Length

            For a = 1 To Level1Attr.Length
                Set nodeAttr = Level1Attr.Item(a - 1)
'                MsgBox nodeAttr.nodeName & " -- " & nodeAttr.Text
'                nodeAttr.nodeName             ==> prgkey
'                nodeAttr.Text                      ==> BA
                strAttr = strAttr & nodeAttr.Text & vbTab
            Next
        Next i

訂閱：文章 (Atom)