>>I am looking for a way to scan the software installed on PC
>>it can be programmed in VFP
>>Regards Niels
>
>

lcComputer = "."
>loWMIService = GetObject("winmgmts:" ;
>+ "{impersonationLevel=impersonate}!\\" + lcComputer + "\root\cimv2")
>colSoftware = loWMIService.ExecQuery ;
>("Select * from Win32_Product")
>For Each loSoftware in colSoftware
> ?loSoftware.Description 
>Next

>
>Carefull, this may take a long time.

Pretty cool!