2014年2月6日 星期四

VBScript 筆記

若要在不須提供系統管理員使用者名稱和密碼的情況下建立加密連線到遠端伺服器,請使用 GetObject 函數,然後將 AuthenticationLevel 屬性設為 pktPrivacy。下列程式碼範例可說明這個案例。
Set Service = GetObject("winmgmts:{authenticationLevel=PktPrivacy}!root/MicrosoftIdentityIntegrationServer") 

查詢的語法,下面是查MA的,也可以查CPU、硬碟容量等。
Set MASet = Service.ExecQuery("select * from MIIS_ManagementAgent where Name = 'XX MA'")


延遲執行的語法
Wscript.Sleep 毫秒,EX: Wscript.Sleep 3000  (延遲3秒)

For Each element In group
    [statements]
    [Exit For]
    [statements]
Next [element]

For Each...Next 陳述式的語法具有以下幾個部分:
組成部分說明
element變數,用來表示集合物件或陣列中所有元素的變數。對於集合物件,element 可以是一個 Variant 變數、一般物件變數、或特定的 Automation 物件變數。對於陣列而言,元素只能是一個 Variant 變數。
group物件集合或陣列的名稱。
statements一或多行的指令行。

如果集合或陣列中至少有一個元素,則 For Each 區塊就會進入執行。一旦進入迴圈,便會先針對 Group 群組中第一個元素,執行迴圈中的所有陳述式。如果 Group 群組中還有其它的元素,則會針對其餘的元素執行迴圈中的陳述式,當 Group 群組中的所有元素都執行完了,便會離開迴圈,然後從 Next 陳述式之後的指令行繼續執行。
Exit For 只使用在 For Each...Next 或 For...Next 控制結構內,當做另一個離開 For Each...Next 的方式;而且在 For Each...Next 中可以放置任何個數的 Exit For 陳述式。Exit For 通常與條件式共同使用(例如If...Then),並會將控制權轉移到 Next 之後的陳述式。
您可以將一個 For Each...Next 迴圈放置在另一個 For Each...Next 之中來造成巢狀式 For Each...Next 迴圈,但是每個迴圈的 element 必須是唯一的。

附註  如果您省略 Next 陳述式中的 element,仍可以執行迴圈,但如果 Next 陳述式比它相對應的 For 陳述式先執行,則會產生錯誤。

沒有留言: