Look at the following sample used to logon to the ut.
You could do the same with other websites.
(Copied from startut out of the files section)

lcUserName = "mylogin"
lcPassword = "mypassword"

oIE = CREATEOBJECT("InternetExplorer.Application")
oIE.Navigate("www.levelextreme.com")

INKEY(4)
nStartSeconds = SECONDS()
DO WHILE oIE.Document.ReadyState <> "complete" AND (SECONDS()-nStartSeconds < 30)
ENDDO

IF oIE.Document.ReadyState <> "complete"
MESSAGEBOX("Universalthread is unavailable")
oie.Visible = .T.
RETURN .F.
ENDIF

oie.document.forms(0).Key.Value = lcUsername
oIE.Document.Forms(0).Password.Value = lcPassword

oIE.Document.Forms(0).Submit()
oIE.Visible = .T.