Here is a short but sweet script to login to i-Google. Script could be changed to suit a variety of needs. Beware of pages that have login objects located within a frame. That gets a little bit trickier. To change to other sites simply change web address, and ie form object names to match that of your login page. To get these go to your login page, right click view source, and get form object ids.
Code:Sub IGoogle_AutoLogin() Set ie = CreateObject("InternetExplorer.application") ie.Visible = True ie.navigate ("https://www.google.com/accounts/ServiceLogin?service=ig&passive=true&continue=http://www.google.com/ig%3Fhl%3Den&followup=http://www.google.com/ig%3Fhl%3Den&cd=US&hl=en&nui=1<mpl=default") Do If ie.readyState = 4 Then ie.Visible = True Exit Do Else DoEvents End If Loop 'USE VIEW SOURCE TO GET FORM ELEMENT IDS ie.Document.forms(0).all("Email").Value = "yourvalue here" ie.Document.forms(0).all("Passwd").Value = "yourvaluehere" ie.Document.forms(0).submit End Sub
Last edited by Dave Hawley; December 20th, 2007 at 10:27.
Nice, thanks ExcelJunkie.
Excel MVP 2011-2014
For more Excel memes: visit http://www.wimgielis.be ==> English articles ==> Excel memes
-- Topics without [CODE] tags or a meaningful topic title, will be neglected by me (and probably many others as well) --
There are currently 1 users browsing this thread. (0 members and 1 guests)