求个关于能自动登录139.com的各大支流的源码
本帖最后由 kn007 于 2009-6-7 18:20 编辑。。。
等待中
要gdemail.139.com 已经好了 有kn007制作
mail.139.com已经好了 由kn007制作
www.139.com未完成 本帖最后由 kn007 于 2009-6-7 17:47 编辑
自己解决了，谢谢大家:face (27):根本就没有大家 本帖最后由 kn007 于 2009-6-7 17:48 编辑
我还是贴下源码吧
适用于广东139邮箱，www的139邮箱，不行哦，等我需要用到我再写#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#include <IE.au3>
dim $a="用户名",$b="密码"
$oIE = _IECreate ("http://gdemail.139.com/")
$oForm = _IEFormGetObjByName ($oIE, "form1")
$ming = _IEFormElementGetObjByName ($oForm, "txtUserName")
$mima = _IEFormElementGetObjByName ($oForm, "txtPassword")
$an = _IEFormElementGetObjByName ($oForm, "btnSubmit")
_IEFormElementSetValue ($ming, $a,0)
_IEFormElementSetValue ($mima, $b)
_IEAction ($an, "click") 本帖最后由 kn007 于 2009-6-7 18:17 编辑
www.139.com及mail.139.com 的总失败，有高手的话就帮忙写下
我写的是 gdemail.139.com ，所以可以 mail.139.com的做好了#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#include <IE.au3>
dim $a="用户名",$b="密码"
$oIE = _IECreate ("http://mail.139.com/")
$oForm = _IEFormGetObjByName ($oIE, "login")
$ming = _IEFormElementGetObjByName ($oForm, "NUM")
$mima = _IEFormElementGetObjByName ($oForm, "PASSWORD")
$an = _IEFormElementGetObjByName ($oForm, "subbot")
_IEFormElementSetValue ($ming, $a,0)
_IEFormElementSetValue ($mima, $b)
_IEAction ($an, "click") 只差www.139.com的自动登录 ...自顶，没人帮，名声臭 看到你一个人在自言自语...:face (22): 本帖最后由 kn007 于 2009-6-7 23:23 编辑
是啊，没人理我
现在3个问题，还差一个，你能帮忙不？
139.com那个表单自动填写，一直不行。。。
哎:face (5): 我再试会就睡了，今天不晚睡了，已经连续4、5天3点睡觉，7.30起床。。。 还是不行啊。。。郁闷，显示是有显示，但无效。。。登录也不会登，难道我看错表单了 算了，睡觉 睡不着，看书 睡觉去:face (19): :face (3):希望明天早上问题能解决