Código fuente de 'Tiempo hasta la fecha.asp'
<html>
<head>
<title>Tiempo hasta la fecha - Códigos asp, programacion asp, descargas asp, rutinas asp</title>
</head>
<body style="font-family: Arial; font-size: 9pt">
<center><b><font face="Arial" size="3">Tiempo hasta la fecha</font></b></center><br>
Imaginemos que la fecha destino es 1/1/2100<br><br>
Faltan:
<%
DIM strDate
strDate = Date()
Response.Write DateDiff("d", strDate, #1/1/2100#) & " días o "
Response.Write DateDiff("m", strDate, #1/1/2100#) & " meses o "
Response.Write DateDiff("yyyy", strDate, #1/1/2100#) & " años para el 1/1/2100"
%>
</BODY></HTML>