Repository.Action.AddAction

Member of: SynthesisAPI.Repository

Adds a new action to the current project. The action description or name must be unique. Returns a Boolean value; when true, indicates a successful save.

Syntax

.Action.AddAction(action)

Parameters

action

Required. The cAction object that represents the action resource to be added.

Example

This example creates a new action resource, and then saves it in the first available project in a Synthesis repository.

VBA

 'Declare a new Repository object and connect to a Synthesis repository. 
  Dim MyRepository As New Repository
  MyRepository.ConnectToAccessRepository("C:\RSRepository1.rsr10")
 
 'Create a new action. The following example creates an action with the description "MyNewAction." 
  Dim NewAction As New cAction
  NewAction.ActionDescription = "MyNewAction"

 'Add the new action to project #1. 
  MyRepository.Project.SetCurrentProject(1)   
  Call MyRepository.Action.AddAction(NewAction)

VB.NET

 'Declare a new Repository object and connect to a Synthesis repository. 
  Dim MyRepository As New Repository
  MyRepository.ConnectToAccessRepository("C:\RSRepository1.rsr10")
 
 'Create a new action. The following example creates an action with the description "MyNewAction." 
  Dim NewAction As New cAction ("MyNewAction")

 'Add the new action to project #1. 
  MyRepository.Project.SetCurrentProject(1)   
  MyRepository.Action.AddAction(NewAction)