精易论坛

标题: 关于循环判断的写法，求助！ [打印本页]

作者: 逍遥尘劍 时间: 2017-4-16 18:23
标题: 关于循环判断的写法，求助！
其实就是想实现类似
普通填表.就绪判断_文本关键字 (浏览器.取窗口句柄 (), “首页”, 5000)
这种的效果，来检测网页有没有加载完成
然后发现这条代码灰常不靠谱，即使网页没有加载，也能跳过去，比方说第二个网页都还没有加载，代码就已经检测到第三个页面的关键词并且运行完了。

于是我就想一个思路，用判断循环来写一个找网页中的关键词，如果找到就跳出循环，没找到就延迟1000，继续循环查找，可是实在基础太差，请教大神..
或者更人性的写法就是，

查找超文本浏览框中的关键词“首页”
如果找到就跳出循环
如果没找到就延迟1000继续找
循环5次，如果还没找到，就弹出信息框提示没找到

这样怎么写呢？
搜索了一堆，还是没想出来...
谢谢！

作者: 秀才遇到兵 时间: 2017-4-16 18:23
你的网页源码  要在循环内再读取一次才可以
.计次循环首 (100, i)
网页源码＝普通填表.网页_取源码 ()
   flag ＝寻找文本 (网页源码, “服务大厅”, , 假)
   .如果真 (flag ≠ -1)
      跳出循环 ()

   .如果真结束
任务状态编辑框.内容＝任务状态编辑框.内容＋ “未找到” ＋ #换行符
任务状态编辑框.起始选择位置＝ -1

   延迟 (1000)

.计次循环尾 ()

作者: kenny8848 时间: 2017-4-16 19:03
.版本 2

.循环判断首 ()
.循环判断尾 (在这写如果没有找到判断)

作者: 秀才遇到兵 时间: 2017-4-16 19:22
.版本 2
.支持库 spec

.局部变量 i, 整数型
.局部变量 flag, 整数型

.计次循环首 (5, i)
flag ＝寻找文本 (网页文本, 关键字, , 假)
.如果真 (flag ≠ -1)
跳出循环 ()

.如果真结束

延迟 (1000)

.计次循环尾 ()

作者: LySyhd 时间: 2017-4-16 19:40
LySyhd_回答问题_超文本浏览框_判断网页关键字_是否已就绪.e

LySyhd_回答问题_超文本浏览框_判断网页关键字_是否已就绪.e

629.86 KB, 下载次数: 4

作者: feng526603 时间: 2017-4-16 19:50
思路没有问题，只是你检测的关键词不对，首页这个关键词应该在每个页面源码中都会有
要选页面独一无二的关键词，不然的话很容易出现误判
也可以采用多级嵌套判断来提高准确性
.版本 2

' 执行操作，页面跳转加载后
.计次循环首 (10, n)
.如果真 (普通填表.网页_取页面地址 () ＝ “”)  ' 如果你知道地址的话可以用这个，确定页面无误
      .计次循环首 (10, m)
         .如果真 (普通填表.就绪判断_文本关键字 (, , ) ＝真)  ' 用一个关键词判断加载就绪
            .计次循环首 (10, k)
                  .如果真 (普通填表.就绪判断_文本关键字 (, , ) ＝真)  ' 用第二个关键词再次判断加载就绪
                     跳出循环 ()
                  .如果真结束

                  .如果真 (k ＝ 10)
                     信息框 (“加载超时”, 0, , )
                     ' 停止程序运行
                  .如果真结束
                  程序_延时 (1000)
            .计次循环尾 ()
            跳出循环 ()
         .如果真结束

         .如果真 (m ＝ 10)
            信息框 (“加载超时”, 0, , )
            ' 停止程序运行
         .如果真结束
         程序_延时 (1000)
      .计次循环尾 ()
      跳出循环 ()
.如果真结束

.如果真 (n ＝ 10)
      信息框 (“加载超时”, 0, , )
      ' 停止程序运行
.如果真结束
程序_延时 (1000)
.计次循环尾 ()

作者: 逍遥尘劍 时间: 2017-4-16 19:56

z002304 发表于 2017-4-16 19:22
.版本 2
.支持库 spec

照这个方法，我发现一个问题，就是点运行的时候，如果页面内找不到，过两秒，我返回到能找到的那个页面，也一直提示找不到，应该是只要页面跳转到能找到的时候立即弹出已找到才对...

我代码参照您的以后是这么写的：

.版本 2
.支持库 spec
.版本 2
.支持库 spec

.局部变量 i, 整数型
.局部变量 flag, 整数型
.局部变量网页源码, 文本型

普通填表.初始化 (浏览器.取窗口句柄 ())
网页源码＝普通填表.网页_取源码 ()

.计次循环首 (100, i)
flag ＝寻找文本 (网页源码, “服务大厅”, , 假)
.如果真 (flag ≠ -1)
跳出循环 ()

.如果真结束
任务状态编辑框.内容＝任务状态编辑框.内容＋ “未找到” ＋ #换行符
任务状态编辑框.起始选择位置＝ -1

延迟 (1000)

.计次循环尾 ()
信息框 (“找到了”, 0, , )

再就是，怎写找不到的时候循环完100次弹出未找到，而不是循环完100次就结束循环，弹出找到了

其实我就是想写一段关于网页加载完成的检测，然而这种代码又不是很管用
普通填表.就绪判断_文本关键字 (浏览器.取窗口句柄 (), “服务大厅”, 5000)

非常感谢您的帮忙！

欢迎光临精易论坛 (https://125.confly.eu.org/)