DEMOhttp://163.22.51.2:8000/DiscuZ/viewthr...tachment&aid=426-------------------------------------------------------------------------------------------------------------
複製程式
<body bgcolor=#000000>
<script language="VBScript">
Option Explicit
sub window_OnLoad()
call myLightObject.filters.light(0).addambient(0,0,128,15)
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>
<div id="myLightObject" style="position: relative; height: 400px; width: 400px; top: 10px; left: 0px; color: White; filter: light">
<center>
<img src=http://163.22.51.2:8000/DiscuZ/images/z1.gif><br>
對你的思念 是一天又一天，<BR>
孤單的我 還是沒有改變，<BR>
美麗的夢 何時才能出現，<BR>
親愛的你 好想再見你一面。<BR>
<BR>
秋天的風 一陣陣地吹過，<BR>
想起了去年的這個時候，<BR>
你的心到底在想些什麼，<BR>
為什麼留下這個結局讓我承受。<BR>
<BR>
最愛你的人是我，<BR>
你怎麼捨得我難過，<BR>
在我最需要你的時候<BR>
沒有一句話就走，<BR>
<BR>
最愛你的人是我，<BR>
你怎麼捨得我難過，<BR>
對你付出了這麼多<BR>
你卻沒有感動過<BR>
</center></div>
</body>
