codice:
Dim Secondi, Minuti, Ore, Giorni

Secondi=95423 

Giorni=INT(Secondi/(60*60*24))
Response.Write "  Giorni...: " & Giorni
Secondi=Secondi-(Giorni*(60*60*24))

Ore=INT(Secondi/(60*60))
Response.Write "  Ore...: " & Ore
Secondi=Secondi-(Ore*(60*60))

Minuti=INT(Secondi/(60))
Response.Write "  Minuti...: " & Minuti
Secondi=Secondi-(Minuti * (60))

Response.Write "  Secondi...: " & Secondi