Guidance
指路人
g.yi.org
Software / Reginald / Examples / repository / Hardware / Ports / Parallel.rex

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

  
/* Lists all Parallel ports */
strcomputer = "."
objwmiservice = getobject("winmgmts:{impersonationLevel=impersonate}!\\" || strcomputer || "\root\cimv2")
colitems = objwmiservice~execquery("Select * from Win32_ParallelPort")
DO objitem OVER colitems
	SAY "Availability:" objitem~availability
	caps. = objitem~capabilities
	DO i OVER caps.
		SAY "Capability:" VALUE("CAPS."||i)
	END
	SAY "Description:" objitem~description
	SAY "Device ID:" objitem~deviceid
	SAY "Name:" objitem~name
	SAY "OS Auto Discovered:" objitem~osautodiscovered
	SAY "PNP Device ID:" objitem~pnpdeviceid
	SAY "Protocol Supported:" objitem~protocolsupported
END
掌柜推荐
 
 
 
 
 
 
 
 
 
 
 
 
© Sat 2024-12-14  Guidance Laboratory Inc.
Email:webmaster1g.yi.org Hits:0 Last modified:2010-07-16 20:49:16