DriveType – Determine the type of a drive
Private Declare Function GetDriveType Lib “kernel32” Alias “GetDriveTypeA” _ (ByVal lpRootPathName As String) As LongConst DRIVE_UNKNOWN = 0 ‘ type can’t be determinedConst DRIVE_NO_ROOT_DIR = 1 ‘ wrong argumentConst DRIVE_REMOVABLE