GetDrive, méthode

---

Description

Renvoie un objet Drive correspondant au lecteur figurant dans un chemin spécifié.

Syntaxe

object.GetDrive drivespec

La syntaxe de la méthode GetDrive comprend les éléments suivants :

Élément	Description
object	Correspond toujours au nom d'un objet FileSystemObject.
drivespec	L'argument drivespec peut être une lettre de lecteur (c), une lettre de lecteur avec deux points (c:), une lettre de lecteur avec deux points et un séparateur (c:\) ou toute spécification de partage réseau (\\ordinateur2\partage1).

Notes

L'existence des partages réseau est contrôlée.

Une erreur se produit si l'argument drivespec n'est pas conforme à un des formats acceptés ou n'existe pas. Pour appeler la méthode GetDrive sur une chaîne de chemin normale, utilisez la séquence suivante pour obtenir une chaîne utilisable comme argument drivespec:

DriveSpec = GetDriveName(GetAbsolutePathName(Path))

L'exemple ci-dessous illustre l'utilisation de la méthode GetDrive :

Function ShowFreeSpace(drvPath)
  Dim fso, d, s
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set d = fso.GetDrive(fso.GetDriveName(drvPath))
  s = "Lecteur " & UCase(drvPath) & " - " 
  s = s & d.VolumeName  & "<BR>"
  s = s & "Espace disponible: " & FormatNumber(d.FreeSpace/1024, 0) 
  s = s & " KOctets"
  ShowFreeSpace = s
End Function

---