找回密码
 加入
搜索
查看: 3440|回复: 4

[IE类操作] 那位达人可以给发个126邮箱自动登陆的程序?

[复制链接]
发表于 2010-3-10 17:48:00 | 显示全部楼层 |阅读模式
本帖最后由 fangjiji 于 2010-3-15 13:56 编辑

rt,论坛里有163的,但是我不会改啊,请达人帮忙。
;126邮箱登陆脚本
#include <IE.au3>
dim $a="用户名",$b="密码"
$oIE = _IECreate ("http://www.126.com")
$oForm = _IEFormGetObjByName ($oIE, "Form")
$ming = _IEFormElementGetObjByName ($oForm, "user")
$mima = _IEFormElementGetObjByName ($oForm, "password")
$an = _IEFormElementGetObjByName ($oForm, "enter.x")
_IEFormElementSetValue ($ming, $a,0)
_IEFormElementSetValue ($mima, $b)
_IEAction ($an, "click")
发表于 2010-3-10 17:52:53 | 显示全部楼层
路过

评分

参与人数 1金钱 -10 贡献 -1 收起 理由
afan -10 -1 恶意灌水,扣分警告!

查看全部评分

 楼主| 发表于 2010-3-10 19:20:35 | 显示全部楼层
;126邮箱登陆脚本
#include <IE.au3>
dim $a="用户名",$b="密码"
$oIE = _IECreate ("http://www.126.com")
$oForm = _IEFormGetObjByName ($oIE, "Form")
$ming = _IEFormElementGetObjByName ($oForm, "user")
$mima = _IEFormElementGetObjByName ($oForm, "password")
$an = _IEFormElementGetObjByName ($oForm, "enter.x")
_IEFormElementSetValue ($ming, $a,0)
_IEFormElementSetValue ($mima, $b)
_IEAction ($an, "click")
 楼主| 发表于 2010-3-10 19:21:03 | 显示全部楼层
还是自己动手,丰衣足食
发表于 2010-3-10 19:41:03 | 显示全部楼层
你说的太对了。自己摸索出来的印象更深刻。

您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-18 21:14 , Processed in 0.097912 second(s), 28 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表