• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 188
  • Last Modified:

How to get the cdrom drive letter.


I'm looking for a function or method to get the letter of the cdrom drive..
Is there any function or entry in the register??
0
ineila
Asked:
ineila
1 Solution
 
alamoCommented:
I assume you mean for Win95 or NT.

This function returns the CDROM drive letter, or "" if none found:

Private Declare Function GetDriveType Lib "kernel32" Alias _
     "GetDriveTypeA" (ByVal sDrive As String) As Long
Private Const DRIVE_CDROM = 5

Public Function GetCDRomDrive() As String
 Dim i As Integer
 Dim sDrive As String
 GetCDRomDrive = ""      ' in case none found
 For i = 0 To 25
  sDrive = Chr$(i + 64)
  If GetDriveType(sDrive & ":\") = DRIVE_CDROM Then
   GetCDRomDrive = sDrive
   Exit For
  End If
 Next
End Function

Hope this helps, good luck!
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now