|
楼主 |
发表于 2014-1-2 12:02:55
|
显示全部楼层
吉林省白城市
[e]
.版本 2
.支持库 spec
.支持库 EThread
.子程序 子程序身份认证
.局部变量 局_句柄, 整数型
.局部变量 局_SPAN索引, 整数型
网页填表.就绪判断 (互联网浏览器1.取窗口句柄 (), “开户”, , , , 8000, , , )
网页填表.链接_点击 (“innerText==开户”, , , , 6)
网页填表.就绪判断 (互联网浏览器1.取窗口句柄 (), “3G后付费客户开户终端”, , , , 8000, )
网页填表.SPAN_点击 (“innerText==3G后付费客户开户终端(白/成卡独立受理)”, 1, )
延迟 (5000)
子程序日志 (“开始开卡操作......”)
网页填表.就绪判断 (互联网浏览器1.取窗口句柄 (), “账单寄送方式”, , , , 8000, , , )
子程序日志 (“开始写入***号码......”)
.判断循环首 (真)
.如果真 (网页填表.文本框_写内容 (“title==证件号码”, 编辑框***.内容, , 11))
跳出循环 ()
.如果真结束
公用.程序_延时 (100)
.判断循环尾 ()
时钟1.时钟周期 = 100
子程序日志 (“点击读二代证”)
.判断循环首 (真)
.如果真 (网页填表.按钮_取索引 (“title==***认证”, ) > 0)
跳出循环 ()
.如果真结束
公用.程序_延时 (100)
.判断循环尾 ()
.如果 (网页填表.就绪判断 (互联网浏览器1.取窗口句柄 (), “***认证”, , , 1, , , , ) = 1)
.判断循环首 (真)
.如果真 (网页填表.按钮_点击 (“title==读二代证”, , 11))
跳出循环 ()
.如果真结束
.判断循环尾 ()
启动线程 (&子程序新老客户判断, , )
子程序日志 (“点击BSS认证”)
网页填表.按钮_点击 (“Id==custInfo_custInfoCheck_but”, , 11)
[/e]
|
|