SMS 2003

SMS 2003 Client

Start the SMS 2003 Hardware Inventory Cycle








' Start the SMS 2003 Hardware Inventory Cycle



On Error Resume Next

sActionName="Hardware Inventory Collection Cycle"

' Create a CPAppletMgr instance

Dim oCPAppletMgr
Set oCPAppletMgr = CreateObject("CPApplet.CPAppletMgr")

 ' Get the available ClientActions

Dim oClientActions
Set oClientActions = oCPAppletMgr.GetClientActions()

 ' Loop through the available client actions

Dim oClientAction
For Each oClientAction In oClientActions

    ' Is this the action we want to start?

     If oClientAction.Name = sActionName Then

    ' Start the action

        oClientAction.PerformAction  
    End If
Next



search for scripts

VbsEdit contains all these sample scripts!

Download Now!