Monday, February 06, 2012
   
Text Size

Return Internet Explorer Version

PDFPrintE-mail

Last Updated on Friday, 21 August 2009 23:19 Written by Administrator Friday, 21 August 2009 23:12

To display the version of Internet Explorer Installed:

Dim IEVer

IEVer=WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Internet Explorer\Version")

select case UCase(left(IEVer, 1))
        case "5"
                MSGBOX ("Internet Explorer v5 Installed")
        case "6"
                MSGBOX ("Internet Explorer v6 Installed")

        case "7"
                MSGBOX ("Internet Explorer v7 Installed")

        case "8"
                MSGBOX ("Internet Explorer v8 Installed")

        case else
                MSGBOX ("Unknown Internet Explorer Version Installed.
end select

Please Note: Append to Template.vbs to run this script.