使用AutoIt自动登录163网易网页邮箱的代码

#include <Date.au3> #include <IE.au3> MsgBox(64, "通知 -by liyi", "5秒钟后登陆邮箱:[email protected]", 5) $oIE = _IECreate ("http://mail.163.com") sleep(2000) $oForm = _IEFormGetObjByName ($oIE, "login163") $oQuery = _IEFormElementGetObjByName ($oForm, "username") _IEFormElementSetValue ($oQuery, "xxxxxx") $oQuery = _IEFormElementGetObjByName ($oForm, "password") _IEFormElementSetValue ($oQuery, "password") $oQuery = _IEFormElementGetObjByName ($oForm, "selType") $oQuery = _IEFormElementGetObjByName ($oForm, "登录邮箱") _IEAction($oQuery ,"click") sleep(2000) _IEAction ($oIE, "visible") MsgBox(64, "通知 -by liyi", "35秒钟后退出邮箱", 35) _IELinkClickByText ($oIE,"退出") MsgBox(64, "通知 -by liyi", "5秒钟后关闭IE", 5) _IEQuit ($oIE)

最新更新

 

最新更新：win7 IE9测试通过
#include <Date.au3>
#include <IE.au3>

MsgBox(64, "通知 -by liyi", "5秒钟后登陆邮箱:[email protected]", 5)
$oIE = _IECreate ("http://mail.163.com")
sleep(2000)
$oForm = _IEFormGetObjByName ($oIE, "login163")
$oQuery = _IEFormElementGetObjByName ($oForm, "username")
_IEFormElementSetValue ($oQuery, "xxxxxx")
$oQuery = _IEFormElementGetObjByName ($oForm, "password")
_IEFormElementSetValue ($oQuery, "xxxxx")
$oQuery = _IEFormElementGetObjByName ($oForm, "loginBtn")
_IEAction($oQuery ,"click")
sleep(2000)
_IEAction ($oIE, "visible")
MsgBox(64, "通知 -by liyi", "35秒钟后退出邮箱", 35)
_IELinkClickByText ($oIE,"退出")
MsgBox(64, "通知 -by liyi", "5秒钟后关闭IE", 5)
_IEQuit ($oIE)