|

楼主 |
发表于 2017-2-10 02:10:53
|
显示全部楼层
山东省青岛市
我终于解决了,突然想到的办法,在这里贴出程序,没有写注释,大家应该都懂,很简单,注意循环嵌套,嵌套错了。没有效果哦,我只写了连续打开3个网页的例子,后面自己补
.版本 2
.支持库 HtmlView
.子程序 _超文本浏览框1_已就绪
.局部变量 普通填表, 普通填表
.局部变量 取浏览器地址1, 文本型
.局部变量 取浏览器地址2, 文本型
.局部变量 初始站点地址1, 文本型
.局部变量 初始站点地址2, 文本型
.局部变量 跳转变量, 整数型, 静态
初始站点地址1 = “http://www.baidu.com”
普通填表.初始化 (超文本浏览框1.取窗口句柄 ())
初始站点地址2 = 普通填表.网页_取页面地址 ()
.如果 (跳转变量 = 0)
.判断循环首 (初始站点地址2 ≠ 初始站点地址1)
普通填表.初始化 (超文本浏览框1.取窗口句柄 ())
初始站点地址2 = 普通填表.网页_取页面地址 ()
.判断循环尾 ()
.如果 (初始站点地址1 = 初始站点地址2)
普通填表.初始化 (超文本浏览框1.取窗口句柄 ())
取浏览器地址1 = 普通填表.网页_取页面地址 ()
普通填表.文本框_写内容 (“1”, “234132412423”, )
普通填表.文本框_置焦点 (“1”)
延时 (50)
普通填表.文本框_置焦点 (“2”)
普通填表.文本框_写内容 (“2”, “a2341234”, 1) ' ----------------填写密码
普通填表.文本框_置焦点 (“2”)
延时 (50)
普通填表.SPAN_点击 (“2”)
延时 (50)
跳转变量 = 1
.否则
.如果结束
.否则
.如果 (跳转变量 = 1)
普通填表.初始化 (超文本浏览框1.取窗口句柄 ())
取浏览器地址2 = 普通填表.网页_取页面地址 ()
.判断循环首 (取浏览器地址2 = 取浏览器地址1)
普通填表.初始化 (超文本浏览框1.取窗口句柄 ())
取浏览器地址2 = 普通填表.网页_取页面地址 ()
.判断循环尾 ()
超文本浏览框1.地址 = “http://www.baidu.com/”
跳转变量 = 2
.否则
.如果 (跳转变量 = 2)
普通填表.初始化 (超文本浏览框1.取窗口句柄 ())
取浏览器地址1 = 普通填表.网页_取页面地址 ()
.判断循环首 (取浏览器地址2 = 取浏览器地址1)
普通填表.初始化 (超文本浏览框1.取窗口句柄 ())
取浏览器地址1 = 普通填表.网页_取页面地址 ()
.判断循环尾 ()
普通填表.链接_点击 (“35”, 0, 真)
跳转变量 = 3
.否则
.如果结束
.如果结束
.如果结束 |
评分
-
查看全部评分
|