Scrolling dello Sfondo verso l'alto
Selezionare con Tasto SX, poi con Tasto SD Copia ed Incolla nella vostra pagina Codice da copiare fra i tag <BODY></BODY> Ovviamente salvate anche lo sfondo "back.jpg" che metterete in una cartella . <SCRIPT language="VBScript"> dim MoveItX, MoveItY, mnumfond MoveItY=0 MoveItX=0 numfond=document.body.sourceIndex SUB SF MoveItY=MoveItY-1 MoveItX=MoveItX+0 Document.all(numfond).style.BackgroundPosition= MoveItX & " " & MoveItY id=SetTimeOut("SF",100,"VBScript") End Sub SF </SCRIPT> |
 |