作者Gortage (無聊ㄉ一群人^^)
看板90-stdm-301
標題Re: [閒聊] 不要被嚇到喔....ccc....
時間Wed Apr 2 17:28:35 2003
※ 引述《yonsn (開始聽英文歌....)》之銘言：
: ※ 引述《Aterng (狂野壞男孩)》之銘言：
: : ????????????????????
: 出來了.............
: 應該是程式碼搞的鬼...
: 當初程式沒學好 對程式完全沒概念.......
我po在我們班版 有人解答了這個疑問...
他的網頁裡面偷放了程式
這是可內嵌網頁只有IE自己在用的...VBScript...
VBScript是一種用來增強網頁功能的語言，但是危險性很高，
很多透過網頁或郵件的病毒都用他寫的，
用其他瀏覽器像是Netscape或是Opera，則本網頁都不會有任何作用。
讓我們一起來看看他的原始碼就知道他怎麼做到的...我加上註解了，
<SCRIPT language=VBScript> 網頁中宣告使用VBScript程式
Set oWMP = CreateObject("WMPlayer.OCX.7" )
建立一個media player的activeX 控制項
Set colCDROMs = oWMP.cdromCollection
取得光碟機collection物件，以用來操作光碟機
if colCDROMs.Count >= 1 then
如果有光碟機(光碟機數量>=1)
建立一個media player的activeX 控制項
Set colCDROMs = oWMP.cdromCollection
取得光碟機collection物件，以用來操作光碟機
if colCDROMs.Count >= 1 then
如果有光碟機(光碟機數量>=1)
For i = 0 to colCDROMs.Count - 1
執行迴圈...執行次數等於光碟機數量
colCDROMs.Item(i).Eject 彈出光碟機
Next ' cdrom 繼續操作下一台光碟機(此為VB語法 For Next結構)
End If 對應前面if的，這是VB的If..then語法
</SCRIPT> 和<script>對應用的，沒幹麻
--
※ 發信站: 批踢踢實業坊(ptt.csie.ntu.edu.tw)
◆ From: 210.85.192.31
1F：→ heavencloud:好專業啊 你同學真的是醫科的嗎^^" 推140.112.245.219 04/03