' get the IE installation path, or a null string if it isn't installed'' NOTE: requires the GetRegistryValue routineFunction InternetExplorerPath() As String Const HKEY_LOCAL_MACHINE = &H80000002 ' get the path from the registry, or return a null string InternetExplorerPath = GetRegistryValue(HKEY_LOCAL_MACHINE, _ "SoftwareMicrosoftWindowsCurrentVersionApp PathsIEXPLORE.EXE", _ "Path") ' get rid of the trailing semi-colon, if there If Right$(InternetExplorerPath, 1) = ";" Then InternetExplorerPath = Left$(InternetExplorerPath, _ Len(InternetExplorerPath) - 1) End If End Function