Private mblnDownloadCompleted As Boolean Private Sub Command1_Click() mblnDownloadCompleted = False With WebBrowser1 .Navigate2 "www.hotmail.com" Do While Not mblnDownloadCompleted DoEvents Loop .Document.All("login").Value = "uid" .Document.All("passwd").Value = "pwd" .Document.Forms(0).Submit End With End Sub Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) mblnDownloadCompleted = True End Sub>I would have to change the website to be able to pass the login/password to the webserver like that, wouldn't I? Right now, it is expecting a post from two text boxes.