Giorni intercorsi tra due date (formato testo)

[Frankos]

Ciao a tutti,

ho un problema che non riesco a risolvere da 2 giorni.

Da un database recupero una data che si trova registrata sottoforma di testo.
Per esempio recupero la data 20040727 (cioé 27 luglio 2004).
Recupero poi la data odierna e la trasformo per avere lo stesso formato in questo modo:

Session.LCID = 1040
oggi = Date()
oggianno=right(oggi,4)
oggimese=mid(oggi,4,2)
oggigiorno=left(oggi,2)
dataOdierna=oggianno&oggimese&oggigiorno

Come posso trovare il numero di giorni intercorso tra le 2 date?

Grazie
Ciao

[Mems]

dateDiff("d",dataPiùRemota,dataMenoRemota)

[Roby_72]

http://www.w3schools.com/vbscript/func_datediff.asp

Roby

[Aki]

prova così:

Oggi = Now() 
DataFinale = CDate ("31/7/2002") 
GiorniRestanti = DateDiff("d", Oggi, DataFinale) 
Response.Write "Al " & DataFinale & "mancano " & GiorniRestanti & "giorni"

[kluster]

invece di trasformare date
trasforma il dato dal db in data con lo stesso procedimento

Session.LCID = 1040
datars= Recordset("data")
annors=right(oggi,4)
mesers=mid(oggi,4,2)
giornors=left(oggi,2)
datarsToDate = DateSerial(annors,mesers,giornors)
dataDifferenza = DateDiff("INTERVALLO",Date(),datarsToDate)
per il DateDiff segui il link che ti ha dato Roby

[Frankos]

Grazie ragazzi,

adesso vedo di provare un po' con le indicazioni che mi avete fornito.
Vi faccio sapere come va

[Frankos]

Grandioso !!!

Non conoscevo la funzione DateDiff, é eccezionale !!

Grazie mille!