You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
44 lines
1.0 KiB
44 lines
1.0 KiB
<HTML>
|
|
<HEAD>
|
|
<STYLE>
|
|
BODY {
|
|
BACKGROUND-ATTACHMENT: fixed; BACKGROUND-POSITION: 0px -100000px; FONT-FAMILY: comic sans ms; FONT-SIZE: 12pt; FONT-WEIGHT: normal; MARGIN-LEFT: 10px
|
|
}
|
|
</STYLE>
|
|
<SCRIPT>
|
|
var current = 0;
|
|
var note = "Rose Wallpaper from the OE Stationery newsgroup.";
|
|
function scroll_it()
|
|
{
|
|
current = (current == note.length) ? 0 : current+1;
|
|
|
|
defaultStatus = note.substr(0, current)
|
|
+note.charAt(current).toUpperCase()
|
|
+note.substr(current+1, note.length);
|
|
setTimeout("scroll_it()", 100);
|
|
}
|
|
scroll_it();
|
|
</script>
|
|
<BODY background=\\oriole\qa_oe\stationery\nature\rose wallpaper.jpg
|
|
bgColor=#ffffff>
|
|
<SCRIPT language=VBScript>
|
|
|
|
dim MoveItX, MoveItY, mnumfond
|
|
MoveItY=-100000
|
|
MoveItX=-100000
|
|
numfond=document.body.sourceIndex
|
|
SUB SF
|
|
MoveItY=MoveItY+1
|
|
MoveItX=MoveItX+1
|
|
Document.all(numfond).style.BackgroundPosition= MoveItX & " " & MoveItY
|
|
id=SetTimeOut("SF",100,"VBScript")
|
|
End Sub
|
|
SF
|
|
|
|
</SCRIPT>
|
|
|
|
</HEAD>
|
|
<BODY BACKGROUND="rose wallpaper.jpg">
|
|
|
|
</BODY>
|
|
</HTML>
|