Macro to go a WEB site and enter a password

Bob Benjamin

unread,

Nov 11, 2003, 5:57:53 AM11/11/03

to

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

unread,

Nov 11, 2003, 8:21:01 AM11/11/03

to

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

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

--
Regards,
Tom Ogilvy

Bob Benjamin <be...@magma.ca> wrote in message
news:UemdnZMOFcs...@magma.ca...

shockley

unread,

Nov 11, 2003, 10:55:34 AM11/11/03

to

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%3a//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

"Bob Benjamin" <be...@magma.ca> wrote in message
news:UemdnZMOFcs...@magma.ca...

shockley

unread,

Nov 11, 2003, 11:12:16 AM11/11/03

to

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

"shockley" <shoc...@frontiernet.net> wrote in message
news:WD7sb.15824$aW5....@news02.roc.ny...

Bob Benjamin

unread,

Nov 11, 2003, 3:02:45 PM11/11/03

to

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

Thanks.
Bob

"shockley" <shoc...@frontiernet.net> wrote in message

news:AT7sb.15826$aW5....@news02.roc.ny...

shockley

unread,

Nov 11, 2003, 7:22:29 PM11/11/03

to

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

Regards,
Shockley

"Bob Benjamin" <be...@magma.ca> wrote in message

news:19qdne6Tr_r...@magma.ca...

Robert Hind

unread,

Nov 13, 2003, 12:42:48 AM11/13/03

to

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

"Bob Benjamin" <be...@magma.ca> wrote in message
news:UemdnZMOFcs...@magma.ca...

shockley

unread,

Nov 14, 2003, 10:34:40 AM11/14/03

to

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

"Robert Hind" <rwh...@iinet.net.au> wrote in message
news:#am5$kaqDH...@TK2MSFTNGP11.phx.gbl...