I tried to send you a project which does this. It consists of one prg and one form with the code in the form methods but your mail server keeps rejecting it with 'illegal attachment' messages returned.

>Hi,
>I need to return device list with DeviceId from the windows system devices. For this reason I try to use WMI
>
>

>objService = Getobject("winmgmts:{impersonationLevel=impersonate}!\\.\root\CIMV2")
>loPnPCollection = objService.ExecQuery("SELECT * FROM CIM_LogicalDevice")
> For Each objPnP  In loPnPCollection
>    lcDeviceName = objPnp.name
>    lcDeviceId = objPnP.DeviceID
> Next
>

>
>All works perfect BUT....
>The some devices which listed in the category "Other Devices" - and has "Question mark" icon - not listed by WMI.
>I can't find a solution to get thouse devices and deviceId string.
>
>Any help!
>Thanks
>Denis