Macro to go a WEB site and enter a password

[Bob Benjamin]

Can a VBA macro be written to:



1.. Go to a web site
2.. Enter the user code (i.e., the macro types it, not the user)
3.. Enter the password (i.e., the macro types it, not the user)
What would the SUB look like?



Any help would be much appreciated.



BobB

 

[Tom Ogilvy]

Try a URL like:
http://username:password@URL

sometimes this works, but apparently there is no standard for passing in a
username and password.

 

[shockley]

Here's an example of a way to login automatically. Each website is going to
be different, with different forms and names--the trick is to match the form
names with what they do and then utilize their properties to enter
information in the right spots and click the right button. This procedure
lists the name of each form, which is a good way to start, as the names give
a good idea of what the form does. And then it logs you in to the Yahoo
Message boards server.

HTH,
Shockley


Sub Login()
sURL =
"http://edit.my.yahoo.com/config/login?.src=mb&.done=http://messages.yahoo
..com/bbs%3f.mm=FN%26action=r%26board=4687440%26tid=ener%26sid=4687440%26mid=
0&lg=us&.intl=us"
Dim IE As New InternetExplorer
IE.navigate sURL
While (IE.Busy)
DoEvents
Wend
Do
On Error Resume Next
Set htm = IE.Document
Err = 0
If Not htm Is Nothing Then Exit Do
Loop
Do
Set frms = htm.forms(0)
If Not frms Is Nothing Then Exit Do
Loop

IE.Visible = True

For i = 1 To frms.Length
Set frm = frms(i - 1)
Cells(i, 1) = frm.Name
Next i

For i = 1 To frms.Length
Set frm = frms(i - 1)
sTest = frm.Name
If sTest = "login" Then
frm.Value = "myusername"
End If
If sTest = "passwd" Then
frm.Value = "mypassword"
End If
If sTest = ".save" Then
frm.Click
End If
Next i

Set oDoc = Nothing
Set IE = Nothing

End Sub

 

[shockley]

PS, to run the macro you will have to add a reference for "Microsoft
Internet Controls". In the VB Editor, click

Tools | References

and then scroll down to find "Microsoft Internet Controls" and put a check
in the box and click OK.

Shockley

 

[Bob Benjamin]

Wow! I am impressed and pleased how you guys keep coming up with
all these brillant solutions.

Thanks.
Bob

 

[shockley]

It's all pretty basic stuff, but it's nice to be appreciated <g>.

Regards,
Shockley

 

[Robert Hind]

There are several different approaches that can be used ...you need to be a
bit more specific about what you're looking to do.

For example I have several spreadsheets where source data is extracted
automatically from a secure area of a web site.

Regards
Robert Hind

 

[shockley]

Do you have an alternative method for the web server I used as an example,
i.e., Yahoo Message boards,

http://login.yahoo.com/config/login?.done=http://messages.yahoo.com&.src=mb

Any other interesting techniques you care to outline would be
appreciated-always looking to expand my horizons.

Shockley