Difference between revisions of "Repository.Crew.AddCrew"

From ReliaWiki
Jump to navigation Jump to search
Line 16: Line 16:
 
   Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")
 
   Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")
 
    
 
    
 +
{{APIComment|'Set a first available project as current.}}
 +
  MyRepository.Project.SetCurrentProject(0)
 +
 
  {{APIComment|'Declare a new crew.}}
 
  {{APIComment|'Declare a new crew.}}
 
   Dim newCrew As New cCrew("NewCrew1")
 
   Dim newCrew As New cCrew("NewCrew1")

Revision as of 20:49, 22 May 2015


Saves the crew in the repository. Returns True if successful, otherwise returns False.

Syntax

  • AddCrew( crew As cCrew )As Boolean

Parameters

crew: The cCrew to add.

Usage Example

 'Declare a new repository connection object. 
 Dim MyRepository As New Repository
 
 'Connect to the Synthesis repository. 
 Dim Success As Boolean = False
 Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")
 
 'Set a first available project as current. 
 MyRepository.Project.SetCurrentProject(0)

 'Declare a new crew. 
 Dim newCrew As New cCrew("NewCrew1")
 
 'Add the crew to the repository. 
 Dim SuccessAddCrew As Boolean
 SuccessAddCrew = MyRepository.Crew.AddCrew(newCrew)