<SCRIPT LANGUAGE=vbscript>
<!--
Sub window_onload
Dim Pas
Pas = InputBox ("Zadajte vstupné heslo:")
if Pas=false then exit sub
If Pas = "KOZA" Then
window.open.navigate ("http://www.google.sk")
Else MsgBox "Zadali ste špatné heslo."
window.close
End If
End Sub
-->
</SCRIPT>