OpenEuphoria

2. Re: CD eject

• Posted by petelomax at blueyonder.co.uk Jul 15, 2002
• 487 views

{{{ On Sun, 14 Jul 2002 12:58:02 -0400, weddle at psknet.com wrote:

You could grab this file: http://www.sysinternals.com/files/sync.zip (18K zipped, 44K unzipped). Then a call to system("sync -e F",0)) where F is the correct drive letter will make it eject, but only if there is media in the drive. (Actually, my CD drive is busted but it works for my zip drive). Messy screen flicker, but it works.

Alternatively, install FlexiCD or WinEject or similar & then you'll have an Eject CD menu entry off the taskbar.

Or if you are feeling really brave, and understand what Interrupt 21h Function 440Dh Minor Code 49h is/how to call it (Juergen Luethje might know) I found that at: http://www.allapi.net/apilist/example.php?example=Eject%20CD & it does something different for NT/2000

Pete

4. Re: CD eject

• Posted by munchr at mac.com Jul 15, 2002
• 462 views

At 12:58 PM 14/07/2002 -0400, you wrote:

>drive and make it eject.? Thanks!
In addition to the links and code posted by Pete Lomax and Juergen Luethje,
you might check the following links for information on using MCI commands
which will function on all versions of MS Windows.

http://pub13.ezboard.com/fvisualbasicexplorerfilesfoldersdirectories.showMessage?topicID=1115.topic

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/multimed/mci_7vvt.asp

James Powell

6. Re: CD eject

• Posted by weddle at psknet.com Jul 17, 2002
• 454 views

>
> Hello Don,
>
> Don <Graebel at hotmail.com> wrote:
>
> >> I'm wondering if anyone has a code (windows) that will access a CD-ROM
> >> drive and make it eject.? Thanks!
> >>
>
> > I saw Juergen Luethje's code snip for ejecting a CD using INTs.  Very
> > interesting.  If however you would prefer the Windows version of the
> > same, use this:
>
> > ==========
> > include Win32Lib.ew
>
> > constant
> > winmm = registerw32Library( "winmm.dll" )
> > constant
> > mciSendString = registerw32Procedure( winmm, "mciSendStringA",
> > {C_POINTER,C_POINTER,C_POINTER,C_POINTER} )
>
> > procedure OpenCD()
> >     atom OpenStr
> >     OpenStr = allocate_string( "Set cdaudio door open wait" )
> >     w32Proc( mciSendString, {OpenStr, 0, 0, 0} )
> >     free( OpenStr )
> > end procedure
>
> > procedure CloseCD()
> >     atom CloseStr
> >     CloseStr = allocate_string( "Set cdaudio door closed wait" )
> >     w32Proc( mciSendString, {CloseStr, 0, 0, 0} )
> >     free( CloseStr )
> > end procedure
> > ==========
>
> > Don Phillips
>
>
> I would prefer the Windows version, but I only was able to write the DOS
> version. And of course it's nice not only to have a OpenCD() routine,
> but also a CloseCD() routine.
>
> I've got a question: When a computer has 2 or more CD drives, how do
> your procedures "know", which drive they should open/close?
>
> Thanks and best regards,
>    Juergen

I also have the same question, i'm currently using the above code (Thanks
Don!!) i have 2 drives, a DVD drive and a CD-R/W drive as well, the above
code will only open my DVD drive, which is my primary drive (E: while the
cd-rw drive is F:) Is it possible to open a second drive as well?