# Function Reference

# _WinAPI_GetCDType

Retrieves a type of the media which is loaded into a specified CD-ROM device

#include <WinAPIFiles.au3>
_WinAPI_GetCDType ( $sDrive )

## Parameters

$sDrive | The drive letter of the CD tray to retrieve information, in the format D:, E:, etc.

## Return Value

Success: | The type of the media, it must be one of the following values. 0x0000 - No media 0x0008 - CD-ROM 0x0009 - CD-R 0x000A - CD-RW 0x0010 - DVD-ROM 0x0011 - DVD-R Sequential Recording 0x0012 - DVD-RAM 0x0013 - DVD-RW Restricted Overwrite 0x0014 - DVD-RW Sequential Recording 0x0015 - DVD-R Dual Layer 0x0016 - DVD-R Dual Layer Jump Recording 0x0017 - DVD-RW Dual Layer 0x0018 - DVD-Download Disc Recording 0x001A - DVD+RW 0x001B - DVD+R 0x0040 - BD-ROM 0x0041 - BD-R Sequential Recording Mode (SRM) 0x0042 - BD-R Random Recording Mode (RRM) 0x0043 - BD-RE 0x0050 - HD DVD-ROM 0x0051 - HD DVD-R 0x0052 - HD DVD-RAM 0x0053 - HD DVD-RW 0x0058 - HD DVD-R Dual Layer 0x005A - HD DVD-RW Dual Layer 0xFFFF - Unknown
Failure: | 0 and sets the @error flag to non-zero.

## See Also

Search IOCTL_SCSI_PASS_THROUGH in MSDN Library.

## Example

    #include <WinAPIFiles.au3>

    Local $sText, $iType, $aDrive = DriveGetDrive('CDROM')
    If IsArray($aDrive) Then
        For $i = 1 To $aDrive[0]
            $sText = 'Unknown'
            $iType = _WinAPI_GetCDType($aDrive[$i])
            If Not @error Then
                Switch $iType
                    Case 0x0000
                        $sText = 'No media'
                    Case 0x0008
                        $sText = 'CD-ROM'
                    Case 0x0009
                        $sText = 'CD-R'
                    Case 0x000A
                        $sText = 'CD-RW'
                    Case 0x0010
                        $sText = 'DVD-ROM'
                    Case 0x0011
                        $sText = 'DVD-R SR'
                    Case 0x0012
                        $sText = 'DVD-RAM'
                    Case 0x0013
                        $sText = 'DVD-RW RO'
                    Case 0x0014
                        $sText = 'DVD-RW SR'
                    Case 0x0015
                        $sText = 'DVD-R DL'
                    Case 0x0016
                        $sText = 'DVD-R DL JR'
                    Case 0x0017
                        $sText = 'DVD-RW DL'
                    Case 0x0018
                        $sText = 'DVD-DDR'
                    Case 0x001A
                        $sText = 'DVD+RW'
                    Case 0x001B
                        $sText = 'DVD+R'
                    Case 0x0040
                        $sText = 'BD-ROM'
                    Case 0x0041
                        $sText = 'BD-R SRM'
                    Case 0x0042
                        $sText = 'BD-R RRM'
                    Case 0x0043
                        $sText = 'BD-RE'
                    Case 0x0050
                        $sText = 'HD DVD-ROM'
                    Case 0x0051
                        $sText = 'HD DVD-R'
                    Case 0x0052
                        $sText = 'HD DVD-RAM'
                    Case 0x0053
                        $sText = 'HD DVD-RW'
                    Case 0x0058
                        $sText = 'HD DVD-R DL'
                    Case 0x005A
                        $sText = 'HD DVD-RW DL'
                EndSwitch
            EndIf
            ConsoleWrite(StringUpper($aDrive[$i]) & ' => ' & $sText & @CRLF)
        Next
    EndIf