[Iska]

проверять, есть ли там допустим 512мб? на что тогда поменять TotalPhysicalMemory? »

Тут, пожалуй, придётся перейти на язык с более строгой типизацией (в VBScript нет подтипа прямо соответствующего беззнаковому целому UInt).

PowerShell:

Скрытый текст

Код:

Get-WmiObject -ComputerName "." -Class 'Win32_VideoController' -Property 'AdapterRAM' |`
    ForEach-Object -Process {
        if($_.AdapterRAM -gt 512Mb) {
            $o__PARAMETERS = ([WMICLASS]'\\.\Root\CimV2:Win32_Process').Create('c:\Windows\System32\notepad.exe', 'c:\Windows\System32', $Null)
            if($o__PARAMETERS.ReturnValue -eq 0) {
                Write-Host "Success execute. PID: [$($o__PARAMETERS.ProcessId)]."
            } else {
                Write-Host "Execute failure."
            }
       }
    }

У PowerShell помимо обращения к Wbem существуют и иные возможности по удалённой работе.