About Creation Interfaces - Symantec ALTIRIS INVENTORY SOLUTION 7.0 SP2 - V1.0 Manual
Hide thumbs
Also See for ALTIRIS INVENTORY SOLUTION 7.0 SP2 - V1.0:
Table of Contents
Advertisement
Gathering custom inventory
77
About creation interfaces
' Set the header data of the NSE
' Please don't modify this GUID
nse.To = "{1592B913-72F3-4C36-91D2-D4EDA21D2F96}"
nse.Priority = 1
'Create Inventory data block. Here assumption is that the data class
with
below guid is already configured on server
dim objDCInstance
set objDCInstance = nse.AddDataClass ("{e8220123-4987-4b5e-bc39-
ec6eaea312ef}")
dim objDataClass
set objDataClass = nse.AddDataBlock (objDCInstance)
For each objInfo in objCIMObj
'Add a new row
dim objDataRow
set objDataRow = objDataClass.AddRow
'Set columns
objDataRow.SetField 0, objInfo.DeviceID
objDataRow.SetField 1, objInfo.L2CacheSize
objDataRow.SetField 2, objInfo.L2CacheSpeed
Next
nse.SendQueued
'========================================================================================
The script divides the process into four steps:
1. Gather the values:
strComputer = "."
Set objWMIService = GetObject("winmgmts:" &
"{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
'Fire WMI Query
Advertisement
Table of Contents
