WMIRésolu

Question

Bonjour, j'ai r&#233;cup&#233;r&#233; le code suivant et je voudrais afficher &#233;galement en pourcentage l'espace disque dispo, comment faire cela...?

Mon code :

Const HARD_DISK = 3


strComputer = "IP"
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 "Lecteur: "& vbTab &  objDisk.DeviceID       
    Wscript.Echo "Espace disque disponible (en MO) : "& vbTab & objDisk.FreeSpace /1048576
Next


Merci d'avance

Renfield · Accepted Answer

tout est dans la doc .....

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/win32_logicaldisk.asp

tu trouveras bien
uint64 FreeSpace;

dont tu te sers dans ton code, mais &#233;galement 

uint64 Size;

il suffit donc de faire une petite r&#232;gle de trois pour obtenir ton pourcentage...

Renfield
Admin CodeS-SourceS - MVP Visual Basic

flopad · Answer

Merci beaucoup

flopad · Answer

Par contre, comment est ce que je peux afficher le r&#233;sultat sur une page web??

Renfield · Answer

j'ignore si WMI est acc&#233;ssible depuis le Net.... je pense que oui....
il suffit, je pense, de mettre un script en VbScript

Renfield
Admin CodeS-SourceS - MVP Visual Basic

flopad · Answer

J'ai d&#233;j&#224; cr&#233;e mon vbs, mais est ce que tu saurais me dire comment je peux faire pour afficher le r&#233;sultat de mon script via une interface web?

Renfield · Answer

j'ai pas parlé de .vbs ... dans ta page HTML, insère simplement un Script ... Renfield Admin CodeS-SourceS - MVP Visual Basic

swan94 · Answer

Salut,

très bon post, mais la source que tu as donné semble ne pas être en VB2005. 
En effet il me rejette objWMIService. Comment faire ?


Merci

Swan94

WMI

7 réponses

Discussions similaires