用FrontPage制作鼠标光照效果的具体编码

用FrontPage制作鼠标光照效果的具体编码

我们知道，利用Flash动画制作软件可以制作出生动的鼠标光照效果。其实，我们利用FrontPage同样可以在网页中实现鼠标的光照效果，而且制作出来的"文件存储容量还要比Flash小。其中，用FrontPage制作鼠标光照效果的具体编码如下：

〈body bgcolor="Black"〉

〈div id="myLightObject"〉

〈p〉我们知道，利用Flash动画制作软件可以制作出生动的鼠标光照效果。〈br〉

〈br〉其实，我们利用FrontPage同样可以在网页中实现鼠标的光照效果，而且制作出来的文件存储容量还要比Flash要小。〈br〉

〈br〉其中，用FrontPage制作鼠标光照效果的具体编码如下：

〈/p〉

〈/div〉

〈script language="VBScript"〉

Option Explicit

sub window_OnLoad（）

call myLightObject.filters.light（0）。addambient（0，250，125，30）

//设置光照文字颜色

call myLightObject.filters.light（0）。addcone（400，150，200，100，100，200，200，200，80，10）

//设置光环形状与范围

sub

sub document_onMouseMove（）

call myLightObject.filters.light（0）。MoveLight（1，window.event.x，window.event.y，0，1）

end sub

〈/script〉

〈/body〉