Comment cacluler la mémoire utile?!!

Fermé
attollab Messages postés 17 Date d'inscription dimanche 26 avril 2009 Statut Membre Dernière intervention 16 décembre 2009 - 22 juil. 2009 à 18:57
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 23 juil. 2009 à 09:10
Bonjour,
Je vx savoir comment peut-on calculer la mémoire utile d'une machine étant donné la mémoire principale, la mémoire cache et la mémoire virtuelle, merci d'avance..

3 réponses

kentin5601 Messages postés 3168 Date d'inscription jeudi 13 novembre 2008 Statut Membre Dernière intervention 30 mai 2010 402
22 juil. 2009 à 19:01
Je ne sais pas si c'est ça que tu demande mais bon.

exemple : pour un disque dur de 160 Go

160*1000*1000/1024/1024 = 152 Go
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
22 juil. 2009 à 19:44
bonjour,

voilà déjà pour la mémoire RAM

a partir de vbscripts trouvés sur le net

On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_PhysicalMemory",,48)
For Each objItem in colItems
    
    Wscript.Echo objItem.Description & ". Capacité: " & objItem.Capacity & " octets. vitesse: " & objItem.Speed & " Mhz"
Next

a copier coller dans le bloc-note et à sauvegarder en vbscripts (extension .vbs)

sois patient pour le reste
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
23 juil. 2009 à 09:10
Bonjour
M^me punition pour la mémoire cache L2

On Error Resume Next

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

Set colItems = objWMIService.ExecQuery("Select * from Win32_Processor")
For Each objItem in colItems
    Wscript.Echo " Taille Mémoire cache : " & objItem.L2CacheSize

next


Et pour terminer le maxi de la mémoire virtuelle:

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

Set colPageFiles = objWMIService.ExecQuery("Select * from Win32_PageFile")

For Each objPageFile in colPageFiles
   Wscript.Echo "mémoire virtuelle " & objPageFile.Name & vblf &" taille maxi: " &  objPageFile.MaximumSize
next
0