Monitoring Application usage

[si_the_geek]

right then, Internet addresses.. this will only work with Internet Explorer:

you need a reference to M$ HTML object library (mshtml.tlb)

Dim SWs As New SHDocVw.ShellWindows
Dim IE As SHDocVw.InternetExplorer
Dim Doc As Object
 
        For Each IE In SWs
        'SWs enumerate the Shell Windows
            Set Doc = IE.Document
            If TypeOf Doc Is HTMLDocument Then
 
MsgBox IE.LocationURL
'store  IE.LocationURL here, to a file/the registry etc..
 
            End If
        Next IE