Determination de la quantité de RAM

Question

Bonjour a tous,

Voila, j'ai une question que me travaille depuis plusieurs semaine et je n'arrive pas a la programmer (c'est peut et re un peu normal vu le newbies que je suis lol)

Voila, j'aimerais pouvoir determiner la quantité de RAM  total ainsi que la quantité de RAM dispo est ce que quelqu'un peut me renseigner svp !? il y a certe certain code source qui en parle mais je ne comprend pas le principe. est ce que quelq'un peut me renseigner a ce sujet svp !?

Merci a vous tous

cs_ITALIA · Answer

Ram Total en MO:

Option Explicit

Type MEMORYSTATUS
    dwLength As Long
    dwMemoryLoad As Long
    dwTotalPhys As Long
    dwAvailPhys As Long
    dwTotalPageFile As Long
    dwAvailPageFile As Long
    dwTotalVirtual As Long
    dwAvailVirtual As Long
End Type

Declare Sub GlobalMemoryStatus Lib "kernel32" (lpBuffer As MEMORYSTATUS)

Public Function GetRamSize() As String
    Dim RamStats As MEMORYSTATUS
    GlobalMemoryStatus RamStats
    GetRamSize = Round((RamStats.dwTotalPhys / 1024) / 1024) + 1
End Function

It@li@

kulls · Answer

Merci It@li@ pour cette aide tjrs précieuse

je vais tester ça de suite

cs_ITALIA · Answer

Sinon pour le Reste de ton souci :

--> ICI <--

n'oublies pas de cocher reponses acceptées si c OK

It@li@

cs_CanisLupus · Answer

Bien ITALIA, moi j'utilise :

GetRamSize = FormatNumber((Memoire.dwTotalPhys / 1024 ^ 2), -1) ' pour un résultat en Mo

à la place de ton

GetRamSize = Round((RamStats.dwTotalPhys / 1024) / 1024) + 1

Faudra que je teste la différence.

Cordialement, CanisLupus

Tous les glands ne deviennent pas des chênes mais tous les chênes ont été des glands

Determination de la quantité de RAM

4 réponses

Discussions similaires