|
楼主 |
发表于 2013-11-24 15:43:06
|
显示全部楼层
湖南省岳阳市
.版本 2
.支持库 iext
.子程序 子程序_增加1
.局部变量 线程句柄, 整数型
.如果真 (程序控制 = 真)
延时 (3000)
程序集_1级窗口句柄 = 窗口_取句柄_模糊 (“家庭用户成员添加 -- 网页对话框”, “Internet Explorer_TridentDlgFrame”)
.如果 (程序集_1级窗口句柄 = 0 或 程序集_1级窗口句柄 = 窗口句柄)
程序控制 = 假
超级列表框1.置标题 (超级列表框1.现行选中项, 4, “失败”)
网页填表.初始化 (程序集_顶级IE句柄, 真, , 真)
网页填表.图片_点击 (超级列表框1.取标题 (超级列表框1.现行选中项, 1))
.否则
程序集_1级IE句柄 = 窗口_取IE窗口句柄 (程序集_1级窗口句柄)
网页填表.初始化 (程序集_1级IE句柄, 真, , , )
_启动窗口.标题 = 到文本 (程序集_1级IE句柄)
.如果结束
.如果真结束
.子程序 子程序_增加2
.局部变量 局部_IE句柄, 整数型
.局部变量 局部_窗口句柄, 整数型
.如果真 (程序控制 = 真)
延时 (3000)
程序集_次级窗口句柄 = 窗口_取句柄_模糊 (“添加网内用户 -- 网页对话框”, “Internet Explorer_TridentDlgFrame”)
_启动窗口.标题 = 到文本 (程序集_次级窗口句柄)
.如果 (程序集_次级窗口句柄 = 0 或 程序集_次级窗口句柄 = 窗口句柄)
程序控制 = 假
超级列表框1.置标题 (超级列表框1.现行选中项, 4, “失败”)
网页填表.销毁 (真)
网页填表.初始化 (程序集_顶级IE句柄, 真, , 真)
网页填表.图片_点击 (超级列表框1.取标题 (超级列表框1.现行选中项, 1))
.否则
程序集_次级IE句柄 = 窗口_取IE窗口句柄 (程序集_次级窗口句柄)
网页填表.初始化 (程序集_次级IE句柄, 真, , 真)
网页填表.链接_点击 (“33”, , , , )
网页填表.销毁 (真)
.如果结束
就是这一段源码 - - 麻烦大神看看~~ 就是这一断代码的问题, 我屏蔽这一段就不出运行错误了 |
|