Scrolling dello Sfondo verso il basso
|
Selezionare con Tasto SX, poi con Tasto SD Copia ed Incolla nella vostra pagina Codice da copiare fra i tag <BODY></BODY>
<SCRIPT language=VBScript> <!-- dim MoveItX, MoveItY, mnumfond MoveItY=-100000 MoveItX=0 numfond=document.body.sourceIndex SUB SF MoveItY=MoveItY+1 Document.all(numfond).style.BackgroundPosition= MoveItX & " " & MoveItY id=SetTimeOut("SF",100,"VBScript") End Sub SF --> </SCRIPT> |