Comment cacluler la mémoire utile?!!

attollab Messages postés 24 Statut Membre -  
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   -
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..
Configuration: Windows XP
Safari 525.19

3 réponses

  1. kentin5601 Messages postés 3197 Date d'inscription   Statut Membre Dernière intervention   406
     
    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
  2. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    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
  3. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    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