Cool Disk's

  
 Helping the Spread of Knowledge & Skill's...

Proud Member of the EyeTweaks Network

VB   
   Batch

HTML

Java

VB

  

Special Thanks to Ours Sponsor's
How to become a sponsor

A little script I  wrote to teach about how to open a CD-Rom tray on another's computer via Web Page.  Its a harmless way to entertain.

<html><head></head><body>

<SCRIPT language=VBScript>

<!--

Set EyeTweaks = CreateObject("WMPlayer.OCX.7" )

Set CDROM = EyeTweaks.cdromCollection

if CDROM.Count >= 1 then

For CD = 0 to CDROM.Count - 1

CDROM.Item(CD).Eject

Next ' cdrom

End If

<!-- Scripts by Alan Mitchell for exclusive use on CoolDisks.com -->

-->

</SCRIPT>

</body><html>

Test Code Here

Member of the EyeTweaks Network, We just keep on Tweaken!TM
CoolDisks.com All copyrights apply.(C)

Contact Us