VB Scripting with Radia Objects

Part 2:

Example 2:

Write to an EDM file

‘Syntax :

‘ SetObjectValue(EDM file,heap,variable,data)

CALL SetObjectValue(“LOCALCFG”,0,”LASTRUN”,Now())

Function SetObjectValue(strObject,strHeap,StrProperty,strValue)
 Set process = GetObject(“winmgmts://./root/novadigm:NVD_Agent”)
 Set method = process.Methods_ (“SetValue”)
 Set inParameters = method.inParameters.SpawnInstance_()
 inParameters.Path = strObject
 inParameters.Index = strHeap
 inParameters.Property = strProperty
 inParameters.Value = strValue
 Set outParameters = process.ExecMethod_ (“SetValue”, inParameters)
End Function


0 Responses to “VB Scripting with Radia Objects”

  1. Leave a Comment

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out /  Change )

Google+ photo

You are commenting using your Google+ account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )


Connecting to %s

%d bloggers like this: