- 378 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/04/28(水) 11:32:14 ID:IFvYJtzA0]
- >>376
出来たんだけど
【実行結果】
Count : 1
Free : 265140
Total: 523760
【ソース】
Locator = CreateOLEObj("WbemScripting.SWbemLocator")
objEnumerator = Locator.ConnectServer.ExecQuery("Select * FROM Win32_OperatingSystem")
print "Count : " + objEnumerator.Count
for i = 0 to GetOleItem(objEnumerator) - 1
Obj = All_Ole_Item[i]
print "Free : " + Obj.FreePhysicalMemory
print "Total: " + Obj.TotalVisibleMemorySize
next
sleep(10)
