Code:
Set IE = CreateObject("InternetExplorer.Application")
IE.visible = True
IE.Navigate "www.hotmail.com"
wait (2)
Browser("name:=Sign In").Page("title:=Sign In").WebEdit("name:=login").Set "vimalsingh2k@hotmail.com"
wait (2)
Browser("name:=Sign In").Page("title:=Sign In").WebEdit("type:=password").SetSecure ".........."
wait (2)
Browser("name:=Sign In").Page("title:=Sign In").WebButton("type:=submit").Click
wait (10)
Browser("name:=Windows Live Hotmail").Page("title:=Windows Live Hotmail").Link("html id:=NewMessage").Click
wait (10)
Browser("name:=Windows Live Hotmail").Page("title:=Windows Live Hotmail").WebEdit("name:=WebEdit","type:=textarea","html id:=AutoCompleteTo$InputBox").set "vimalsingh2k@gmail.com"
'it doesnt accept email address
wait(10)
Browser("name:=Windows Live Hotmail").Page("title:=Windows Live Hotmail").WebEdit("name:=fSubject").Set "Hi"
wait(10)
Browser("name:=Windows Live Hotmail").Page("title:=Windows Live Hotmail").WebElement("html tag:=BODY").Set "Good Morning ..."
'unable to write text here
wait(10)
Browser("name:=Windows Live Hotmail").Page("title:=Windows Live Hotmail").Link("text:=Send").Click
wait (5)
Browser("name:=Windows Live Hotmail").Page("title:=Windows Live Hotmail").Link("text:=sign out").click