Инструкции:

Только что Вы должны были видеть этот эффект. На видеокамерах Panasonic он называется "Fade". Скопируйте код и вставте в самое начало кода своей странички.
Чтобы сделать эффект "В черное" поменяйте строку:
For i = 0 To 255 Step 3
на
For i = 255 To 0 Step -3.
____________________

Текст:

<SCRIPT LANGUAGE="VBS">
<!--
For i = 0 To 255 Step 1
y = Hex(i)
Document.Bgcolor = y & y & y
Next
Document.Bgcolor = "ffffff"
-->
</SCRIPT>