Logging to a web page

Hi All,

I'm doing a menu for my fellow colleagues at work (switchboard kind of thing). One of the button i want to have is for oppening our report system here is the adress:

http://feltapp5087:8080/businessobje...logon/logon.do

is it possible to add a code that would login for them as well?

Here is what i've got so far:

Private Sub CRYSTAL_Click()
   Set browser = CreateObject("InternetExplorer.Application")
   browser.Navigate ("http://feltapp5087:8080/businessobjects/enterprise115/desktoplaunch/InfoView/logon/logon.do")
   browser.StatusBar = False
   browser.Toolbar = False
   browser.Visible = True
   browser.Resizable = False
   browser.AddressBar = False
End Sub

Many thanks