How to Check the SMS Advanced Client Component State
Published : April 11, 2005
This script displays the current state of the SMS Advanced Client components.
The script uses the Advanced Client COM Automation object Control Panel object CPAppletMgr to get a client components collection object (ClientComponents), which is inspected to retrieve the health of each component.
On This Page
Example
Compiling the Code
See Also
Example
On Error Resume Next Dim oCPAppletMgr 'Control Applet manager object. Dim oClientComponent 'Individual client components. Dim oClientComponents 'A collection of client components. 'Get the Control Panel applet manager object. Set oCPAppletMgr=CreateObject("CPApplet.CPAppletMgr") If oCPAppletMgr Is Nothing Then Wscript.echo "Could not create control panel application manager" wscript.quit End If 'Get a collection of components. Set oClientComponents=oCPAppletMgr.GetClientComponents If oClientComponents Is Nothing Then wscript.echo "Could not get the client components" Set oCPAppletMgr=Nothing wscript.quit End If wscript.echo "There are " &oClientComponents.Count & " components" wscript.echo 'Display each client action. For Each oClientComponent In oClientComponents wscript.echo oClientComponent.DisplayName Select Case oClientComponent.State Case 0 wscript.echo "installed" Case 1 wscript.echo "enabled" Case 2 wscript.echo "disabled" End Select wscript.echo Next Set oClientComponents=Nothing Set oCPAppletMgr=Nothing
Compiling the Code
Requires an SMS 2003 Advanced Client.