All thanks for the response. I do not want to use the Windows Logical Drives MP as it uses the defrag analysis which is causing the event ID 258 Defrag into the applications event log each time it runs. Also I do not want all the data it pulls back. I have tried to amend tis MP but it breaks cook down and I cannot get the Event ID 258 Defrag Analysis from being written to the apps event log.
All I want to do is pull back these data points and nothing else. Peter Hakesley | Monitoring & Automation Technical Lead Engineer, Data Centre Services t: +44(0)845 155 6556 ext: 4006 e: [email protected] | w: www.scc.com<http://www.scc.com/> a: SCC, CV1, Cole Valley, 20 Westwood Avenue, Tyseley, Birmingham B11 3RZ From: [email protected] [mailto:[email protected]] On Behalf Of Brandon Ryan Sent: 24 October 2014 17:30 To: [email protected] Subject: [msmom] RE: VBScript SCOM query Where is objRpt defined? It is giving you an error because you cannot access objRpt.VolumeSize because objRpt is null. Brandon Ryan Software Engineer | [email protected]<mailto:[email protected]> ClearPointe(r) | 7 Office Park Dr., Suite 200 | Little Rock, AR | www.clearpointe.com<http://www.clearpointe.com/> MANAGED IT SERVICES: Your IT. Our People. 24/7. Guaranteed. Subscribe to our newsletter: http://www.clearpointe.com/newsletter This Internet message may contain information that is privileged, confidential, and exempt from disclosure. It is intended for use only by the person to whom it is addressed. If you have received this in error, please (1) do not forward or use this information in any way; and (2) contact me immediately. Neither this information block, the typed name of the sender, nor anything else in this message is intended to constitute an electronic signature unless a specific statement to the contrary is included in this message. From: [email protected]<mailto:[email protected]> [mailto:[email protected]] On Behalf Of Pete Hakesley Sent: Friday, October 24, 2014 11:18 AM To: MSMOM ([email protected]<mailto:[email protected]>) Subject: [msmom] VBScript SCOM query Hi all Been using the various scripting and authoring guides I have a script I am working on he get the below values from WMI ...Part of my script... set objWMI = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") set colDrives = objWMI.ExecQuery("select Name from Win32_LogicalDisk") for each strDrive in ColDrives strDrive = strDrive.Name If ((Mid(strDrive,2,1) <> ":") or (Len(strDrive)> 3)) Then Exit For Else set colVols = objWMI.ExecQuery("Select * from Win32_Volume where DriveType = 3 And DriveLetter = '" & strDrive & "'") for each objVol in colVols Set oBag = oAPI.CreatePropertyBag() oBag.AddValue "StatusInstance", strDrive oBag.AddValue "VolumeSize", Int(objRpt.VolumeSize / 1073741824) <-- or The script fails at this point oBag.AddValue "UsedSpace", Int(objRpt.UsedSpace / 1073741824) <-- or The script fails at this point oBag.AddValue "FreeSpace", Int(objRpt.FreeSpace / 1073741824) <-- or The script fails at this point oBag.AddValue "FreeSpacePercent", objRpt.FreeSpacePercent <-- or The script fails at this point strVolumeSize = objRpt.VolumeSize strUsedSpace = objRpt.UsedSpace strFreeSpace = objRpt.FreeSpace strFreeSpacePercent = objRpt.FreeSpacePercent oAPI.Return(oBag) Next End If Next ...End of part of the script ... All I keep getting is Object required: " Code 800A01A8 Microsoft VBScript runtime error I think the code is syntactically correct but if anyone can help me - I am at the hair pulling stage! Peter Hakesley | Monitoring & Automation Technical Lead Engineer, Data Centre Services t: +44(0)845 155 6556 ext: 4006 e: [email protected]<mailto:[email protected]> | w: www.scc.com<http://www.scc.com/> a: SCC, CV1, Cole Valley, 20 Westwood Avenue, Tyseley, Birmingham B11 3RZ
