Autor Tema: Comparar Fechas En Formato String (Leído 4708 veces)

Dieguinho. · « **en:** Lunes 23 de Octubre de 2006, 20:49 »

Buenas, vengo por aqui por ayuda...

Necesito traer de la base de datos con la que trabaja mi aplicacion registros que cumplan con la siguiente condicion:

si por ej. le paso la fecha martes 24/10/2006 me tiene que traer todos los registros que esten entre el dia anterior a partir de las 15hs y el mismo dia hasta las 15hs.

El problema surge que cuando veo en la base, que ya estaba armada, que el dia y la hora estan en campos diferentes y ambos con el formato string.

Por lo tanto me toma por ej. que la fecha 29/01/06 es mayor a la fecha 05/06/06, cuando en realidad no es asi.

A alguien se le ocurre la manera para poder hacer lo que quiero sin tener que modificar la base de datos????

Quiza es una estupidez mi pregunta pero ahora no se me ocurre nada.

Saludos.

F_Tanori

que base de datos es?

RadicalEd

A ver una solución seria coger (coger es con 'g' sierto

???) por medio de Mid los datos e irlos comparando mes con mes y dia con día, sabiendo que mes 06 > 01, 'tonces la primera validación seria la del mes y si esta se cumple salta, y sino se compara el día.

Me hago entender????

Algo así:

Código: Text

Private sub Compara(fecha1 As String, fecha2 As String)
On Error Resume Next
Dim mes1, mes2, dia1, dia2 As String
dia1 = Mid(fecha1,1,2)
dia2 = Mid(fecha2,1,2)
mes1 = Mid(fecha1,4,2)
mes2 = Mid(fecha1,4,2)
If Val(mes1) &#62; Val(mes2) Then
 If Val(dia1) &#62; Val(dia2) Then
   'Alguna cosa
 End If
End If
End Sub
 

cpmario

Tambien puedes convertir la cadena de texto que tiene la fecha a una variable de fecha (Date) con la función Cdate por ejemplo:

Código: Text

Sub CVDate()
    Dim strFecha1 As String
    Dim strFecha2 As String
    Dim datFecha1 As Date
    Dim datFecha2 As Date
    
    strFecha1 = &#34;29/01/06&#34;
    strFecha2 = &#34;05/06/06&#34;
    datFecha1 = CDate(strFecha1)
    datFecha2 = CDate(strFecha2)
    
    If datFecha1 &#62; datFecha2 Then
        MsgBox &#34;La fecha &#34; & strFecha1 & &#34; es mayor que &#34; & strFecha2
    Else
        MsgBox &#34;La fecha &#34; & strFecha1 & &#34; es menor que &#34; & strFecha2
    End If
    
End Sub
 

RadicalEd

Cita de: "cpmario"

Tambien puedes convertir la cadena de texto que tiene la fecha a una variable de fecha (Date) con la función Cdate por ejemplo:

Código: Text
Sub CVDate()
Dim strFecha1 As String
Dim strFecha2 As String
Dim datFecha1 As Date
Dim datFecha2 As Date

strFecha1 = "29/01/06"
strFecha2 = "05/06/06"
datFecha1 = CDate(strFecha1)
datFecha2 = CDate(strFecha2)

If datFecha1 > datFecha2 Then
MsgBox "La fecha " & strFecha1 & " es mayor que " & strFecha2
Else
MsgBox "La fecha " & strFecha1 & " es menor que " & strFecha2
End If

End Sub

mmm mucho mejor Gracias cpmario

F_Tanori

Pero eso seria para darle tratamiento ya en Visual basic, cuando lo pueden hacer antes de 'bajar' todos los registros ¿No creen?

Por ejemplo en MySQL seria:

</div><table border='0' align='center' width='95%' cellpadding='3' cellspacing='1'><tr><td>SQL </td></tr><tr><td id='CODE'>[color=blue;font-weight]SELECT[/color] * from bitacora WHERE str_to_date(fecha,'%d/%m/%Y')>'2006-10-13'
</td></tr></table><div class='postcolor'>

apartir de esa consulta creas el recordset y ya trabajarias con los datos que necesitas

Saludos

Nota: Las funciones varian dependiendo del DBMS

Dieguinho.

Claro, lo que yo queria hacer es algo parecido a lo que dijo recien F_Tanori.
Que el recorset que vaya a usar desde Visual ya tenga ese filtro hecho.

Yo estoy usando SQL Server.
existe esa funcion str_to_date o alguna parecida para SQL????

saludos!

Dieguinho.

A partir de lo que dijo F_Tanori me puse a investigar un poco y encontre esto que soluciono mi problema:

SELECT *
FROM Mi_Tabla
WHERE CAST(dtinsercion AS DATETIME) > '10/09/2006'

Como verán de esta manera el campo dtinsercion que era una fecha en formato string lo comparó como si fuese una fecha en formato datetime.

Gracias a todos y espero que esto tambien le sirva a alguien!

Saludos.

(igualmente si a alguno se le ocurre algo mas practico que avise!!!)

SoloCodigo

Autor Tema: Comparar Fechas En Formato String (Leído 4708 veces)

Dieguinho.

Comparar Fechas En Formato String

F_Tanori

Re: Comparar Fechas En Formato String

RadicalEd

Re: Comparar Fechas En Formato String

cpmario

Re: Comparar Fechas En Formato String

RadicalEd

Re: Comparar Fechas En Formato String

F_Tanori

Re: Comparar Fechas En Formato String

Dieguinho.

Re: Comparar Fechas En Formato String

Dieguinho.

Re: Comparar Fechas En Formato String