Perton 網誌

如何將檔案儲放在 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

假設，有一 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

設定SQL Server連線使用限制

設定方法如下：

雙擊區域網路圖樣(右下角)

VBS 為Excel 資料自動排序的用法

想要用VBS 為Excel 資料自動排序，需要注意到幾個重點：

要排序的 Excel 檔名，不可含有中文字
要為排序資料事先建立範圍名稱(Range Name)
範圍名稱(Range Name)也不可以使用中文字
VBS 程式中，要注意到 objRange.Sort 函式的使用語法及參數位置

以範例說明如下：

ERP_Sort_公告編號_A_Q.vbs
-----------------------------------------------------------
Const xlAscending = 1
Const xlYes = 1

Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
Set objWorkbook = objExcel.Workbooks.Open("C:\ERP\ERP_On-Line_Notice.xls")
' Worksheets 編號由 1起算
Set objWorksheet = objWorkbook.Worksheets(4)
Set objRange = objWorksheet.UsedRange
Set objRange2 = objExcel.Range("AnnounceNo")
Set objRange3 = objExcel.Range("A")
Set objRange4 = objExcel.Range("Q")

objRange.Sort objRange2, xlAscending, objRange3, , xlAscending, objRange4, xlAscending, xlYes
------------------------------------------------------------

資料參考：Tips and Tricks for Scripting Microsoft Office Applications

DB Suspect

Suspect 這字就字意來說，是不可信的或是有危險的。

來看下上面這圖示，在 SQL Server 下建置有很多的資料庫，其中不少資料庫名稱的右邊出現 (Suspect) 字樣。

就像 Suspect 一樣，這些被標出 Suspect 字樣的資料庫，是因為它們的資料庫檔案存放在外接硬碟中，而且這時該外接硬碟也沒有正確地連接在電腦上，所以 SQL Server 才找不到這些資料庫，而標示出 Suspect.

訂閱：文章 (Atom)