How do I get the free memory/systemresources?

    Declare the following:
    Declare Function getfreespace Lib "kernel" (ByVal flag%) As Long
    Declare Function getfreesystemresources Lib "User" (ByVal fuSysResource As Integer) As Integer
    Place this in your code to get the free memory in Kilobytes and the percentage of free system resources:

    free_memory = Int((getfreespace(0)) / 1024) & " KB"
    system_res = (Int(getfreesystemresources(1))) & "%"

Mail to Daniel Wiman <daniel@wimania.com>
Online since June 1996, updated 971025		 <- The VB home
<- Daniels homepage