Repository.Crew.GetCrew: Difference between revisions
Jump to navigation
Jump to search
Kate Racaza (talk | contribs) No edit summary |
Kate Racaza (talk | contribs) No edit summary |
||
| Line 1: | Line 1: | ||
{{Template:API}}{{Template:APIBreadcrumb|10|.[[Repository Class|Repository]]}} | |||
Gets the crew with the designated ID number and returns it as a '''[[CCrew Class|cCrew]]''' object. Returns nothing if the crew does not exist or is not in the current project. | <onlyinclude>Gets the crew with the designated ID number and returns it as a '''[[CCrew Class|cCrew]]''' object. Returns nothing if the crew does not exist or is not in the current project.</onlyinclude> | ||
< | |||
== Syntax == | == Syntax == | ||
'''.Crew.GetCrew'''(''ID'') | '''.Crew.GetCrew'''(''ID'') | ||
| Line 50: | Line 50: | ||
CrewID = MyCrew.ID | CrewID = MyCrew.ID | ||
MsgBox ({{APIString|"You got "}} & CrewName & {{APIString|", ID#"}} & CrewID) | MsgBox ({{APIString|"You got "}} & CrewName & {{APIString|", ID#"}} & CrewID) | ||
Revision as of 20:28, 21 July 2015
 |
Member of: SynthesisAPI10.Repository
Gets the crew with the designated ID number and returns it as a cCrew object. Returns nothing if the crew does not exist or is not in the current project.
Syntax
.Crew.GetCrew(ID)
Parameters
ID
- Integer. The ID number of the crew to retrieve.
Example
This example assumes that a crew with ID#1 exists in a repository.
VBA 'Add code to connect to a Synthesis repository. Dim MyRepository As New Repository ... 'Get crew #1 from project #1. Dim MyCrew As cCrew MyRepository.Project.SetCurrentProject(1) Set MyCrew = MyRepository.Crew.GetCrew(1) 'Output sample: Display the name and ID of the crew. Dim CrewName As String Dim CrewID As Integer CrewName = MyCrew.Name CrewID = MyCrew.ID MsgBox ("You got " & CrewName & ", ID#" & CrewID)
VB.NET 'Add code to connect to a Synthesis repository. Dim MyRepository As New Repository ... 'Get crew #1 from project #1. Dim MyCrew As cCrew MyRepository.Project.SetCurrentProject(1) MyCrew = MyRepository.Crew.GetCrew(1) 'Output sample: Display the name and ID of the crew. Dim CrewName As String Dim CrewID As Integer CrewName = MyCrew.Name CrewID = MyCrew.ID MsgBox ("You got " & CrewName & ", ID#" & CrewID)