Repository.URD.GetURD: Difference between revisions
Jump to navigation
Jump to search
Kate Racaza (talk | contribs) No edit summary |
Kate Racaza (talk | contribs) No edit summary |
||
| (7 intermediate revisions by the same user not shown) | |||
| Line 1: | Line 1: | ||
{{Template:API}}{{Template:APIBreadcrumb|.[[Repository Class|Repository]]}} | |||
<onlyinclude>Returns a '''[[CURD Class|cURD]]''' object that represents a given URD resource in the current project. Returns nothing if the URD does not exist or is not in the current project.</onlyinclude> | |||
== Syntax == | == Syntax == | ||
' | '''.URD.GetURD'''(''ID'') | ||
=== Parameters === | === Parameters === | ||
''ID'' | |||
:Required. Integer. The ID number of the URD to retrieve. | |||
== Example == | == Example == | ||
This example assumes that a URD with ID#1 exists in a repository. | This example assumes that a URD with ID #1 exists in the first project of a Synthesis repository. | ||
'''VBA''' | '''VBA''' | ||
{{APIComment|'Declare a new Repository object and connect to a Synthesis repository.}} | |||
{{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository | |||
MyRepository.ConnectToAccessRepository({{APIString|"C:\RSRepository1.rsr10"}}) | |||
{{APIComment|'Get URD #1 from project #1.}} | {{APIComment|'Get URD #1 from project #1.}} | ||
{{APIPrefix|Dim}} MyURD {{APIPrefix|As}} cURD | |||
MyRepository.Project.SetCurrentProject(1) | |||
{{APIPrefix|Set}} MyURD = MyRepository.URD.GetURD(1) | |||
{{APIComment|'Output sample: Display the name and ID of the URD.}} | {{APIComment|'Output sample: Display the name and ID of the URD.}} | ||
{{APIPrefix|Dim}} URDName {{APIPrefix|As}} String | |||
{{APIPrefix|Dim}} URDID {{APIPrefix|As}} Integer | |||
URDName = MyURD.Name | |||
URDID = MyURD.ID | |||
MsgBox ({{APIString|"You got "}} & URDName & {{APIString|", ID#"}} & URDID) | |||
'''VB.NET''' | '''VB.NET''' | ||
{{APIComment|'Declare a new Repository object and connect to a Synthesis repository.}} | |||
{{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository | |||
MyRepository.ConnectToAccessRepository({{APIString|"C:\RSRepository1.rsr10"}}) | |||
{{APIComment|'Get URD #1 from project #1.}} | {{APIComment|'Get URD #1 from project #1.}} | ||
{{APIPrefix|Dim}} MyURD {{APIPrefix|As}} cURD | |||
MyRepository.Project.SetCurrentProject(1) | |||
MyURD = MyRepository.URD.GetURD(1) | |||
{{APIComment|'Output sample: Display the name and ID of the URD.}} | {{APIComment|'Output sample: Display the name and ID of the URD.}} | ||
{{APIPrefix|Dim}} URDName {{APIPrefix|As}} String | |||
{{APIPrefix|Dim}} URDID {{APIPrefix|As}} Integer | |||
URDName = MyURD.Name | |||
URDID = MyURD.ID | |||
MsgBox ({{APIString|"You got "}} & URDName & {{APIString|", ID#"}} & URDID) | |||
Latest revision as of 18:55, 9 June 2016
 |
Member of: SynthesisAPI.Repository
Returns a cURD object that represents a given URD resource in the current project. Returns nothing if the URD does not exist or is not in the current project.
Syntax
.URD.GetURD(ID)
Parameters
ID
- Required. Integer. The ID number of the URD to retrieve.
Example
This example assumes that a URD with ID #1 exists in the first project of 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") 'Get URD #1 from project #1. Dim MyURD As cURD MyRepository.Project.SetCurrentProject(1) Set MyURD = MyRepository.URD.GetURD(1) 'Output sample: Display the name and ID of the URD. Dim URDName As String Dim URDID As Integer URDName = MyURD.Name URDID = MyURD.ID MsgBox ("You got " & URDName & ", ID#" & URDID)
VB.NET 'Declare a new Repository object and connect to a Synthesis repository. Dim MyRepository As New Repository MyRepository.ConnectToAccessRepository("C:\RSRepository1.rsr10") 'Get URD #1 from project #1. Dim MyURD As cURD MyRepository.Project.SetCurrentProject(1) MyURD = MyRepository.URD.GetURD(1) 'Output sample: Display the name and ID of the URD. Dim URDName As String Dim URDID As Integer URDName = MyURD.Name URDID = MyURD.ID MsgBox ("You got " & URDName & ", ID#" & URDID)