Abrir el Repositorio

Superior  Previo  Próximo

Objeto público

 

''un  ejemplo de cómo abrir un repositorio de EA

''en VB.Net 

 

Public Class AutomationExample 

 

''variable de nivel de clase para el Repositorio

Public m_Repository As Object 

 

Public Sub Run() 

try  

  ''crea el objeto repositorio

  m_Repository = CreateObject("EA.Repository") 

 

  ''abre un archivo EAP

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

  ''usa el Repositorio en cualquier forma que se requiera

  'DumpModel 

 

  ''cierra el repositorio y sale

  m_Repository.Exit() 

  m_Repository = Nothing 

 

catch e as exception 

  Console.WriteLine(e) 

End try 

End Sub 

end Class