>>************************************************************** >>* Marco Plaza, 2018,2021 >>* @nfoxDev >>* https://github.com/nftools/wmiquery >>************************************************************** >> If !Isnull(m.property.Value) >> For Each Item In m.property.Value >> nitem = m.nitem+1 >> Dimension &thisarray(m.nitem) >> >> If Vartype( m.item) = 'O' >> thisitem = Createobject(EMPTYORLINE) >> setproperties( m.item, m.thisitem ) >> *** &thisarray(m.nitem) = m.thisitem >> store m.thisitem to 'thisarray(m.nitem)' >> Else >> *** &thisarray(m.nitem) = m.item >> store m.item to 'thisarray(m.nitem)' >> Endif >> >> Endfor >> >> Endif >> >>Hello Thomas