Fond de page défilant vers le haut
Télécharger ici le script ( 546 Octets )
1 - Inserez comme vous avez l'habitude
de procéder votre image de fond :
<body background="image_arriere_plan.jpg">
2
- Copiez et collez entre les balises <body> et </body> où bon vous semble :
<SCRIPT language=VBScript>
//Un fond défilant vers le haut
<!--
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
<!-- Régler la vitesse de défilement ci-dessous-->
id=SetTimeOut("SF",150,"VBScript")
End Sub
SF
-->
</SCRIPT>
© Copyright GendNet 2000 Tout droit de reproduction strictement réservé aux membres de l'association ®