Graciasss
|
|
#1 (permalink) |
![]() Fecha de Ingreso: marzo-2007
Mensajes: 29
|
Problema con una consulta
Graciasss |
|
|
|
|
|
#2 (permalink) |
![]() Fecha de Ingreso: marzo-2007
Mensajes: 29
|
Re: Problema con una consulta
Gente ya esta solucionado, dejo la respuesta por si ha alguien le interesa algun dia:
Dim Current_date As Date Dim first_date As Date Dim mCuantosDias as Long Textfecha.Text = Date Current_date = Format$(Textfecha, "yyyy/mm/dd") mCuantosDias = 21 first_date = (Current_date - mCuantosDias) Text1.Text = Module1.Engineer rs.Open "Select * from booking where Staff_Id ='" & Text1.Text & "' And Date BETWEEN '" & Format(first_date, "yyyy-mm-dd") & "' AND '" & Format(Current_date, "yyyy-mm-dd") & "'", cn, adOpenDynamic, adLockOptimistic Set MSHFlexGrid1.DataSource = rs |
|
|
|
|
|
#3 (permalink) |
|
Moderador NO Sabio
![]() ![]() ![]() ![]() ![]() Fecha de Ingreso: noviembre-2002
Ubicación: Costa Rica/Nicaragua
Mensajes: 11.282
|
Re: Problema con una consulta
Que bien pudieras resolverlo, pero para la próxima, por favor NO coloques código de programación en esta sección ya que es de BD y NO de programación.
Función de la sección de Base de Datos
__________________
¿Fácil verdad? |
|
|
|