Set oShell = CreateObject ("Wscript.Shell") 
Dim strArgs
strArgs = "memory"
oShell.Run strArgs, 0, false