[RESUELTO] Error al hacer un UPDATE

Discute sobre las herramientas de la base de datos
Responder
pmartimor
Mensajes: 63
Registrado: Jue Mar 08, 2018 2:11 pm

[RESUELTO] Error al hacer un UPDATE

Mensaje por pmartimor »

Buenos días:
Estoy haciendo un UPDATE en una tabla, tal como muestro a continuación, y me da un mensaje de error que no sé de dónde viene...

Código: Seleccionar todo

Sub AtendidosEntreFechas (Evento)

    Dim BotonLabel As String
	Dim oConsulta As Object
	Dim sSQL As String
	Dim oForm as Object
	Dim Fecha_Inicio As String
	Dim Fecha_Fin As String
	Dim oStat As Object 
	Dim oRes As Object
	oForm = Evento.Source.Model.Parent
	Fecha_Inicio = oForm.ctFechaInicio.Text
	Fecha_Fin = oForm.ctFechaFin.Text

'Comprobar formato fechas
If IsDate(Fecha_Inicio)=False OR IsDate(Fecha_Fin)=False OR Fecha_Inicio="" OR Fecha_Fin="" OR Format(Fecha_Inicio,"YYYY-MM-DD")>Format(Fecha_Fin,"YYYY-MM-DD") Then 
    msgbox ("Fecha de Inicio o Fin inválida")
    Exit Sub
End If

' Damos valor NULL a fadesde y fahasta en la tabla datosninos
	sSQL = "UPDATE ""datosninos"" SET ""fadesde"" = NULL, ""fahasta"" = NULL WHERE ""idninos"" > 0"
	oStat=ThisDatabaseDocument.CurrentController.ActiveConnection.CreateStatement
	oRes=oStat.executeQuery(sSQL)

End Sub
El error que lanza es el siguiente:
Error en tiempo de ejecución de BASIC.
Se ha producido una excepción
Type: com.sun.star.sdbc.SQLException
Message: Can not issue data manipulation staments wiht executeQuery()...

Estoy trabajando con OpenOffice 4.1.5

Saludos y gracias anticipadas.
Última edición por pmartimor el Lun Feb 25, 2019 7:17 pm, editado 1 vez en total.
LibreOffice 5.1.0.3 en clientes Windows 10, 7, XP sobre BD MySql.
Longi
Mensajes: 804
Registrado: Dom Ene 20, 2013 9:05 pm
Ubicación: Ourense, Galicia, España

Re: Error al hacer un UPDATE

Mensaje por Longi »

Buenas!

Sin el ejemplo a la vista igual digo una barbaridad (como es mi costumbre), pero supongo que fadesde y fahasta son fechas.
Comprueba si NULL lo puedes poner como '"& NULL &"', que teóricamente es lo mismo, pero igual no lo es del todo.

Un saludo!
Openoffice 4.1.7, en Windows 10
Libreoffice 6.4.2, en Windows 10
RMG
Mensajes: 3879
Registrado: Mar Nov 17, 2009 6:59 am
Ubicación: Valencia - España

Re: Error al hacer un UPDATE

Mensaje por RMG »

Hola,

Prueba con IS NULL, en vez de = NULL.

Saludos
OpenOffice 4.1.15 y LibreOffice 6.2.4.2 en W-10, y LibreOffice 4.1.6.2 en Open Suse 13.1(VirtualBox)
pmartimor
Mensajes: 63
Registrado: Jue Mar 08, 2018 2:11 pm

Re: Error al hacer un UPDATE

Mensaje por pmartimor »

RMG escribió:Hola,

Prueba con IS NULL, en vez de = NULL.

Saludos
Se me olvidó decir algo que quizá puede ser importante. Las líneas anteiores sí me funcionan si utilizo las tablas embebidas de OpenOffice, pero da el problema cuando ataco a las tablas que tengo en la base de datos de MySQL (que por supuesto tienen la misma estructura), por lo que pienso que el error puede estar en la sintaxis al comunicar con MySQL, pero he cambiado la sintaxis varias veces y no doy con la solución. Sigo haciendo pruebas y cuando lo tenga lo colgaré en este hilo por le sirve a alguien.

Saludos y gracias por vuestra paciencia :)
LibreOffice 5.1.0.3 en clientes Windows 10, 7, XP sobre BD MySql.
pmartimor
Mensajes: 63
Registrado: Jue Mar 08, 2018 2:11 pm

Re: [RESUELTO] Error al hacer un UPDATE

Mensaje por pmartimor »

LibreOffice 5.1.0.3 en clientes Windows 10, 7, XP sobre BD MySql.
Responder