Monitoring Application usage

[Blinky Bill]

I want to monitor the times that apps are opened and closed as well as what webpages have been visited on my computer and i don't really know how to go about it. I tried searching for some info, but couldn't find anything. I know that i'll need an app that runs invisibly, that either polls every 5 seconds or so, or i'll need some API that i've never heard of.

Anyway, that's what i want to do, so if anyone could give me some clues, links, tips, code or anything, it would be appreciated.

[si_the_geek]

ok, from the sounds of it you need to learn how to do the following things:

* gets a list of running programs - search this forum for "task list"

* gets addresses of any internet browser windows - I'll post a link or code in a minute...

* runs hidden (so the user can't stop it easily) - search this forum for "run as service"


I'm guessing that you can work out the five second bit

[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

[Blinky Bill]

si_the_geek,
I tried to run your code, but i get a message, User Defined Type not Defined on this line

Dim SWs As New SHDocVw.ShellWindows

Can you please post the type for me?

Thanx

[si_the_geek]

It seems like i didn't post both references you need -

M$ Internet Controls (shdocvw.dll)

M$ HTML Object Library (mshtml.lib)