Get Focus to window using VB script and SendKeys

[Unknown90]

Hello Experts,
I am working on automating a login to a webpage using SendKeys. The problem I am having is that I am trying to figure out how to get the Internet window in Focus so that way it can run the commands and not keep looping. My code is below:

Thanks,
Steve

Set IE = CreateObject("InternetExplorer.Application") 
set WshShell = WScript.CreateObject("WScript.Shell")
IE.Navigate "http://www.WebsiteName.com"
IE.Visible = True
Wscript.Sleep 6000 
IE.Document.All.Item("email").Value = "UserName" 
IE.Document.All.Item("pass").Value = "Password"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"  
WshShell.SendKeys "{ENTER}"

[Rabbit]

What is the tab tab enter for? Is that to submit the form? You can use IE.Document.forms(0).submit() where 0 is the index of the form. In this case, it will submit the first form. If it's not the first form, you'll just have to find the correct index.

[Unknown90]

The tab tab enter was to submit the information to the webpage and login. It took two tabs from the password field to login.btn so thats why they were in there.

[Rabbit]

Yeah, you don't need to do that. You can just use the method in my post instead. It's more reliable.

[Unknown90]

Ok great. Thank you for your help.