Error al crear documento

Desarrollo de Macros y programación en UNO, usar las API, llamar programas externos...
Responder
Raul Montes
Mensajes: 12
Registrado: Lun Dic 18, 2017 4:41 pm

Error al crear documento

Mensaje por Raul Montes »

Tengo un código de Mauricio para crear un documento paro me da un error. He visto un manual de OpenOffice y quiero ver si puedo sustituir el Word, así que he preparado el código para crear un documento pero al ejecutarlo me dice que los tipos no coinciden.
Adjunto el código con el error.
OpenOffice 4.4 y Windows 10
Avatar de Usuario
fornelasa
Mensajes: 3268
Registrado: Jue Feb 17, 2011 8:30 pm
Ubicación: Estado de México, México.

Re: Error al crear documento

Mensaje por fornelasa »

Por favor intenta ser más claro en tu consulta, de ser necesario agrega un archivo ejemplo, con lo anterior recibirás una mejor atención.
Saludos, Federico.
lo 6.2.0 | aoo 4.1.6 | win 7/10
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!
Raul Montes
Mensajes: 12
Registrado: Lun Dic 18, 2017 4:41 pm

Re: Error al crear documento

Mensaje por Raul Montes »

Había adjuntado una hoja donde está el código y el error. Así que si me explican por favor como hacer para que llegue lo remitiré rápidamente.

Gracias y un saludo
OpenOffice 4.4 y Windows 10
Avatar de Usuario
mauricio
Mensajes: 6092
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: CDMX
Contactar:

Re: Error al crear documento

Mensaje por mauricio »

No, no adjuntaste ningún archivo, aquí como hacerlo:
https://forum.openoffice.org/es/forum/v ... f=3&t=1335
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Raul Montes
Mensajes: 12
Registrado: Lun Dic 18, 2017 4:41 pm

Error al crear un Documento en desde Visual Studio

Mensaje por Raul Montes »

Les había adjuntado una hoja en la opción que aparece abajo como "subir adjunto" esperando que fuese esa la forma. Me gustaría me explicarán algo del funcionamiento pues es algo que desconozco un poco.
Les adjunto el código y el error :

Option Strict Off

Imports System.IO
Imports Independentsoft.Office.OfficeDocument

Public Class frmInforme
Public objIni As New Inicio.Iniciar.Inicio

Private Sub frmInforme_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Try
Dim oSM As Object 'Root object for accessing OpenOffice from VB
Dim oDesk, oDoc As Object 'First objects from the API
Dim arg() As String
oSM = CreateObject("com.sun.star.ServiceManager")
oDesk = oSM.createInstance("com.sun.star.frame.Desktop")
Dim sRuta As String = "file:///c:/Fincas/juntas/" & objIni.miFichero 'Create a new doc
oDoc = oDesk.loadComponentFromURL(sRuta, "_default", 0, arg)
'Close the doc
oDoc.Close(True)
oDoc = Nothing
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Information, ToString)
End Try
End Sub
End Class

Error: Los tipos no coinciden. Excepción de HRESULT 0X80020005(DISP_E_TYPEMISMATCH)
Gracias
OpenOffice 4.4 y Windows 10
Avatar de Usuario
mauricio
Mensajes: 6092
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: CDMX
Contactar:

Re: Error al crear documento

Mensaje por mauricio »

Por favor, asegurate de darle continuidad a tus temas en un solo hilo...

¿En que linea te da este error?
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Raul Montes
Mensajes: 12
Registrado: Lun Dic 18, 2017 4:41 pm

Re: Error al crear documento

Mensaje por Raul Montes »

No se para en ninguna fila, el caso es que no crea ningún fichero y saca el mensaje al final en el Catch ex As Exception. Hay datos tanto a nivel de MySql así como en el Form.

Gracias y un saludo
OpenOffice 4.4 y Windows 10
Avatar de Usuario
mauricio
Mensajes: 6092
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: CDMX
Contactar:

Re: Error al crear documento

Mensaje por mauricio »

Quita el Try y verificar donde da el error... toma en cuenta que esta pasando args como string, esto es incorrecto, prueba con:

Código: Seleccionar todo

        Dim args(0) As Object
        args(0) = oSM.Bridge_GetStruct("com.sun.star.beans.PropertyValue")
pero no me hagas mucho caso, tiene una eternidad que no toco esto...
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Raul Montes
Mensajes: 12
Registrado: Lun Dic 18, 2017 4:41 pm

Re: Error al crear documento

Mensaje por Raul Montes »

Lo pruebo ahora y decirte que yo es la primera vez que ando con ello y decir también que he estado buscando un manual que trate sobre como trabajar con documentos y solo encuentro de Bases de Datos.
Muchas gracias y un saludo
OpenOffice 4.4 y Windows 10
Raul Montes
Mensajes: 12
Registrado: Lun Dic 18, 2017 4:41 pm

Re: Error al crear documento

Mensaje por Raul Montes »

Añadiendo las dos filas se bloquea. He cambiado el Dim args(0) As Object.
Antes de hacer cambios y quitando el Try se paraba en el punto (1).
Después de la corrección llega hasta el punto (2).

Private Sub frmInforme_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim oSM As Object 'Root object for accessing OpenOffice from VB
Dim oDesk, oDoc As Object 'First objects from the API

Dim arg(0) As Object
oSM = CreateObject("com.sun.star.ServiceManager")
oDesk = oSM.createInstance("com.sun.star.frame.Desktop")
'If objIni.control = True Then
Dim sRuta As String = "file:///c:/Fincas/juntas/" & objIni.miFichero 'Create a new doc (1)
oDoc = oDesk.loadComponentFromURL(sRuta, "_default", 0, arg) (2)
'Close the doc
oDoc.Close(True)
oDoc = Nothing
End Sub

Muchas gracias por la ayuda y un saludo
OpenOffice 4.4 y Windows 10
Raul Montes
Mensajes: 12
Registrado: Lun Dic 18, 2017 4:41 pm

Re: Error al crear documento

Mensaje por Raul Montes »

Perdona donde se para saca este mensaje.
System.Runtime.InteropServices.COMException: 'com.sun.star.lang.IllegalArgumentException: URL seems to be an unsupported one.'
OpenOffice 4.4 y Windows 10
Avatar de Usuario
mauricio
Mensajes: 6092
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: CDMX
Contactar:

Re: Error al crear documento

Mensaje por mauricio »

El error es bastante claro, usa las rutas en formato URL, asegurate que sean correctas:
https://wiki.openoffice.org/wiki/ES/Man ... irectorios
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Raul Montes
Mensajes: 12
Registrado: Lun Dic 18, 2017 4:41 pm

Re: Error al crear documento

Mensaje por Raul Montes »

Gracias por la información. La voy a examinar minuciosamente para ver si consigo hacerlo funcionar, le tendré informado de mis progresos.

Muchas gracias y un saludo
OpenOffice 4.4 y Windows 10
Responder