Problemas al crear un documento con V.S. 2017
Publicado por Miguel (14 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 ObjectDim 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
0