Je cherche a faire un vbscript qui permet d'afficher la totalité de la
ram utilisée (physique et virtuelle). en gros je veux afficher ce qu'on
voit dans le gestionnaire de tache (le total de charge dédiée).
quelqu'un a-t-il une idée sur la question ? (je ne désire pas un script
mais juste la commande wmi par exemple qui permet de récuperer cette donnée)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jean-Claude BELLAMY
Dans le message news:ctaunl$19v$ , chris s'est ainsi exprimé:
Bonjour,
Je cherche a faire un vbscript qui permet d'afficher la totalité de la ram utilisée (physique et virtuelle). en gros je veux afficher ce qu'on voit dans le gestionnaire de tache (le total de charge dédiée).
quelqu'un a-t-il une idée sur la question ? (je ne désire pas un script mais juste la commande wmi par exemple qui permet de récuperer cette donnée)
... Set WMI = GetObject("winmgmts:" & Computer & "rootcimv2") ' RAM physique : Set col = WMI.ExecQuery("Select * from Win32_PhysicalMemory",,48) For Each Item in col capa=Item.Capacity/1048576 wscript.echo "Barrette " & Item.DeviceLocator & " : " & capa & " Mo " & Item.BankLabel Next ... ' Mémoire virtuelle : Set col = WMI.ExecQuery("Select * from Win32_PageFileSetting",,48) For Each Item in col Wscript.Echo Item.Name & " : " & Item.InitialSize & "-" & Item.MaximumSize & " Mo" Next
A toi de mettre en forme !
-- May the Force be with You! La Connaissance s'accroît quand on la partage ---------------------------------------------------------- Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org *
Dans le message news:ctaunl$19v$1@s1.news.oleane.net ,
chris <chris@nospam.fr> s'est ainsi exprimé:
Bonjour,
Je cherche a faire un vbscript qui permet d'afficher la totalité de la
ram utilisée (physique et virtuelle). en gros je veux afficher ce
qu'on voit dans le gestionnaire de tache (le total de charge dédiée).
quelqu'un a-t-il une idée sur la question ? (je ne désire pas un
script mais juste la commande wmi par exemple qui permet de récuperer
cette donnée)
...
Set WMI = GetObject("winmgmts:\" & Computer & "rootcimv2")
' RAM physique :
Set col = WMI.ExecQuery("Select * from Win32_PhysicalMemory",,48)
For Each Item in col
capa=Item.Capacity/1048576
wscript.echo "Barrette " & Item.DeviceLocator & " : " & capa & " Mo " &
Item.BankLabel
Next
...
' Mémoire virtuelle :
Set col = WMI.ExecQuery("Select * from Win32_PageFileSetting",,48)
For Each Item in col
Wscript.Echo Item.Name & " : " & Item.InitialSize & "-" &
Item.MaximumSize & " Mo"
Next
A toi de mettre en forme !
--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
Jean-Claude.Bellamy@wanadoo.fr * JC.Bellamy@free.fr
Dans le message news:ctaunl$19v$ , chris s'est ainsi exprimé:
Bonjour,
Je cherche a faire un vbscript qui permet d'afficher la totalité de la ram utilisée (physique et virtuelle). en gros je veux afficher ce qu'on voit dans le gestionnaire de tache (le total de charge dédiée).
quelqu'un a-t-il une idée sur la question ? (je ne désire pas un script mais juste la commande wmi par exemple qui permet de récuperer cette donnée)
... Set WMI = GetObject("winmgmts:" & Computer & "rootcimv2") ' RAM physique : Set col = WMI.ExecQuery("Select * from Win32_PhysicalMemory",,48) For Each Item in col capa=Item.Capacity/1048576 wscript.echo "Barrette " & Item.DeviceLocator & " : " & capa & " Mo " & Item.BankLabel Next ... ' Mémoire virtuelle : Set col = WMI.ExecQuery("Select * from Win32_PageFileSetting",,48) For Each Item in col Wscript.Echo Item.Name & " : " & Item.InitialSize & "-" & Item.MaximumSize & " Mo" Next
A toi de mettre en forme !
-- May the Force be with You! La Connaissance s'accroît quand on la partage ---------------------------------------------------------- Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org *
chris
Dans le message news:ctaunl$19v$ , chris s'est ainsi exprimé:
Bonjour,
Je cherche a faire un vbscript qui permet d'afficher la totalité de la ram utilisée (physique et virtuelle). en gros je veux afficher ce qu'on voit dans le gestionnaire de tache (le total de charge dédiée).
quelqu'un a-t-il une idée sur la question ? (je ne désire pas un script mais juste la commande wmi par exemple qui permet de récuperer cette donnée)
... Set WMI = GetObject("winmgmts:" & Computer & "rootcimv2") ' RAM physique : Set col = WMI.ExecQuery("Select * from Win32_PhysicalMemory",,48) For Each Item in col capa=Item.Capacity/1048576 wscript.echo "Barrette " & Item.DeviceLocator & " : " & capa & " Mo " & Item.BankLabel Next ... ' Mémoire virtuelle : Set col = WMI.ExecQuery("Select * from Win32_PageFileSetting",,48) For Each Item in col Wscript.Echo Item.Name & " : " & Item.InitialSize & "-" & Item.MaximumSize & " Mo" Next
A toi de mettre en forme !
Merci JC, mais ce n'est pas ce que je recherche. ce que tu m'as fourni me renvoie la mémoire disponible (physique et virtuelle). alors que je cherche à obtenir la taille de la mémoire utilisée par tous les processus, à un instant t.
j'ai fais ceci mais ça ne me donne pas le chiffre exact affiché dans le gestionnaire de tache.
============================ Set objDictionary = CreateObject("Scripting.Dictionary") strComputer = "." Dim addition Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!" & strComputer & "rootcimv2") Set colProcesses = objWMIService.ExecQuery _ ("Select * from Win32_Process") For each objProcess in colProcesses objDictionary.Add objProcess.VirtualSize, objProcess.Name ' ' Wscript.Echo objProcess.Name & VbTab & (objProcess.VirtualSize/8) addition = addition + (objProcess.VirtualSize/8) Next Wscript.Echo "total :"& vbtab & addition & vbtab & "octets" ================================== si tu as une idée (ou quelqu'un d'autre)... :p
merci.
Dans le message news:ctaunl$19v$1@s1.news.oleane.net ,
chris <chris@nospam.fr> s'est ainsi exprimé:
Bonjour,
Je cherche a faire un vbscript qui permet d'afficher la totalité de la
ram utilisée (physique et virtuelle). en gros je veux afficher ce
qu'on voit dans le gestionnaire de tache (le total de charge dédiée).
quelqu'un a-t-il une idée sur la question ? (je ne désire pas un
script mais juste la commande wmi par exemple qui permet de récuperer
cette donnée)
...
Set WMI = GetObject("winmgmts:\" & Computer & "rootcimv2")
' RAM physique :
Set col = WMI.ExecQuery("Select * from Win32_PhysicalMemory",,48)
For Each Item in col
capa=Item.Capacity/1048576
wscript.echo "Barrette " & Item.DeviceLocator & " : " & capa & " Mo " &
Item.BankLabel
Next
...
' Mémoire virtuelle :
Set col = WMI.ExecQuery("Select * from Win32_PageFileSetting",,48)
For Each Item in col
Wscript.Echo Item.Name & " : " & Item.InitialSize & "-" &
Item.MaximumSize & " Mo"
Next
A toi de mettre en forme !
Merci JC, mais ce n'est pas ce que je recherche.
ce que tu m'as fourni me renvoie la mémoire disponible (physique et
virtuelle).
alors que je cherche à obtenir la taille de la mémoire utilisée par tous
les processus, à un instant t.
j'ai fais ceci mais ça ne me donne pas le chiffre exact affiché dans le
gestionnaire de tache.
============================ Set objDictionary = CreateObject("Scripting.Dictionary")
strComputer = "."
Dim addition
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\" & strComputer & "rootcimv2")
Set colProcesses = objWMIService.ExecQuery _
("Select * from Win32_Process")
For each objProcess in colProcesses
objDictionary.Add objProcess.VirtualSize, objProcess.Name
'
' Wscript.Echo objProcess.Name & VbTab & (objProcess.VirtualSize/8)
addition = addition + (objProcess.VirtualSize/8)
Next
Wscript.Echo "total :"& vbtab & addition & vbtab & "octets"
==================================
si tu as une idée (ou quelqu'un d'autre)... :p
Dans le message news:ctaunl$19v$ , chris s'est ainsi exprimé:
Bonjour,
Je cherche a faire un vbscript qui permet d'afficher la totalité de la ram utilisée (physique et virtuelle). en gros je veux afficher ce qu'on voit dans le gestionnaire de tache (le total de charge dédiée).
quelqu'un a-t-il une idée sur la question ? (je ne désire pas un script mais juste la commande wmi par exemple qui permet de récuperer cette donnée)
... Set WMI = GetObject("winmgmts:" & Computer & "rootcimv2") ' RAM physique : Set col = WMI.ExecQuery("Select * from Win32_PhysicalMemory",,48) For Each Item in col capa=Item.Capacity/1048576 wscript.echo "Barrette " & Item.DeviceLocator & " : " & capa & " Mo " & Item.BankLabel Next ... ' Mémoire virtuelle : Set col = WMI.ExecQuery("Select * from Win32_PageFileSetting",,48) For Each Item in col Wscript.Echo Item.Name & " : " & Item.InitialSize & "-" & Item.MaximumSize & " Mo" Next
A toi de mettre en forme !
Merci JC, mais ce n'est pas ce que je recherche. ce que tu m'as fourni me renvoie la mémoire disponible (physique et virtuelle). alors que je cherche à obtenir la taille de la mémoire utilisée par tous les processus, à un instant t.
j'ai fais ceci mais ça ne me donne pas le chiffre exact affiché dans le gestionnaire de tache.
============================ Set objDictionary = CreateObject("Scripting.Dictionary") strComputer = "." Dim addition Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!" & strComputer & "rootcimv2") Set colProcesses = objWMIService.ExecQuery _ ("Select * from Win32_Process") For each objProcess in colProcesses objDictionary.Add objProcess.VirtualSize, objProcess.Name ' ' Wscript.Echo objProcess.Name & VbTab & (objProcess.VirtualSize/8) addition = addition + (objProcess.VirtualSize/8) Next Wscript.Echo "total :"& vbtab & addition & vbtab & "octets" ================================== si tu as une idée (ou quelqu'un d'autre)... :p
merci.
scraper
Bonjour chris, dans le message news://cttdim$cke$ tu disais :
Merci JC, mais ce n'est pas ce que je recherche. ce que tu m'as fourni me renvoie la mémoire disponible (physique et virtuelle). alors que je cherche à obtenir la taille de la mémoire utilisée par tous les processus, à un instant t.
AMHA, avec une bête soustraction ...
(mémoire totale - mémoire disponible = ?? ;-)
--
Attention ! Adresse mail invalide ... Pour me contacter, cliquez sur le lien ci-dessous: http://scraper.chez.tiscali.fr/contact.htm
scraper
Bonjour chris, dans le message
news://cttdim$cke$1@s1.news.oleane.net
tu disais :
Merci JC, mais ce n'est pas ce que je recherche.
ce que tu m'as fourni me renvoie la mémoire disponible (physique et
virtuelle).
alors que je cherche à obtenir la taille de la mémoire utilisée par
tous les processus, à un instant t.
AMHA, avec une bête soustraction ...
(mémoire totale - mémoire disponible = ?? ;-)
--
Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm
Bonjour chris, dans le message news://cttdim$cke$ tu disais :
Merci JC, mais ce n'est pas ce que je recherche. ce que tu m'as fourni me renvoie la mémoire disponible (physique et virtuelle). alors que je cherche à obtenir la taille de la mémoire utilisée par tous les processus, à un instant t.
AMHA, avec une bête soustraction ...
(mémoire totale - mémoire disponible = ?? ;-)
--
Attention ! Adresse mail invalide ... Pour me contacter, cliquez sur le lien ci-dessous: http://scraper.chez.tiscali.fr/contact.htm
scraper
chris
Bonjour chris, dans le message news://cttdim$cke$ tu disais :
Merci JC, mais ce n'est pas ce que je recherche. ce que tu m'as fourni me renvoie la mémoire disponible (physique et virtuelle). alors que je cherche à obtenir la taille de la mémoire utilisée par tous les processus, à un instant t.
AMHA, avec une bête soustraction ...
(mémoire totale - mémoire disponible = ?? ;-)
je n'utilisais pas la bonne requête en fait.
j'utilisais VirtualSize alors que j'aurais du prendre WorkingSetSize. et la ça marche :)
============================ strComputer = "." Dim addition addition = 0 Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!" & strComputer & "rootcimv2") Set colProcesses = objWMIService.ExecQuery _ ("Select * from Win32_Process") For each objProcess in colProcesses Wscript.Echo objProcess.Name & VbTab & (objProcess.WorkingSetSize) addition = addition + Int(objProcess.WorkingSetSize) Next Wscript.Echo "total :"& vbtab & addition & vbtab & "octets" ==============================
Bonjour chris, dans le message
news://cttdim$cke$1@s1.news.oleane.net
tu disais :
Merci JC, mais ce n'est pas ce que je recherche.
ce que tu m'as fourni me renvoie la mémoire disponible (physique et
virtuelle).
alors que je cherche à obtenir la taille de la mémoire utilisée par
tous les processus, à un instant t.
AMHA, avec une bête soustraction ...
(mémoire totale - mémoire disponible = ?? ;-)
je n'utilisais pas la bonne requête en fait.
j'utilisais VirtualSize alors que j'aurais du prendre WorkingSetSize.
et la ça marche :)
============================ strComputer = "."
Dim addition
addition = 0
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\" & strComputer & "rootcimv2")
Set colProcesses = objWMIService.ExecQuery _
("Select * from Win32_Process")
For each objProcess in colProcesses
Wscript.Echo objProcess.Name & VbTab & (objProcess.WorkingSetSize)
addition = addition + Int(objProcess.WorkingSetSize)
Next
Wscript.Echo "total :"& vbtab & addition & vbtab & "octets"
==============================
Bonjour chris, dans le message news://cttdim$cke$ tu disais :
Merci JC, mais ce n'est pas ce que je recherche. ce que tu m'as fourni me renvoie la mémoire disponible (physique et virtuelle). alors que je cherche à obtenir la taille de la mémoire utilisée par tous les processus, à un instant t.
AMHA, avec une bête soustraction ...
(mémoire totale - mémoire disponible = ?? ;-)
je n'utilisais pas la bonne requête en fait.
j'utilisais VirtualSize alors que j'aurais du prendre WorkingSetSize. et la ça marche :)
============================ strComputer = "." Dim addition addition = 0 Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!" & strComputer & "rootcimv2") Set colProcesses = objWMIService.ExecQuery _ ("Select * from Win32_Process") For each objProcess in colProcesses Wscript.Echo objProcess.Name & VbTab & (objProcess.WorkingSetSize) addition = addition + Int(objProcess.WorkingSetSize) Next Wscript.Echo "total :"& vbtab & addition & vbtab & "octets" ==============================
