January 1, 2005

WinTask - GetPhysMemory

'
' GetPhysMemory
'
' Determines amount of physical memory using Explorer
'
' Author: Joe Strazzere
'

shell("explorer /e",1)

UseWindow("EXPLORER.EXE|ExploreWClass|Exploring - My Computer",1)
 ChooseItem(TreeView, "1", "My Computer", single, left )
 ChooseMenu(Normal,"&File|P&roperties")
 a$=Capture$("RUNDLL32.EXE|Static||11",1,0)
    msgbox(a$,,"GetPhysMemory")
UseWindow("RUNDLL32.EXE|#32770|System Properties",1)
 Click(Button,"Cancel")