Written by:R Teachout11/17/2006 2:26 AM
strComputer = "."Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")Set colItems = objWMIService.ExecQuery("Select * from Win32_Product Where Caption Like '%NET Framework%'")For Each objItem in colItems Wscript.Echo objItem.Name, " Version ", objItem.VersionNextDownload : GetInstalledVersionOf.NetFramework.vbs.txt
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Product Where Caption Like '%NET Framework%'")For Each objItem in colItems Wscript.Echo objItem.Name, " Version ", objItem.VersionNext
Download : GetInstalledVersionOf.NetFramework.vbs.txt