Mostrar la fecha en formato gráfico


http://www.asptutor.com

La fecha en formato grafico

He aquí un modulo extremadamente sencillo, pero muy efectista.
Se trata simplemente de mostrar en pantalla la fecha actual en formato grafico llamando a las imágenes correspondientes al día y mes actual.

Crearemos este modulo de forma que podamos llamarlo como un include y así poder invocarlo desde cualquier página

 

date.asp

<%Dim path

Dim iday

Dim imonth

'Cambia el path por el de las imagenes

path = "http://www.tuservidor.com/images/"

iday = day(now())

imonth = month(now())

Response.Write "<img border=""0"" src=""" & path & "m" & imonth & ".gif"">"

Response.Write "<img border=""0"" src=""" & path & "d" & iday & ".gif"">"

%>

 

Una vez creado el archivo lo incluiremos en la página que deseemos con el siguiente formato:

Visualizacion.asp

......

<!-- #INCLUDE FILE="date.asp" -->

......

 

con lo que conseguimos un atractivo formato de fecha:

Ver Ejemplo

 

Puedes descargarte las imágenes necesarias y el código fuente pulsando en el dibujo