Seite 1 von 1

(Win32) Ermitteln der vorhandenen Laufwerksbuchstaben

Verfasst: 02.02.2005 16:32
von real
Hi (nochmal),

wie bekomme ich raus, welche Laufwerksbuchstaben "gemounted" bzw. unter Windows verfügbar sind?

Gruß
René

Verfasst: 02.02.2005 16:39
von Danilo

Verfasst: 05.02.2005 17:40
von DataMiner

Code: Alles auswählen

DefType.l Serial, type, i
DefType.s Lfwrk, FileSystem, VolName

For i=65 To 90
  Lfwrk=Chr(i)+":\" 
  type =GetDriveType_(Lfwrk)
  FileSystem = Space(256)
  VolName= Space(256)
  GetVolumeInformation_(@Lfwrk, @VolName, 255, @Serial, 0, 0, @FileSystem, 255)
  Select type
    Case 0
      Debug Lfwrk+" The drive type cannot be determined."
    Case 2
      Debug Lfwrk+" = DRIVE_REMOVABLE, "+VolName+", "+FileSystem+", "+  Hex(Serial)
    Case 3
      Debug Lfwrk+" = DRIVE_FIXED, "+VolName+", "+FileSystem+", "+  Hex(Serial)
    Case 4
      Debug Lfwrk+" = DRIVE_REMOTE, "+VolName+", "+FileSystem+", "+  Hex(Serial)
    Case 5
      Debug Lfwrk+" = DRIVE_CDROM, "+VolName+", "+FileSystem+", "+  Hex(Serial)
    Case 6
      Debug Lfwrk+" =  DRIVE_RAMDISK,	"+VolName+", "+FileSystem+", "+  Hex(Serial)
  EndSelect
Next