Problema con campos fecha

gabrielva · #1 (**permalink**) 17/10/2006, 07:15

Hola y gracias por responder, tengo en un textbox que ingresar fechas en una base con campo fecha, el problema es que cuando no tengo fecha que cargar y el campo tendria que estar en blanco, me tira error de conversion, como hago para cargar datos en blanco en ese campo fecha... desde ya muchas gracias

juanutcm · #2 (**permalink**) 17/10/2006, 11:23

hola lo primero que se me ocurre es que asignes un espacio en blanco al registro que quieres asignar o no una fecha es decir agregar esto " " ojala te sirva... es una solucion muy piratona pero es lo primeroque se me ocurre.. jejeje

black_devil · #3 (**permalink**) 17/10/2006, 11:40

Prueba que en tu BD el campo fecha acepte valores nulos, lo otro sería, que si no ingresas ninguna fecha en el campo, almacene la fecha actual del sistema, por defecto...

Código:

Private Sub txtfecha_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If txtfecha.Text = "" Then
txtfecha.Text = Date
'Setfocus al siguiente textbox o control ...
End If
End If
End Sub

tazzito · #4 (**permalink**) 17/10/2006, 11:40

fijate que en la base de datos se acepten campos nulos ;)

Developer9 · #5 (**permalink**) 17/10/2006, 11:43

Al hacer clic en el boton grabar pregunta si el textbox de la fecha está vacio pos

AteneaVB · #6 (**permalink**) 18/10/2006, 08:27

Para aclarar un poco la respuesta anterior. Puedes hacer lo siguiente:

If MskFecChe = " / / " Then
NombreCampoFecha = Null
Else
NombreCampoFecha = Format$(MskFecChe.Text, "dd/mm/yyyy")
End If

o también puedes no grabar el campo fecha:

If MskFecChe = " / / " Then
Else
NombreCampoFecha = Format$(MskFecChe.Text, "dd/mm/yyyy")
End If

En qué base de datos estás trabajando?

Saludos.

gabrielva · #7 (**permalink**) 26/10/2006, 19:15

Cita:

Iniciado por AteneaVB

Para aclarar un poco la respuesta anterior. Puedes hacer lo siguiente:

If MskFecChe = " / / " Then
NombreCampoFecha = Null
Else
NombreCampoFecha = Format$(MskFecChe.Text, "dd/mm/yyyy")
End If

o también puedes no grabar el campo fecha:

If MskFecChe = " / / " Then
Else
NombreCampoFecha = Format$(MskFecChe.Text, "dd/mm/yyyy")
End If

En qué base de datos estás trabajando?

Saludos.

hola estoy trabajando en access,, pero no hay caso en la base le pongo valor null y no me lo acepta... gracias a todos por contestar
Saludos gabriel

black_devil · #8 (**permalink**) 28/10/2006, 20:31

No creo que sea problema de la configuración regional de tu equipo ...