Dim errorMessage
if oArgs.Count < 4 Then
errorMessage = "LogVolumeUsedSpaceRate.vbs was called with the incorrect # of parameters (param count = " & oArgs.Count & ")."
'WScript.Echo(errorMessage)
Call oAPI.LogScriptEvent("LogVolumeUsedSpaceRate.vbs",1201,0,errorMessage)
Wscript.Quit -1
End If
Dim ManagementServer, warningThreshold, criticalThreshold, rateWindowDays
Dim oNetAppSCOMAPI
Set oNetAppSCOMAPI = CreateObject("NetApp.OM.Server.Monitoring.VirtualizationMonitoring")
If Err Then
errorMessage = "Failed to create NetAppSCOM object" & vbNewLine & _
"Err.description = """ & Err.description & """" & vbNewLine & _
"Err.helpcontext = """ & Err.helpcontext & """" & vbNewLine & _
"Err.helpfile = """ & Err.helpfile & """" & vbNewLine & _
"Err.number = """ & Err & """ (&H" & hex(Err) & ")" & vbNewLine & _
"Err.source = """ & Err.source & """" & vbNewLine
'WScript.Echo(errorMessage)
Call oAPI.LogScriptEvent("LogVolumeUsedSpaceRate.vbs",1202,0,errorMessage)
WScript.Quit -1
End If
Dim result
result = oNetAppSCOMAPI.CheckVolumeUsedSpaceRate(ManagementServer, warningThreshold, criticalThreshold, rateWindowDays)
If Err Then
errorMessage = "Failed to call CheckVolumeUsedSpaceRate" & vbNewLine & _
"Err.description = """ & Err.description & """" & vbNewLine & _
"Err.helpcontext = """ & Err.helpcontext & """" & vbNewLine & _
"Err.helpfile = """ & Err.helpfile & """" & vbNewLine & _
"Err.number = """ & Err & """ (&H" & hex(Err) & ")" & vbNewLine & _
"Err.source = """ & Err.source & """" & vbNewLine
'WScript.Echo(errorMessage)
Call oAPI.LogScriptEvent("LogVolumeUsedSpaceRate.vbs",1203,0,errorMessage)
WScript.Quit -1
End If
Call oAPI.LogScriptEvent("LogVolumeUsedSpaceRate.vbs",1204,0,"Event collection succeeded for " & ManagementServer & ".")
Set oNetAppSCOMAPI = Nothing
Set oAPI = Nothing </Script></ScriptBody>
<TimeoutSeconds>$Config/TimeoutSeconds$</TimeoutSeconds>
</WriteAction>
</MemberModules>
<Composition>
<Node ID="RunScript"/>
</Composition>
</Composite>
</ModuleImplementation>
<InputType>System!System.BaseData</InputType>
</WriteActionModuleType>