Pasar fecha vacía

shashas · #1 (**permalink**) 15/03/2011, 04:34

Hola a todos!

Vera nestoy desarrollando una pequeña aplicación en Visual Basic 6 y hago una sentencia SQL donde paso una fecha. No es obligatorio introducirla pero si no la pongo falla la aplicación dándome el siguiente error.

No coinciden los datos en la expresion de criterios.

Que es lo que debo hacer?

P.D.: Esto se introduce en una BBDD Access en un campo tipo Fecha

Gracias por adelantado

patob · #2 (**permalink**) 15/03/2011, 14:17

Como le pasas el campo fecha a la consulta?
Podrias mostrarme el codigo?

shashas · #3 (**permalink**) 17/03/2011, 04:23

Si perdona aqui te muestro el código:

"INSERT INTO EnviosEditoriales (Editorial, Contacto, País, Libro, FechaEnv, RechaReb, FechaCon, Anticipo, Observaciones) VALUES (" & idEdito & " '" & QtContacto.Text & "', '" & QtPais.Text & "', " & Libro & ", '" & QtFechaEnv.Text & "', '" & QtFechaReb.Text & "', '" & QtFechaCon.Text & "', " & QtAnticipo.Text & ", '" & QtObservacions.Text & "')"

Heimish2000 · #4 (**permalink**) 17/03/2011, 05:04

¿Has probado a comprobar si la pone y si no la pone pasar un NULL?

patob · #5 (**permalink**) 17/03/2011, 05:26

En donde haces el filtro de la fecha, proba hacer esto.

If fecha.text = "" then

Filtro_Fecha = ""

else

Filtro_Fecha = " AND tabla1.fecha =" & Format(fecha.text, "mm/dd/yyyy") & "

end if