tratamiento de fechas

21/11/2007 - 07:24 por Edgar Brito | Informe spam
Tengo una conexion a sqlserver con ADO de la siguiente forma
Dim Conexion As ADODB.Connection, CadenaConexion As String

Dim Actualizar As ADODB.Command

Set Conexion = New ADODB.Connection
Conexion.Open "Provider=SQLNCLI; " & _
"Initial Catalog=tesoreria; " & _
"Data Source=desktop; " & _
"integrated security=SSPI; persist security info=True;"

Dim MovBancarios As ADODB.Recordset
Set MovBancarios = New ADODB.Recordset
MovBancarios.CursorLocation = adUseClient
MovBancarios.CursorType = adKeySet
MovBancarios.Open "select * from movimientosbancarios where " & _
" [fecha]=" & Cells(a, 1), Conexion, adOpenDynamic,
adLockOptimistic

donde cells(a,1) hace referencia a una fecha en excel 01/08/2007

el problema consiste es que tengo un registro en la tabla
movimientosbancarios el campo fecha es 01/08/2007 pero al recuperar los
registros no reconoce este registro y devuelve cero registros, como puedo
utilizar la claúsula select utilizando un campo de fecha.

Mil gracias por el apoyo.
 

Leer las respuestas

#1 Salvador Ramos
21/11/2007 - 10:25 | Informe spam
Hola,

Creo que es un problema habitual, en tu caso esa fecha como la
interpretarías ? 1 de agosto u 8 de enero ? Lo recomendable es utilizar el
formato ANSI 'AAAAMMDD'.
Te paso un link a un artículo del amigo Maxi, espero que te ayude:
http://www.mug.org.ar/SQL/ArticSQL/240.aspx

Un saludo
Salvador Ramos

www.helpdna.net (información sobre SQL Server y Microsoft .Net)
www.helpdna.net/acerca_de_salvador_ramos.htm


"Edgar Brito" escribió en el mensaje
news:
Tengo una conexion a sqlserver con ADO de la siguiente forma
Dim Conexion As ADODB.Connection, CadenaConexion As String

Dim Actualizar As ADODB.Command

Set Conexion = New ADODB.Connection
Conexion.Open "Provider=SQLNCLI; " & _
"Initial Catalog=tesoreria; " & _
"Data Source=desktop; " & _
"integrated security=SSPI; persist security info=True;"

Dim MovBancarios As ADODB.Recordset
Set MovBancarios = New ADODB.Recordset
MovBancarios.CursorLocation = adUseClient
MovBancarios.CursorType = adKeySet
MovBancarios.Open "select * from movimientosbancarios where " & _
" [fecha]=" & Cells(a, 1), Conexion, adOpenDynamic,
adLockOptimistic

donde cells(a,1) hace referencia a una fecha en excel 01/08/2007

el problema consiste es que tengo un registro en la tabla
movimientosbancarios el campo fecha es 01/08/2007 pero al recuperar los
registros no reconoce este registro y devuelve cero registros, como puedo
utilizar la claúsula select utilizando un campo de fecha.

Mil gracias por el apoyo.

Preguntas similares