<% Dim dtmHour dtmHour = Hour(Now()) If dtmHour < 12 Then strGreeting = "Доброе утро!" Else strGreeting = "Привет!" End If %>
в начало
|