Does anyone know how to eject a CDROM from a perl script (Win32)?
Im trying to do it through Win32API::File.
DeviceIoControl( $hDevice, $uIoControlCode, $pInBuf, $lInBuf, $opOutBuf,
$lOutBuf, $olRetBytes, $pOverlapped );
$hDevice is supposed to be a Win32 native file handle to a device. What does
that mean?
I cant seem to figure out what I need to do to make this work!
How does this command know what drive I want to eject?
I found that $uIoControlCode should be 'IOCTL_STORAGE_EJECT_MEDIA', but when I
do that, it complains that $uIoControlCode isnt numeric!
Any idea how to get this working, or know of another way to do this?
Regards,
Troy Parry.
__________________________________________________
Do You Yahoo!?
Get personalized email addresses from Yahoo! Mail - only $35
a year! http://personal.mail.yahoo.com/
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/activeperl
