Convertir una fecha a formato Ansi

08/05/2006 - 17:00 por Alicia | Informe spam
Hola a todos. Tengo muchos problemas con los tipos de dato fecha en Sql.
Quiero convertir el tipo de dato Date a Ansi para que sea leido
correctamente en mi sentencia Sql.

Dim cmmSql As New SqlCommand
cmmSql.CommandText = "SELECT * FROM VST_Pedidos"
cmmSql.CommandText & = " WHERE [Fecha] BETWEEN '" & Me.mskFechaInicial.Text
& "' AND '" & Me.mskFechaFinal.Text & "')"
cmmSql.Connection = Me.Conexion
dtaAdaptador.SelectCommand = cmmSql
dtaAdaptador.Fill(dtsDatos, strTabla)

Cuando ejecuto esta sentencia en mi aplicacion, en algunos servidores
funciona correctamento pero en otros no. Me he informao y el problema es por
el formato de la fecha, y la mejor solucion es convertirlo a Ansi, pero no
se como. ¿Alguien sabe de alguna funcion?

Mucha gracias. Saludos.

Preguntas similare

Leer las respuestas

#1 Carlos Gómez
08/05/2006 - 18:49 | Informe spam
Alicia wrote:

Hola a todos. Tengo muchos problemas con los tipos de dato fecha en Sql.
Quiero convertir el tipo de dato Date a Ansi para que sea leido
correctamente en mi sentencia Sql.

Dim cmmSql As New SqlCommand
cmmSql.CommandText = "SELECT * FROM VST_Pedidos"
cmmSql.CommandText & = " WHERE [Fecha] BETWEEN '" &
Me.mskFechaInicial.Text & "' AND '" & Me.mskFechaFinal.Text & "')"
cmmSql.Connection = Me.Conexion
dtaAdaptador.SelectCommand = cmmSql
dtaAdaptador.Fill(dtsDatos, strTabla)

Cuando ejecuto esta sentencia en mi aplicacion, en algunos servidores
funciona correctamento pero en otros no. Me he informao y el problema es
por el formato de la fecha, y la mejor solucion es convertirlo a Ansi,
pero no se como. ¿Alguien sabe de alguna funcion?

Mucha gracias. Saludos.


El formato ANSI es yyyyMMdd HH:mm:ss
Por tanto:

Dim FechaAnsi as String
FechaAnsi = String.Format("{yyyyMMdd HH:mm:ss}",Now())
MessageBox.Show("La fecha actual en formato ANSI es " & FechaAnsi)
Respuesta Responder a este mensaje
#2 Eduardo A. Morcillo [MS MVP VB]
08/05/2006 - 23:39 | Informe spam
Usa parametros y olvidate de los formatos.

Dim cmmSql As New SqlCommand
Dim f1 As SqlParameter
Dim f2 As SqlParameter

cmmSql.CommandText = "SELECT * FROM VST_Pedidos " & _
"WHERE [Fecha] BETWEEN @F1 AND @F2"

f1 = cmmSql.Parameters.Add("@F1", SqlDbType.DateTime)
f2 = cmmSql.Parameters.Add("@F1", SqlDbType.DateTime)

f1.Value = Date.Parse(Me.mskFechaInicial.Text)
f2.Value = Date.Parse(Me.mskFechaFinal.Text)

cmmSql.Connection = Me.Conexion

dtaAdaptador.SelectCommand = cmmSql
dtaAdaptador.Fill(dtsDatos, strTabla)

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo
http://mvp.support.microsoft.com/pr...4EF5A4191C
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida