吾爱破解 - 52pojie.cn

 找回密码
 注册[Register]

QQ登录

只需一步,快速开始

查看: 5935|回复: 8
收起左侧

[易语言 转载] 利用空间百度或QQ空间在线更新源代码

[复制链接]
小亮丶ing 发表于 2015-1-14 22:33
.版本 2

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

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

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

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

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


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

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

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


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

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



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

免费评分

参与人数 1热心值 +1 收起 理由
9171990 + 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
研究半天了不会用
您需要登录后才可以回帖 登录 | 注册[Register]

本版积分规则

返回列表

RSS订阅|小黑屋|处罚记录|联系我们|吾爱破解 - LCG - LSG ( 京ICP备16042023号 | 京公网安备 11010502030087号 )

GMT+8, 2024-11-15 11:01

Powered by Discuz!

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表