hola
Seria algo asi
<%
Dim hora
hora = Hour(Time())
'Empezamos la comprobaciones de tiempo.
If hora > 6 and hora < 13 then
Response.Write ("<B>Buenos Dias</B>, has conectado a las " & Time())
ElseIf hora > 12 and hora < 20 then
Response.Write ("<B>Buenas Tardes</B>, has conectado a las "& Time())
ElseIf hora > 19 and hora < 24 then
Response.Write ("<B>Buenas Noches</B>, has conectado a las "& Time())
ElseIf hora >= 0 and hora < 7 then
Response.Write ("<B>Buenas Noches</B>, has conectado a las "& Time())
End If
%>
espero que te sirva un saludo
<iframe border="0" width="200" scrolling="no" frameborder="0" src="http://www.iespana.es/loencuentras/logoagrega.swf" height="150" name="banner" marginwidth="0" marginheight="0"> </iframe>