Gmail easy login

[bluerein]

I was trying to find a way to swap gmail account quickly and came up with this..

#include <IE.au3>

_gmail()

func _gmail()

$logout = "http://mail.google.com/mail/?logout"
$user = "email"
$pass = "password"
$url = "https://www.google.com/accounts/ServiceLoginAuth?continue=http://mail.google.com/gmail&service=mail&Email=" & $user & "&Passwd="& $pass &  "&null=Sign+in"
$oIE = _IECreate($logout,1,1,1,1)
_IENavigate($oIE,$url)

EndFunc

works with igoogle also

$url = $url ="https://www.google.com/accounts/ServiceLoginAuth?Email=" & $user & "&Passwd=" & $pass &"&continue=http://google.com/ig&signIn=Sign%20in&PersistentCookie=yes"

you need the logout bit if you wanna keep swapping accounts

Edited July 24, 2009 by bluerein

[logmein]

cool!!! Easy than use ie control functions.

[bluerein]

my thoughts exactly..

Also you can switch accounts so fast!!

[Jos]

Only issue I can see here is that you send your account information over the Internet in clear-text.

Jos