Lecteurs disponibles et espace disque exploitable

Techniques

Cette section permet de regrouper un ensemble de techniques ou de scripts qui ont l'originalité d'arriver à résoudre une difficulté avec le moindre effort ou qui sont particulièrement efficaces...

•  Comment lister les lecteurs sur le serveur:

Ce script assez trivial permet de mettre en application les méthodes de l'objet File System Object afin de récupérer des informations sur les différents lecteurs du serveur web :

	
<%
Sub writeLn(strVal)
 Response.write strVal & "<br>"
end sub

on error resume next
set objFS = server.CreateObject("Scripting.FileSystemObject")
for each drive in objFS.Drives
   
 
    writeLn "<b>Lecteur : " &  drive.DriveLetter & "</b>"
    writeln ""
   
   if drvValue.Isready then
         writeLn  "Volume : " & drive.VolumeName
         writeLn  "Espace disponible : " & drive.AvailableSpace
         writeLn  "Espace libre : " & drive.FreeSpace
         writeLn  "Espace total : " & drive.TotalSize
         
   else
         writeLn  "Lecteur not ready !"
   end if
next
%>