Comparação de Datas

[fabiosc80 0]

Tenho uma comparação de datas.

 

1900-01-01

 

Que converto para 01/01/1900

 

Só que as duas datas aparecem iguais na tela e mesmo assim elas se mostram diferentes.

 

Alguem sabe o porque?

[Fábio BN 17]

Oi.

 

Posta o código que fica mais fácil te ajudar.

Eu costumo trabalhar assim:

No MYSQL eu gravo neste formato: ( ano&"/"&mes&"/"&dia )

 

Quando eu recupero ela pelo response.write, aparece assim: dia/mes/ano sem eu precisar converter nada já aparece no formato brasileiro.

 

Quando quero comparar datas, eu faço este procedimento

x = data1
dia_data1 = day(x)
mes_data1 = month(x)
ano_data1 = year(x)
data_1 = ano_data1&"/"&mes_data1&"/"&dia_data1

 

x = data2
dia_data2 = day(x)
mes_data2 = month(x)
ano_data2 = year(x)
data_2 = ano_data2&"/"&mes_data2&"/"&dia_data2

 

Depois é só comparar no IF, ou fazer seleção no select caso você queria buscar entre datas.

 

Abraços!

[fabiosc80 0]

Eu tenho duas datas trazidas na tela iguais apenas.

Só que quando faço uma comparação das duas fala que estão diferentes.

if CDate(Campo1) <> CDate("1900-01-01") then

Response.write("Entra aqui")

End if

Aonde Campo1 é igual a 1900-01-01

[Igor Meireles 0]

Esse "Campo1", esta vindo de onde Fabio?

 

Se for de um Record Setting tenta armazenar ele em uma variável ja usando CDate.

 

Lembrando que é sempre bom postar o código original. Fica mais facil de identificar onde esta o erro.

[xanburzum 169]

usa assim, olha os exemplos:

 

session.lcid=1046
function formatadata(data)
dia=day(data)
mes =month(data)
ano=year(data)
formatadata=dia&"/"&mes&"/"&ano
end function

SQL1 = "INSERT INTO NEWSLETTER (NewsletterNome,NewsletterEmail,NewsletterData,NewsletterHora,NewsletterIP,FL

G_EMAIL) VALUES ('"&Nome&"','"&Email&"',#"&formatadata(NewsletterData)&"#,'"&NewsletterHora&"','"&NewsletterIP&"','"&NewsletterFLG&"')"

Formato: aaaa-mm-dd

<%
Function ConverterDataBanco(ConDataBanco)
    ConDataBanco = Year(ConDataBanco) &"-"& Right("0"&Month(ConDataBanco),2) &"-"& Right("0"&Day(ConDataBanco),2)
    ConverterDataBanco = ConDataBanco
End Function

Response.Write(ConverterDataBanco(Date()))
%>

Formato: dd-mm-aaaa

<%
Function ConverterDataBanco(ConDataBanco)
    ConDataBanco = Right("0"&Day(ConDataBanco),2) &"-"& Right("0"&Month(ConDataBanco),2) &"-"& Year(ConDataBanco)
    ConverterDataBanco = ConDataBanco
End Function

Response.Write(ConverterDataBanco(Date()))
%>

Formato: mm-dd-aaaa

<%
Function ConverterDataBanco(ConDataBanco)
    ConDataBanco = Right("0"&Month(ConDataBanco),2) &"-"& Right("0"&Day(ConDataBanco),2) &"-"& Year(ConDataBanco)
    ConverterDataBanco = ConDataBanco
End Function

Response.Write(ConverterDataBanco(Date()))
%>

Formato: mm/dd/aaaa

<%
Function ConverterDataBanco(ConDataBanco)
    ConDataBanco = Right("0"&Month(ConDataBanco),2) &"/"& Right("0"&Day(ConDataBanco),2) &"/"& Year(ConDataBanco)
    ConverterDataBanco = ConDataBanco
End Function

Response.Write(ConverterDataBanco(Date()))
%>