Repository.Action.AddAction: Difference between revisions

From ReliaWiki
Jump to navigation Jump to search
No edit summary
No edit summary
Line 2: Line 2:




<onlyinclude>Adds a new action to a Synthesis repository. The action description or name must be unique. Returns a '''Boolean''' value; when true, indicates a successful save.</onlyinclude>  
<onlyinclude>Adds a new action to a project. The action description or name must be unique. Returns a '''Boolean''' value; when true, indicates a successful save.</onlyinclude>  




Line 17: Line 17:
  '''VBA'''
  '''VBA'''
   
   
  {{APIComment|'Add code to connect to a Synthesis repository.}}
  {{APIComment|'Declare a new Repository object and connect to a Synthesis repository.}}
   {{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository
   {{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository
  {{APIComment|...}}
  MyRepository.ConnectToAccessRepository({{APIString|"C:\RSRepository1.rsr10"}})
 
  {{APIComment|'Create a new action. The following example creates an action with the description "MyNewAction."}}
  {{APIComment|'Create a new action. The following example creates an action with the description "MyNewAction."}}
  {{APIPrefix|Dim}} NewAction {{APIPrefix|As New}} cAction
  {{APIPrefix|Dim}} NewAction {{APIPrefix|As New}} cAction
  NewAction.ActionDescription = {{APIString|"MyNewAction"}}
  NewAction.ActionDescription = {{APIString|"MyNewAction"}}
   
   
  {{APIComment|'Add the new action to project #1.}}
  {{APIComment|'Add the new action to project #1.}}
  MyRepository.Project.SetCurrentProject(1)   
  MyRepository.Project.SetCurrentProject(1)   
  {{APIPrefix|Call}} MyRepository.Action.AddAction(NewAction)
  {{APIPrefix|Call}} MyRepository.Action.AddAction(NewAction)


  '''VB.NET'''
  '''VB.NET'''
   
   
  {{APIComment|'Add code to connect to a Synthesis repository.}}
  {{APIComment|'Declare a new Repository object and connect to a Synthesis repository.}}
   {{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository
   {{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository
  {{APIComment|...}}
  MyRepository.ConnectToAccessRepository({{APIString|"C:\RSRepository1.rsr10"}})
 
  {{APIComment|'Create a new action. The following example creates an action with the description "MyNewAction."}}
  {{APIComment|'Create a new action. The following example creates an action with the description "MyNewAction."}}
  {{APIPrefix|Dim}} NewAction {{APIPrefix|As New}} cAction ({{APIString|"MyNewAction"}})
  {{APIPrefix|Dim}} NewAction {{APIPrefix|As New}} cAction ({{APIString|"MyNewAction"}})
   
   
  {{APIComment|'Add the new action to project #1.}}
  {{APIComment|'Add the new action to project #1.}}
  MyRepository.Project.SetCurrentProject(1)   
  MyRepository.Project.SetCurrentProject(1)   
  MyRepository.Action.AddAction(NewAction)
  MyRepository.Action.AddAction(NewAction)

Revision as of 15:40, 8 April 2016

APIWiki.png


Member of: SynthesisAPI.Repository


Adds a new action to a 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 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)