GefProcedure.SuccessMessage (property)

Gets and sets the success message for the procedure as a String.
Syntax: String = object.SuccessMessage
object.SuccessMessage = String
Description: The SuccessMessage property gets and sets the success message for the procedure. All of the actions configured for the procedure must be successful for the message to display.

Example:

Sub GefProcedure_SuccessMessage()
    
    Dim oCimObj As GefObject
    Dim oCimProcedure As GefProcedure
    
    Set oCimObj = CimGetObject
    Set oCimProcedure = oCimObj.Procedures.Item(0)
    
    oCimProcedure.SuccessMessage = "The event was " & _
        "tiggered successfully"
    MsgBox "The success message for the first procedure is " & _
        """" & oCimProcedure.SuccessMessage & """"
    
End Sub