Economy-x-Talk - Sample Scripts
Eject Volumes AS
papiz wrote:
| how to distinguish a cd/dvd from an hard disk?
A simple way is to test if the volume is locked or not. I don't know if
it's possible with AppleScript on X.
With OS pre-X, this script runs well.
This script unmount all ejectable disks, without distinguish if the
volume is a CD/DVD or a Syquest or a DAT ...
on ejectVolumes {}
set ull to {}
tell application "Finder"
set ull to disks
repeat with i from 1 to (the number of items of ull)
if ejectable of item i of ull then put away item i of ull
end repeat
end tell
end ejectVolumes
Keep this extensive resource of tutorials and samples on-line! Support RunRev.info!
| Yes, this script is useful. I make a donation and choose freely how much I want to donate on-line (PayPal). Click here if you want to make a donation in dollars. | This script has not (completely) solved my problem and I want Economy-x-Talk to take care of it. Let me contact you. |
Copyright©2002-2008 by Mark Schonewille, Nijmegen, the Netherlands. This web site is in no way affiliated with Runtime Revolution Ltd., but we do recommend the Revolution development platform.
