Text similar to the lighting effect implemented by JavaScript, from gradient light past, text gradient from left to right, after seeing it, stunned very visual impact effect, interested friends can study
<! -- No prod --> <! Doctype html public "-// W3C // dtd html 3.2 // EN"> <HTML> <pead> <title> colorful text effects </title> <meta name =" ROBOTS "CONTENT =" NOINDEX "> <SCRIPT Language =" VBScript "> <! -- 'Descare the variable used to increment the x coordinate Public xpos' Initialize the variable XPos = 20 Function LightMe () 'puts a spotlight on the title call document. all. title. filters (0 ). addPoint (20, 10,100,200,225,200,100) MoveLight End Function MoveLight () 'ves the spotlight from left to right then ss the title area until it reaches the edge 'of the window and then stops' This increments the x coordinate XPos = XPos + 5' If not at right edge of the window then move the spotlight right If XPos <480 Then call document. all. title. filters (0 ). movelight (0, xpos, 10,100, 1) myTimer = window. setTimeout ("Movelight", 1) 'If at the right edge of the window call the first paragraph of text Else window. clearTimeout (myTimer) call document. all. title. filters (0 ). clear Text1Trans End If End Function Sub Text1Trans () 'makes the first paragraph of text visible Text1.filters (0 ). apply () Text1.style. visibility = "visible" Text1.filters (0 ). play () myTimer = window. setTimeout ("Text2Trans", 3000) End Sub Text2Trans () 'makes the second paragraph of text visible Text2.filters (0 ). apply () Text2.style. visibility = "visible" Text2.filters (0 ). play () Link2Trans End Sub Link2Trans () 'makes the Next button visible Link2.filters (0 ). apply () Link2.style. visibility = "visible" Link2.filters (0 ). play () End Sub Next_onclick () 'makes the button appeared depressed and moves to next slide document. all. buttonNext. src =" http://www.jb51.net /Images/logo.gif "location. href =" http://www.jb51.net "End Sub --> script <META HTTP-EQUIV =" Content-Type "content =" text/html; charset = gb2312 "> <style> body, p, td {font: menu} </style> </pead> <BODY onload = "LightMe" BGCOLOR = "#800000" TEXT = "# D4B878"> <strong> welcome to Internet Information Service! </Strong> <p id = "Text1" style = "position: absolute; left: 7; top: 45; width: 425; visibility: hidden; filter: revealTrans (Duration = 2, Transition = 19); height: 39 "> <strong> Microsoft Internet Information Service is a desktop Web server, you can publish a personal homepage on your computer and share documents on your computer to the entire network. </Strong> </p> <p id = "Text2" style = "position: absolute; left: 200; top: 175; width: 225; visibility: hidden; filter: revealTrans (Duration = 3, Transition = 12); height: 39 "> <strong> IIS can also be used as a development platform before uploading a site to an Internet provider. </Strong> </p> <p id = "Link2" style = "position: absolute; top: 285; left: 385; visibility: hidden; filter: revealTrans (Duration = 3, Transition = 12) "> </p> <p id =" NextButton "style =" display: none "> </p> </body> </ptml>
[Ctrl + A select all Note: If you need to introduce external Js, You need to refresh it to execute]