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()

Preguntas similare

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
Respuesta Responder a este mensaje
#2 Geovanny Quirós Castillo
28/06/2004 - 20:49 | Informe spam
Muchas gracias Eduardo, ahora si me funcionó..estoy feliz!


"Eduardo A. Morcillo [MS MVP VB]" <emorcilloATmvps.org> escribió en el
mensaje news:
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


email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida