Con este código ASP comprobamos la hora que es y sacamos un mensaje por pantalla indicando la hora y saludando al visitante que ha entrado en la página con el mensaje correspondiente según la hora que sea.
<%
Dim hora
hora = Hour(Time())
`Comprobar la hora que es al conectarse el usuario
If hora > 6 and hora < 13 then
Response.Write ("<B>Buenos Dias</B>, son las: " &
Time())
ElseIf hora > 12 and hora < 20 then
Response.Write ("<B>Buenas Tardes</B>, son las: "&
Time())
ElseIf hora > 19 and hora < 24 then
Response.Write ("<B>Buenas Noches</B>, son las: "&
Time())
ElseIf hora >= 0 and hora < 7 then
Response.Write ("<B>Buenas Noches</B>, son las: "&
Time())
End If
%>
|
|
