Hello everyone, I'm working on a macro, a part of which requires getting data from a website (after logging into it). heres what i have tried so far : Sub getdata() Dim a As String Set IE = CreateObject("InternetExplorer.Application") With IE .Visible = True .navigate "https://domino.amer.csc.com/clu1/Financial/AuServices.nsf/(Custom+View+Read)?OpenAgent&DBName=MarsIss.nsf&DocID=DA86D24F81A23FAC8525774200212A2D" Do Until .readyState = 4 DoEvents Loop .document.all.Item("USER").Value = "Username" .document.all.Item("PASSWORD").Value = "Password" .document.forms(0).submit End With End Sub when i try to run this macro, i get a runtime error which says "Method 'document' of object 'IWebBrowser 2' failed" Can anyone please point out where am i going wrong with this. ?

If you would like to post, please check out the MrExcel Message Board FAQ and register here. If you forgot your password, you can reset your password.

macro to login to a website

Thread starter iambharat
Start date Mar 7, 2013
Tags

connecting to website external data

iambharat

New Member

Mar 7, 2013

Hello everyone,

I'm working on a macro, a part of which requires getting data from a website (after logging into it).

heres what i have tried so far :

Sub getdata()
Dim a As String
Set IE = CreateObject("InternetExplorer.Application")
With IE
.Visible = True
.navigate "https://domino.amer.csc.com/clu1/Fi...ss.nsf&DocID=DA86D24F81A23FAC8525774200212A2D"
Do Until .readyState = 4
DoEvents
Loop
.document.all.Item("USER").Value = "Username"
.document.all.Item("PASSWORD").Value = "Password"
.document.forms(0).submit
End With
End Sub

when i try to run this macro, i get a runtime error which says
"Method 'document' of object 'IWebBrowser 2' failed"

Can anyone please point out where am i going wrong with this. ?