Este es un excelente truco que te permite conocer la lista de aplicaciones instaladas con windows Installer en tu equipo, además la versión y el idioma de la misma.
Local oWInst
oWInst = Createobject("WindowsInstaller.Installer")
oProducts = oWInst.Products
For Each Product In oProducts
strName
= oWInst.ProductInfo (Product, "ProductName")
strMinVer = oWInst.ProductInfo (Product, "VersionMinor")
strMaxVer = oWInst.ProductInfo (Product, "VersionMajor")
strVer =
oWInst.ProductInfo (Product, "VersionString")
?
strName + strMinVer + strMaxVer + strVer
Next
Si tienes inquietudes, sígueme en Twitter para contactarme.
Seguir a @davamadort¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?
Contrata un plan de hosting en www.winnethost.com y recibes totalmente gratis el registro de tu sitio web en más de 24 buscadores, entre ellos google, yahoo, msn
El Sitio La Web de Davphantom se encuentra hospedado en WinNetHost.com