zdrojový kód
<html>
<head>
<title>Java Script ze stránky - www.jaknaweb.com</title>
<meta http-equiv="content-type" content="text/html; charset=windows-1250">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<font face="Arial" size="2">
<p align="center">
<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(a) dne: "
Document.Write Date() & ", v " & Time() & "."
End Sub
-->
</script>
</p>
</font>
</body>
</html>
Vložil/Poslal/Autor: Admin
Funkčnost:
správna funkčnost zaručena pouze v IE 6