Repository.Crew.AddCrew

From ReliaWiki
(Redirected from Repository.AddCrew)
Jump to navigation Jump to search
APIWiki.png


Member of: SynthesisAPI.Repository


Adds a new crew resource to the current project. Returns a Boolean value; when true, indicates a successful save.


Remarks: If a crew with the same name already exists in the destination project, the name will be incremented automatically. For example, if "Crew1" already exists, the new crew might be renamed to "Crew2," "Crew3," etc.

Syntax

.Crew.AddCrew(crew)

Parameters

crew

Required. The cCrew object that represents the crew resource to be added.


Example

This example creates a new crew 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 crew. The following example creates a crew named "MyNewCrew." 
  Dim NewCrew As New cCrew
  NewCrew.Name = "MyNewCrew"

 'Add the new crew to project #1. 
  MyRepository.Project.SetCurrentProject(1)   
  Call MyRepository.Crew.AddCrew(NewCrew)
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 crew. The following example creates a crew named "MyNewCrew." 
  Dim NewCrew As New cCrew ("MyNewCrew")

 'Add the new crew to project #1. 
  MyRepository.Project.SetCurrentProject(1)   
  MyRepository.Crew.AddCrew(NewCrew)