#include <Date.au3> #include <IE.au3> MsgBox(64, "通知 -by liyi", "5秒钟后登陆邮箱:xxxxxx@sohu.com", 5) $oIE = _IECreate ("http://mail.sohu.com") Sleep(2000) $oForm = _IEFormGetObjByName ($oIE, "loginform") $oQuery = _IEFormElementGetObjByName ($oForm, "email") _IEFormElementSetValue ($oQuery, "xxxxxx@sohu.com") $oQuery = _IEFormElementGetObjByName ($oForm, "password") _IEFormElementSetValue ($oQuery, "password") $oInputs = _IETagNameGetCollection ($oIE, "input") For $oInput In $oInputs If $oInput.value = "登 录" Then _IEAction($oInput,"click") Next MsgBox(64, "通知 -by liyi", "25秒钟后退出邮箱", 25) _IELinkClickByText ($oIE,"退出") MsgBox(64, "通知 -by liyi", "5秒钟后关闭IE", 5) _IEQuit ($oIE)
使用AutoIt自动登录sohu搜狐网页邮箱的代码
最新推荐文章于 2014-03-12 15:42:34 发布