VBScript实现文字遮罩

答案：<title>VBScript实现文字遮罩</title>
<div id="myLightObject" style="position: relative; height: 336px; width: 336px; top: 10px; left: 0px; color: White; filter: light">
<center>
女秘书在参加环保日、卫生日、地球日的活动后，办公室主任通知她还要参加节水日并演讲，女秘书大怒：今天这个日，明天那个日，我实在受不了! 。
</center> 	
</div>
<script language="VBScript">
Option Explicit
sub window_OnLoad()
    call myLightObject.filters.light(0).addambient(0,0,255,30)
	call myLightObject.filters.light(0).addcone(400,400,200,100,100,200,204,200,80,10)
end sub
sub document_onMouseMove()
    call myLightObject.filters.light(0).MoveLight(1,window.event.x,window.event.y,0,1)
end sub	
</script>

上一个：JS溶解形式的文字切换特效
下一个：仿佛打字特效的JS逐字出现的信息文字