Semplice controllo su date

[Ispanico82]

Ciao,

voglio fare una verifica su una data. Faccio così:

Data1=Request("Data1")

if Data1 <= "31/12/1988" then
Data1 = "01/01/1989"
end if

quando inserisco una data inferiore al 31/12/1988 me la cambia correttamente in 01/01/1989.
Il problema sorge quando inserisco una data superiore al 31/12/1988, ecco in questo caso mi cambia sempre anche per essa la data in 01/01/1989, mentre io invece vorrei che la lasciasse tale e quale.

Come posso correggere?

Grazie

[optime]

tu stai comparando due stringhe, per cui (correttamente) "01/01/2005" sara' sempre minore di "31/12/1998". converti le date in formato YYYYMMDD, oppure usa (ma non garantisco) CDate

[Ispanico82]

Grazie per la risposta.

Ho provato con

Data1=CDate(Request("Data1"))

if Data1 <= "31/12/1988" then
Data1 = "01/01/1989"
end if

ma il risultato rimane sempre quello di prima.
La va per la conversione... tento e poi ti faccio sapere

[optime]

con la conversione vai sul sicuro

[Ispanico82]

Allora... ho trovato questa tua funzione per convertire la data da formato DD/MM/YYYY a formato YYYY/MM/DD

Function ComputerDate(myDate)
   myDate = Left(myDate, 10)
   ComputerDate = Mid(myDate, 7, 4) & Mid(myDate, 4, 2) & Mid(myDate, 1, 2)
End Function

ora scusa la domanda da incompetente... ma come faccio ad applicarla? :master:

[optime]

non si tratta di incompetenza, si tratta di pigrizia

IF ComputerDate(Data1) > ComputerDate(data2) Then

driiiiiin, e' suonata la sveglia

[Ispanico82]

Direi tutte e due le cose!

Adesso provo

Grazie

[Ispanico82]

Va benissimo!!

Grazie da

Ispanico