Posúvanie Reklamy
Objekt <DIV id="Rek" style="Z-INDEX: 1; LEFT: 10px; TOP: 1px; HEIGHT: 45px; POSITION: absolute; width: 53px;">
<DIV align="center"><IMG src="obrazok.GIF" width=32 height=32 ><br></DIV>
<DIV align="center"><FONT size="1"> <STRONG><label ID=cas></label></STRONG> </FONT> </DIV>
</DIV>
Script <SCRIPT LANGUAGE=vbscript><!--
dim Casovac,K,Max,A,Min,Sct
Sub window_onresize
NovyRozmer
End Sub

Sub window_onscroll
NovyRozmer
End Sub

Sub animuj()
A=A+K
cas.innertext=time
Rek.style.top=A
if A=>Max then K=-1
if A=<Min then K=1
End Sub

Sub window_onload
k=1
NovyRozmer
Casovac= window.setInterval ("animuj",5)'start
End Sub

Sub NovyRozmer
ScT=window.document.body.scrollTop
Max=window.document.body.offsetHeight-Rek.style.posHeight-10+ScT
Min=ScT
End Sub
--></SCRIPT>