For I = 67 To 90 If GetDriveType_(Chr(I)+":\")=#DRIVE_REMOVABLE Debug Chr(I)+":\" EndIf Next