FreeSpace, propriété

Microsoft VBScript

previous page next page
Microsoft® Visual Basic® Scripting Edition FreeSpace, propriété  Référence de la bibliothèque d'exécution Scripting
Version 3

Voir aussi                  Application

Description
Renvoie la quantité d'espace disponible pour un utilisateur sur le lecteur ou le partage réseau. Lecture seule.
Syntaxe
object.FreeSpace

L'argument object représente toujours un objet Drive.

Notes
La valeur renvoyée par la propriété FreeSpace est en général la même que celle renvoyée par la propriété AvailableSpace. Elles peuvent présenter des différences dans le cas des systèmes d'ordinateur qui gèrent les quotas.

Le code suivant illustre l'emploi de la propriété FreeSpace : 

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

previous page start next page