求个用精易模块对百度填表的示例。。

xp555

功能很简单。
超文本浏览框打开www.baidu.com首页
程序判断页面有没有完全加载完，如果没有，继续等待加载
如果加载完了，用精易的网页填表 点击新闻链接。
然后再判断新闻链接页面有没有加载完。如果没加载完，继续等待加载
如果加载完了，用精易的网页填表 点击第一个新闻链接。

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1
变量名	类 型	数组	备 注
普通填表	普通填表
句柄	整数型
句柄1	整数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

超文本浏览框1.静默 ＝ 真  ' 防止出错弹出窗口

子程序名	返回值类型	公开	备 注
_按钮1_被单击

超文本浏览框1.地址 ＝ “http://www.baidu.com”
标签1.标题 ＝ “正在载入第一个页面”
如果真 (等待就绪 (超文本浏览框1) ＝ 真)
标签1.标题 ＝ “第一个页面载入完毕”

' -----------------------------------------------------------------------------------------------
句柄 ＝ 超文本浏览框1.取窗口句柄 ()
普通填表.初始化 (句柄)
普通填表.链接_点击 (“22”)
标签1.标题 ＝ “正在载入第二个页面”
如果真 (等待就绪 (超文本浏览框1) ＝ 真)
标签1.标题 ＝ “第二个页面载入完毕”

' -----------------------------------------------------------------------------------------------
返回 ()

子程序名	返回值类型	公开	备 注
等待就绪	逻辑型
参数名	类 型	参考	可空	数组	备 注
超文本浏览框名	超文本浏览框

判断循环首 (真)
如果真 (超文本浏览框名.是否就绪 () ＝ 真 且 超文本浏览框名.是否正在下载 () ＝ 假)
跳出循环 ()
延时 (100)
处理事件 ()
判断循环尾 ()
返回 (真)

i支持库列表	支持库注释
HtmlView	超文本浏览框支持库

.版本 2<br /> .支持库 HtmlView<br /> <br /> .程序集 窗口程序集1<br /> .程序集变量 普通填表, 普通填表<br /> .程序集变量 句柄, 整数型<br /> .程序集变量 句柄1, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 超文本浏览框1.静默 ＝ 真  ' 防止出错弹出窗口<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 超文本浏览框1.地址 ＝ “<a href="http://www.baidu.com" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">http://www.baidu.com</a>”<br /> 标签1.标题 ＝ “正在载入第一个页面”<br /> .如果真 (等待就绪 (超文本浏览框1) ＝ 真)<br />     标签1.标题 ＝ “第一个页面载入完毕”<br /> .如果真结束<br /> <br /> ' -----------------------------------------------------------------------------------------------<br /> 句柄 ＝ 超文本浏览框1.取窗口句柄 ()<br /> 普通填表.初始化 (句柄)<br /> <br /> 普通填表.链接_点击 (“22”)<br /> <br /> 标签1.标题 ＝ “正在载入第二个页面”<br /> .如果真 (等待就绪 (超文本浏览框1) ＝ 真)<br /> <br />     标签1.标题 ＝ “第二个页面载入完毕”<br /> .如果真结束<br /> <br /> ' -----------------------------------------------------------------------------------------------<br /> 返回 ()<br /> <br /> <br /> .子程序 等待就绪, 逻辑型<br /> .参数 超文本浏览框名, 超文本浏览框<br /> <br /> .判断循环首 (真)<br />     .如果真 (超文本浏览框名.是否就绪 () ＝ 真 且 超文本浏览框名.是否正在下载 () ＝ 假)<br />         跳出循环 ()<br />     .如果真结束<br />     延时 (100)<br />     处理事件 ()<br /> .判断循环尾 ()<br /> 返回 (真)

上面是我写的代码。打开百度首页。判断页面加载完没有是正常的
但如果用精易的填表 点击了新闻链接页面

新闻链接页面的页面有没有加载完，就没法判断了。
状态就是新闻链接还没打开，就显示页面加载完了。

有的同学告诉我用延时，但我感觉不太准确，因为我要操作的是国外的网站，

速度有时快，有时慢。延时方法只治标不治本。

xp555

普通填表.链接_点击 (“22”)
标签1.标题 ＝ “正在载入第二个页面”
如果真 (等待就绪 (超文本浏览框1) ＝ 真)
标签1.标题 ＝ “第二个页面载入完毕”
运行到这就出错 。点击了22.  也就是新闻链接。没等到页面.加载完，
标签1.标题就显示第二个页面加载完了。

qq919740

就绪等待就可以解决了.

剩下我de孩子气

超文本有自带的载入完成 运行的命令

屎神创造者

用关键词判断 如普通填表.就续判断_文本关键词

xp555

无ye 发表于 2014-7-30 09:33
用关键词判断 如普通填表.就续判断_文本关键词

获取不到状态 。。