|
5精币
.版本 2
.支持库 HtmlView
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 uu, UU打码类
.子程序 摘入
.局部变量 资料, 文本型
资料 = 到文本 (读入文件 (路径.内容))
账号.内容 = 文本_取出中间文本 (资料, “账号密码”, “----”)
密码.内容 = 文本_取出中间文本 (资料, “----”, “收件人”)
收件人.内容 = 文本_取出中间文本 (资料, “收件人”, “代理”)
代理.内容 = 文本_取出中间文本 (资料, “代理”, “HTTP”)
线程_启动 (&登入)
.子程序 _uu登入_被单击
uu.登录UU打码平台 (uu账号.内容, uu密码.内容, 编辑框)
.子程序 登入
超文本浏览框1.地址 = “http://email.163.com/”
延迟 (1500)
网页填表.初始化 (超文本浏览框1.取窗口句柄 ())
网页填表.DIV_点击 (“innerText==163网易免费邮”, , 1)
延迟 (1000)
网页填表.文本框_置焦点 (“1”, , 1)
网页填表.文本框_写内容 (“1”, 账号.内容, , 1)
' 网页填表.文本框_写内容 (“Id==userNameIpt”, 账号, , 1)
延迟 (500)
网页填表.文本框_置焦点 (“2”, , 1)
网页填表.文本框_写内容 (“2”, 密码.内容, , 1)
' 网页填表.文本框_写内容 (“Id==pwdInput”, 密码, , 1)
延迟 (500)
网页填表.按钮_点击 (“1”)
网页填表.按钮_点击 (“1”)
延迟 (10000)
线程_启动 (&发信)
.子程序 发信
网页填表.初始化 (超文本浏览框1.取窗口句柄 ())
网页填表.ULLI_选择 (“innerText==收 信”, , , 1)
延迟 (到数值 (4000))
网页填表.SPAN_点击 (“className==da0”)
' 网页填表.SPAN_点击 (“Id==_mail_userlabel_0_182”, , 1)
' 网页填表.SPAN_点击 (“innerText==Fw:转发:全新体验,手机也能玩转网易邮箱”, , 1) ' 发信人
延迟 (到数值 (4000))
网页填表.SPAN_点击 (“innerText==转 发”, , 1)
网页填表.SPAN_点击 (“innerText==转 发”, , 1)
延迟 (到数值 (2000))
网页填表.文本框_写内容 (“className==nui-editableAddr-ipt”, 收件人.内容 + [url=mailto:“1973489920@qq.com]“1973489920@qq.com[/url];”, , 1)
延迟 (500)
网页填表.文本框_置焦点 (“className==nui-ipt-input”)
网页填表.SPAN_点击 (“innerText==发送”, , 1)
线程_启动 (&验证码识别)
.子程序 验证码识别
.局部变量 识别结果, 文本型
网页填表.初始化 (超文本浏览框1.取窗口句柄 ())
图片框1.图片 = 网页填表.网页_验证码同步 (超文本浏览框1.取窗口句柄 (), “http://mail.163.com/js6/s?”)
uu.登录UU打码平台 (uu账号.内容, uu密码.内容, 编辑框)
延迟 (2000)
uu.识别验证码 (图片框1.图片, 识别结果, 编辑框)
编辑框12.内容 = 识别结果
网页填表.文本框_写内容 (“className==nui-ipt-input”, 编辑框12.内容, 1, 1)
网页填表.文本框_写内容 (“className==nui-ipt-input”, 编辑框12.内容, 2, 1)
网页填表.文本框_写内容 (“className==nui-ipt-input”, 编辑框12.内容, 3, 1)
网页填表.文本框_写内容 (“className==nui-ipt-input”, 编辑框12.内容, 4, 1)
网页填表.文本框_写内容 (“className==nui-ipt-input”, 编辑框12.内容, 5, 1)
网页填表.文本框_写内容 (“className==nui-ipt-input”, 编辑框12.内容, 6, 1)
网页填表.文本框_写内容 (“className==nui-ipt-input”, 编辑框12.内容, 7, 1)
网页填表.文本框_写内容 (“className==nui-ipt-input”, 编辑框12.内容, 8, 1)
网页填表.文本框_写内容 (“className==nui-ipt-input”, 编辑框12.内容, 9, 1)
网页填表.文本框_写内容 (“className==nui-ipt-input”, 编辑框12.内容, 10, 1)
延迟 (200)
网页填表.DIV_点击 (“innerText==确 定”, , 1)
网页填表.DIV_点击 (“innerText==确 定”, , 1)
延迟 (8000)
线程_启动 (&退出)
.子程序 退出
网页填表.初始化 (超文本浏览框1.取窗口句柄 ())
网页填表.链接_点击 (“innerText==退出”, , , , 1)
网页填表.链接_点击 (“innerText==退出”, , , , 1)
延迟 (到数值 (4000))
_启动窗口.销毁 (真)
.子程序 __启动窗口_创建完毕
.局部变量 独立cookies, 公用
独立cookies.程序_独立开启 (真, 真, 编辑框1.内容)
线程_启动 (&_开始_被单击)
.子程序 __启动窗口_将被销毁
.局部变量 独立cookies, 公用
独立cookies.程序_独立关闭 (真)
.子程序 _开始_被单击
线程_启动 (&摘入)
|
|