求易语言取网页文本源码

邮箱：815382654@qq.com... 邮箱：815382654@qq.com 展开

 我来答

3个回答

#热议# 网上掀起『练心眼子』风潮，真的能提高情商吗？

我要求助V
推荐于2016-03-19 · TA获得超过476个赞

知道小有建树答主

回答量：617

采纳率：100%

帮助的人：715万

我也去答题访问个人页

关注

展开全部

.版本 2.支持库 internet
.子程序 取网页纯文本, 文本型.参数 网址, 文本型
.局部变量 temp_____, 文本型
.局部变量 逻辑, 逻辑型
 
temp_____ ＝ 到文本 (HTTP读文件 (网址))逻辑 ＝ 真
.循环判断首 ()
    处理事件 ()
    .如果 (寻找文本 (temp_____, “<”, , 假) ＞ 寻找文本 (temp_____, “>”, , 假))
        temp_____ ＝ 子文本替换 (temp_____, “>”, , , 1, 真)
    .否则
        temp_____ ＝ 子文本替换 (temp_____, 取文本中间 (temp_____, 寻找文本 (temp_____, “<”, , 假), 寻找文本 (temp_____, “>”, , 假) － 寻找文本 (temp_____, “<”, , 假)), , , , 假)
    .如果结束
    .如果真 (寻找文本 (temp_____, “<”, , 假) ＝ -1)
        逻辑 ＝ 假
    .如果真结束
 
.循环判断尾 (逻辑)返回 (temp_____)


本回答被提问者和网友采纳






已赞过已踩过<

你对这个回答的评价是？
评论收起