Error al salvar una fecha

26/06/2004 - 00:38 por Geovanny Quirós Castillo | Informe spam
Hola grupo,
lo he intentado de todas formas pero no le logro llegar al problema, tengo
una aplicacion donde manejo campos de fecha, el asunto es que cuando hago el
insert a la bd (access ó msde, en ambas me da el mismo error), lo que me
guarda es la fecha 01/01/1900 sin importar la fecha que le introduzca, lo he
hecho con textbox y con datetimepicker y no le llego.
adjunto el codigo que estoy usando.

Muchas gracias por la ayuda que me puedan brindar.

Dim fecha As Date

'fecha = "#" & DTPfecha.Value.ToShortDateString & "#"

'fecha = dd / MM / aaaa

fecha = CDate(txtfecha.Text)

fecha = "#" & Format(fecha, "dd/MM/yyyy") & "#"

Dim CnSql As New SqlConnection(ConnectionString)

Dim strSql As String

strSql = "INSERT INTO bdfechas (nombre,fecha) values (" & _

PrepararStr(txtnombre.Text) & _

"," & fecha & _

")"

Dim cmSql As New SqlCommand(strSql, CnSql)

CnSql.Open()

cmSql.ExecuteNonQuery()

CnSql.Close()

cmSql.Dispose()

CnSql.Dispose()
 

Leer las respuestas

#1 Eduardo A. Morcillo [MS MVP VB]
26/06/2004 - 02:01 | Informe spam
Utiliza parametros:

Dim cmSql As New SqlCommand("INSERT INTO bdfechas (nombre,fecha) values
(@NOMBRE, @FECHA)", CnSql)

cmSql.Parameters.add("@NOMBRE", PrepararStr(txtnombre.Text))
cmSql.Parameters.add("@FECHA", DTPfecha.Value)

CnSql.Open()
cmSql.ExecuteNonQuery()
CnSql.Close()

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo

Preguntas similares