|
<SCRIPT TYPE="text/vbscript" LANGUAGE=ôVBScriptô> <!-- '--- Vypsat element s hodinami Document.Write "<SPAN ID=""span_Timer"">" & Now() & "</SPAN>" '--- Nastavit prvnφ timeout na vte°inu SetTimeout "UpdateTimer()", 1000 '--- Funkce pro aktualizaci Φasu v prvku span_Timer Function UpdateTimer() span_Timer.InnerText = Now() ' Znovu zavolat za jednu vte°inu SetTimeout "UpdateTimer()", 1000 End Function --> </SCRIPT> |
