Login | Register   
LinkedIn
Google+
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: VB5,VB6,IE4,IE5
Expertise: Intermediate
Jan 1, 2003

InternetExplorerPath - Test whether IE is installed and retreive its path

' get the IE installation path, or a null string if it isn't installed
'
' NOTE: requires the GetRegistryValue routine

Function InternetExplorerPath() As String
    Const HKEY_LOCAL_MACHINE = &H80000002
    ' get the path from the registry, or return a null string
    InternetExplorerPath = GetRegistryValue(HKEY_LOCAL_MACHINE, _
        "Software\Microsoft\Windows\CurrentVersion\App Paths\IEXPLORE.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
Francesco Balena
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date