Guidance
指路人
g.yi.org
Software / Reginald / Examples / repository / Desktop Management / Basic Computer Information / Model.rex

Register 
注册
Search 搜索
首页 
Home Home
Software
Upload

  
/* Displays computer manufacturer and model information */
strcomputer = "."
objwmiservice = getobject("winmgmts:\\" || strcomputer || "\root\CIMV2")
colitems = objwmiservice~execquery("SELECT * FROM Win32_ComputerSystem")
DO objitem OVER colitems
	SAY "Name:" objitem~name
	SAY "Manufacturer:" objitem~manufacturer
	SAY "Model:" objitem~model
END
掌柜推荐
 
 
 
 
 
 
 
 
 
 
 
 
© Sun 2024-10-6  Guidance Laboratory Inc.
Email:webmaster1g.yi.org Hits:0 Last modified:2010-07-16 20:49:16