OpenOffice - Problemas al crear un documento con V.S. 2017

<<>>
   
Vista:

Problemas al crear un documento con V.S. 2017

Publicado por Miguel (10 intervenciones) el 16/04/2018 17:55:03
1
2
3
4
5
6
7
8
9
10
Private Sub Crear(sender As Object, e As EventArgs)
    Dim mArgs()
    Dim oDesktop, oDocument As Object
    Dim sUrl As String
    Dim oSM As Object
    oSM = CreateObject("com.sun.star.ServiceManager")
    oDesktop = oSM.createInstance("com.sun.star.frame.Desktop")
    sUrl = "file:///c:/comunidades/" & txtComunidad.Text & ".odt"
    oDocument = oDesktop.loadComponentFromURL(sUrl, "_blank", 0, mArgs())
End Sub

Tengo este ejemplo cogido de una página de OpenOffice que me da error en la variable mArgs()
Si le doy valores "mArg(0)" ó cualquier otro valor siempre da error en la última linea al ejecutar.

Podría alguien ayudarme por favor pues ando de tras de esta función mucho tiempo y sigo sin saber como hacerlo funcionar.

Muchas gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder