Datum a čas ve větě








<font face="Arial" size="4 " color="#00FF00">
<script LANGUAGE="VBScript">
<!--
' The next line of code executes when the script tag is parsed.
Call PrintWelcome

Sub PrintWelcome
Dim h

h = Hour(Now)
If h < 12 then
Document.Write "Dobré ráno! "
ElseIf h < 17 then
Document.Write "Dobré odpoledne! "
Else
Document.Write "Dobrý večer! "
End If
Document.Write "Tuto stránku jste navštívil dne "
Document.Write Date() & ", v " & Time() & "."
End Sub
-->
</script>
</font>