alpin 发表于 2014-1-27 17:19:10

百度登录问题

gujifly 发表于 2014-1-27 19:33:04

无验证码的情况,验证码比较多工序,自己研究吧。
#include <IE.au3>
Dim $oIE = _IECreate ("www.baidu.com")

Dim $bDengLu = _IEGetObjByName ($oIE,"tj_login")

Dim $inUserName = "aaaaaa";用户名
Dim $inPassword = "bbbbbb";密码

_IELinkClickByText ($oIE, "登录")
Sleep(1000) ;时延 1s
Local $bLogForm = _IEFormGetObjByName($oIE,"TANGRAM__PSP_8__form")
Local $bUserName = _IEFormElementGetObjByName ($bLogForm,"userName")
Local $bPassword = _IEFormElementGetObjByName ($bLogForm,"password")
Local $bSubmit = _IEGetObjById($oIE,"TANGRAM__PSP_8__submit")

_IEFormElementSetValue($bUserName,$inUserName)
_IEFormElementSetValue($bPassword,$inPassword)
_IEAction($bSubmit,"click")

alpin 发表于 2014-1-28 16:32:57

本帖最后由 alpin 于 2014-1-28 16:38 编辑

回复 2# gujifly


    {:face (396):}

freedomlang 发表于 2014-1-31 11:10:08

参考一下{:face (460):}

sdlyfjx 发表于 2014-1-31 14:07:55

撸主看看IE操作类函数就会了

dncsk 发表于 2014-2-2 23:35:27

学习了。。。。

ak47gglllk 发表于 2014-2-5 09:32:26

感谢,感谢
页: [1]
查看完整版本: 百度登录问题