public Object

 

''An example of how to open an Enterprise Architect repository

''in VB.Net.

 

Public Class AutomationExample

''class level variable for Repository

Public m_Repository As Object

Public Sub Run()

   try

     ''create the repository object

     m_Repository = CreateObject("EA.Repository")

    

     ''open an EAP file

     m_Repository.OpenFile("F:\Test\EAAuto.EAP")

     ''use the Repository in any way required

     'DumpModel

    

     ''close the repository and tidy up

     m_Repository.Exit()

     m_Repository = Nothing

    

....catch e as exception

     Console.WriteLine(e)

   End try

End Sub

end Class