Visual Basic - SELECT con fechas

Life is soft - evento anual de software empresarial
 
Vista:

SELECT con fechas

Publicado por julio (48 intervenciones) el 21/06/2006 04:35:50
Quiero hacer una consulta. Uno de los campos de la tabla es una fecha. La variable donde recibo la fecha "FechaControl", la trato con la funcion DateSerial

Entonces la tabla tiene un campo codigo de articulo y fecha. Es necesario
consultar el codigo y la fecha, porque sin ya existen, hay que pasarlos por alto. Pero
al combinar la consulta con la fecha no me funciona

¿Como es la sintaxis de la consulta para que funcione?

A continuacion envio el codigo para una mejor comprension.
- - -- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

FechaControl = DateSerial(Year(fecha1), Month(fecha1), Day(fecha1) ' aaa/mm/dd


Si a la consulta le QUITO la fecha, FUNCIONA CORRECTAMENTE

strSQL = "SELECT * FROM TablaControl " & _
"WHERE str(TablaControl.Codigo)=" & Str(CodigoObraSocial)

Pero, lamentablemente, es necesario considerar tambien la fecha, y ahI NO FUNCIONA
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

strSQL = "SELECT * FROM TablaControl " & _
"WHERE str(TablaControl.Codigo)=" & Str(CodigoArticulo) & _
"And TablaControl.FECHA_REMESA =" & FechaControl

Set rsControl = DB.OpenRecordset(strSQL)

If Not (rsControl.BOF And rsControl.EOF) Then
'Debe Salir -Ya se recupero-
MsgBox "ya se recupero"
rsTablaControl.Close
Exit Sub
Else
'Corresponde actualizar TablaControl y Continuar
rsTablaControl.AddNew
rsTablaControl!Codigo = CodigoArticulo
rsTabla!FECHA_REMESA = FechaControl
rsTabla!fecha = Date
rsTabla!hora = Time
rsTablaControl.Update
rsTablaControl.Close
End If

. . . . .
Desde ya agradezco su ayuda....
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:SELECT con fechas

Publicado por Javi RM (187 intervenciones) el 21/06/2006 08:15:17
Estas trabajando con Access.
Si es así debes poner # antes y despues de la fecha en la SLQ, el formato ya lo asignas correctamente (YYYY/MM/DD).

Quedaría así:
....
"And TablaControl.FECHA_REMESA =#" & FechaControl & "#"

Si no funciona lo comentas y probamos otra cosa.

Un saludo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:SELECT con fechas

Publicado por julio (48 intervenciones) el 21/06/2006 16:02:52
Problema superado exitosamente. Muchas Gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar