在线等..文本_取出中间文本等于标签1载入窗口

qua518 · 发表于 2011-9-2 11:56:11

[e].版本 2
.支持库 internet
.支持库 spec
.程序集窗口程序集1
.子程序 __启动窗口_创建完毕

.子程序 _按钮1_被单击
.局部变量网页源码, 文本型
.局部变量版本号, 文本型
网页源码＝到文本 (HTTP读文件 (“”))
版本号＝文本_取出中间文本 (网页源码, “版本开头[”, “]版本结尾”)
调试输出 (版本号)
.判断开始 (到小数 (版本号) ≠ 到小数 (标签1))
信息框 (“请及时更新软件。”, 0, )
.默认
.判断结束
[/e]

比喻：提取的版本号如果等于标签1那么就可以载入新窗口，如果提取的版本号和标签1不一样那么就销毁程序并删除文件

934332 · 发表于 2011-9-2 12:08:26

{:3_229:}没有问题什么意思

Xiao白 · 发表于 2011-9-2 12:21:21

本帖最后由 baims 于 2011-9-2 12:27 编辑

加个如果命令就行！！！至于你说的删除文件就来知道了。。。估计不好办！！
如果 (版本号＝标签1.标题)
载入 (窗口1, , 假)
销毁 ()
否则
信息框 (“请及时更新软件。”, 0, )
销毁 ()

月亮代表谁的心 · 发表于 2011-9-2 12:24:52

本帖最后由龙井茶于 2011-9-2 12:28 编辑

看个例子：
.版本 2
.支持库 internet
网页文本＝到文本 (HTTP读文件 (“网~~~”))
文本＝分割文本 (网页文本, #换行符, )
.计次循环首 (取数组成员数 (文本), i)
处理事件 ()
编辑框1.内容＝ “”
.如果 (寻找文本 (文本 , “开奖结果”, , 假) ≠ -1)
      取出内容 (文本 )
      跳出循环 ()
.否则
      编辑框1.加入文本 (“正查询开奖结果！请稍等……”)
.如果结束
输出调试文本 (文本 )
.计次循环尾 ()

a5501241 · 发表于 2011-9-2 12:28:47

本帖最后由 a5501241 于 2011-9-2 12:29 编辑

[e]
.版本 2
.支持库 internet
.支持库 spec
.子程序 _按钮1_被单击
.局部变量网页源码, 文本型
.局部变量版本号, 文本型
网页源码＝到文本 (HTTP读文件 (“”))
版本号＝文本_取出中间文本 (网页源码, “版本开头[”, “]版本结尾”)
调试输出 (版本号)
.判断开始 (到小数 (版本号) ≠ 到小数 (标签1))
信息框 (“请及时更新软件。”, 0, )
载入 (窗口1, , 真)
[/e]