Check for disk in CD/DVD drive

[hobbes487]

How do I check to see if there is a CD or DVD in a specified drive in vb.net.

This is how i did it in VB Classic:

Public Function CheckDrive() As Boolean
        Dim lngTotalClusters As Long
        CheckDrive = True
        If (GetDiskFreeSpace(drivePath & ":\", 0&, 0&, 0&, lngTotalClusters) = 0) Then
            CheckDrive = False
        End If
    End Function

...but this doesnt seem to work