Home > Tips > How to eject and close CD Drive using VBscript

How to eject and close CD Drive using VBscript

October 8, 2009 Leave a comment Go to comments

After reading labnol post, I felt why only Unix and why not windows. I did some search over internet and finally could able to tailer this script.

It works fine if you have only one CD-Drive. If you have multiple CD drives, then explore the options of the Object I am using in this script.

Set oWMP = CreateObject("WMPlayer.OCX.7" )Set ArrCDROM = oWMP.cdromCollectionwhile (1)wscript.sleep 3000ArrCDROM.Item(0).Ejectwscript.sleep 3000ArrCDROM.Item(0).Ejectwend

Write in comments section if you need any more clarity.

Happy learning..,
Sitaram Pamarthi

Tags: Vbscript for ejecting CD-Drive, CD-Drive eject command, eject CD drive from command prompt.

Related content:

  1. Check and terminate process on remote machine using wmi
  2. Configure Exchange 2007 OWA using PowerShell
  3. Query hidden mailbox users from Active Directory
  4. Find the filesize using PowerShell
  5. Findout Operating System of Remote Machine using PowerShell
  6. Enable Diagnostic Logging in Exchange 2007
  7. Eject CD drive in windows using powershell
  8. Find disk space of remote machine with powershell script
  9. Read-only USB drives
Categories: Tips
  1. No comments yet.
  1. No trackbacks yet.

Leave a Reply

Your email address will not be published. Required fields are marked *

*

You may use these HTML tags and attributes: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>