Enter Username & Password into pop-up window on Web Page

[j844929]

Hi,

I have successfully entered Usernames and Passwords into all sorts of websites, but I'm a bit stuck on this one. When you navigate to the URL, A pop-up window appears asking for a Username and Password entry. I have tried the following, but it didn't work and now I'm left scratching my head. The URL is provided in the code.

Sub Login_To_Website()
Set myIE = CreateObject("InternetExplorer.Application")
myIE.Navigate URL:="https://www.toga.ngtuk.co.uk/toga"

On Error Resume Next
AppActivate "Connect to www.toga.ngtuk.co.uk", 1
 
           Do Until .ReadyState = 4
            DoEvents
        .Visible = True
            With .Document.forms("Connect to www.toga.ngtuk.co.uk")
                .USER.Value = "Username"
                .Password.Value = "Password"
                .submit
            End With

End Sub

[code]

Can anyone provide a solution that actually works?

Any help on this would be greatly appreciated.

Tim

 

[j844929]

Anyone?

 

[John_w]

The pop-up login window isn't a HTML form, so setting and submitting the form fields won't work.

This type of pop-up window is displayed in response to user name and password authentication required by the web server. You could try the technique shown in http://www.mrexcel.com/forum/showthread.php?t=442354 (last code posted is the best).

Failing that, using FindWindow and probably other functions from the Windows API to find and populate each part of the login window (user name input field, password input field, OK button) might work.