小亮丶ing 发表于 2015-1-14 22:33

利用空间百度或QQ空间在线更新源代码




.版本 2

.子程序 __启动窗口_创建完毕
.局部变量 局_句柄, 整数型
.局部变量 版本号, 文本型

版本号 = 到文本 (网页_访问 (“空间地址”, , , , , , , , 1, ))
版本号 = 文本_取出中间文本 (版本号, “>最新版本:”, “版本</p><p style”)
.如果 (标签6.标题 = 版本号)

.否则
    信息框 (“请下载最新版本”, #错误图标, “系统提示”)
    载入 (更新, , 真)
    销毁 ()   ‘不更新不打开启动窗口
————————————————————————————————————————————————————————
以上是启动窗口
————————————————————————————————————————————————————————
.版本 2
.支持库 RegEx

.子程序 _更新_创建完毕
.局部变量 版本号, 文本型
.局部变量 下载地址, 文本型

_启动窗口.可视 = 假
版本号 = 到文本 (网页_访问 (“空间地址”, , , , , , , , 1, ))
正则_匹配批量 (版本号)


.子程序 正则_匹配批量, 整数型, , 本子程序采用【精易编程助手】生成。成功返回匹配的数量,失败返回0。
.参数 源文本, 文本型, , 欲被匹配的文本
.局部变量 局_正则, 正则表达式, , ,
.局部变量 局_搜索结果, 搜索结果, 静态, "0"
.局部变量 局_匹配数, 整数型, , , 匹配数量
.局部变量 局_计次, 整数型

.如果真 (局_正则.创建 (“#ffffff;” + #引号 + “>(.*?)</p><p”, 假) = 假)
    信息框 (“正则创建失败,请检查正则表达式语句是否有误!”, #错误图标, )
    返回 (0)
.如果真结束
局_正则.多行模式 = 假
局_搜索结果 = 局_正则.搜索全部 (源文本)
局_匹配数 = 取数组成员数 (局_搜索结果)
.如果真 (局_匹配数 = 0)
    信息框 (“匹配失败,请检检查正则语句是否有误,数量:0”, #错误图标, )
    返回 (0)
.如果真结束
.计次循环首 (局_匹配数, 局_计次)

    标签1.标题 = 标签1.标题 + 局_搜索结果 [局_计次].取子匹配文本 (源文本, 1, ) + #换行符


.计次循环尾 ()
返回 (局_匹配数)

——————————————————————————————————————————————————
以上是更新窗口代码   
正则匹配可以用编译助手直接取代码出来



我也是新手,不懂就慢慢思考!

asdkktt 发表于 2015-1-14 22:41

哦哦。。不懂帮顶

zxhlixin 发表于 2015-1-14 22:45

吉子 发表于 2015-1-14 22:55

然后~~~这说的是什么?

hlrlqy 发表于 2015-1-14 22:58

很久以前的古董了,下载还要空间,还不如直接在空间建个html用来检测

妹妹说我不好玩 发表于 2015-1-14 23:38

.版本 2
    超文本浏览框_人数.地址 =“”
    处理事件 ()
    普通填表.初始化 (超文本浏览框_人数.取窗口句柄 ())
    编辑框7.内容 = 文本_取出中间文本 (普通填表.网页_取文本 (), 到文本 (), 到文本 ())

SherlockHolmes 发表于 2015-1-14 23:54

顶贴~~( ﹁ ﹁ ) ~~~

yyyy789 发表于 2015-1-16 10:31

不能给个成品大家一块玩玩啊

juwei 发表于 2015-12-16 22:16

研究半天了不会用
页: [1]
查看完整版本: 利用空间百度或QQ空间在线更新源代码