Bonjour,

j'ai le code suivant en vbs qui permet d'afficher l'espace disque restant et je voudrais l'intégrer à une page web (et en afficher le résultat), puis afficher le résultat en pourcentage, comment faire please????   MERCI!!

Const HARD_DISK = 5

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colDisks = objWMIService.ExecQuery _
    ("Select * from Win32_LogicalDisk Where DriveType = " & HARD_DISK & "")

For Each objDisk in colDisks
    Wscript.Echo "DeviceID: "& vbTab &  objDisk.DeviceID      
    Wscript.Echo "Free Disk Space: "& vbTab & objDisk.FreeSpace
Next