Tipp 5.23 - IE Version ermitteln

Wie kann ich die Version des Internet Explorer ermitteln?

Mit dieser Funktion können Sie die Version des Internet Explorer ermitteln. Kopieren Sie einfach nachfolgenden Quellcode in die Zwischenablage und fügen Sie anschließend den Inhalt der Zwischenablage in ein neues Modul ein. Die Aufrufparameter finden Sie im Quellcode beschrieben.

Api-AufrufeVerwendete Win32-Api-Aufrufe und Typen: DllGetVersion - DllVersionInfo

Beispiel:

Option Explicit
 
Public Type DllVersionInfo
  cbSize                         As Long
  dwMajorVersion                 As Long
  dwMinorVersion                 As Long
  dwBuildNumber                  As Long
  dwPlatformID                   As Long
End Type
 
Public Declare Function DllGetVersion _
    Lib "Shlwapi.dll" _
    (dwVersion As DllVersionInfo) As Long
 
Public Function GetIEVersionString() As String
  '// -----------------------------------------------------
  '// Methode:   | Version des Internet Explorer ermitteln
  '// -----------------------------------------------------
  '// Parameter: | -
  '// -----------------------------------------------------
  '// Rückgabe:  | Version des IE als String;
  '//            | z.B. "Internet Explorer 5.50.4134"
  '// -----------------------------------------------------
  '// Autor:     | Stefan Kulpa
  '//            | EDV Innovation & Consulting - Dormagen
  '// -----------------------------------------------------
  Dim DVI As DllVersionInfo
  DVI.cbSize = Len(DVI)
  Call DllGetVersion(DVI)
  GetIEVersionString = "Internet Explorer " & _
      DVI.dwMajorVersion & "." & _
      DVI.dwMinorVersion & "." & _
      DVI.dwBuildNumber
End Function