用易语言获取新浪滚动新闻标题

ahuo888

zainex 发表于 2026-1-25 16:17
使用上面的代码获取的标题，本身是不会有重复和空行的。
如果你担心未来会出现这种情况，可以这样做：
[e=1 ...

弄个多页的就好了。

zainex

这代码获取的就是当天全部页面的标题，不需要自己另外再指定页面，看一下调试信息：

* “https://feed.mix.sina.com.cn/api/roll/get?pageid=153&lid=2509&num=50&etime=1769270400&stime=1769356800&page=1” | 50
* “https://feed.mix.sina.com.cn/api/roll/get?pageid=153&lid=2509&num=50&etime=1769270400&stime=1769356800&page=2” | 8
* “https://feed.mix.sina.com.cn/api/roll/get?pageid=153&lid=2509&num=50&etime=1769270400&stime=1769356800&page=3” | 0
被调试易程序运行完毕

一共访问了3个页面（page），最后一个页面没有标题，说明已经全部读取完了。

ahuo888

zainex 发表于 2026-1-25 16:40
这代码获取的就是当天全部页面的标题，不需要自己另外再指定页面，看一下调试信息：
[md]```
* “https://f ...

我不一定要当然的，因为这几页我根本不够用，所以帮我搞个多页的，麻烦你了。

ahuo888

zainex 发表于 2026-1-25 16:40
这代码获取的就是当天全部页面的标题，不需要自己另外再指定页面，看一下调试信息：
[md]```
* “https://f ...

我不是全部要当天的，因为这几页我根本不够用，所以帮我搞个多页的，麻烦你了。我之前那个都是可以选择页数的

ahuo888

zainex 发表于 2026-1-25 16:17
使用上面的代码获取的标题，本身是不会有重复和空行的。
如果你担心未来会出现这种情况，可以这样做：
[e=1 ...

一旦caiji多页就要用到那个删除重复的了。

ahuo888

zainex 发表于 2026-1-25 16:40
这代码获取的就是当天全部页面的标题，不需要自己另外再指定页面，看一下调试信息：
[md]```
* “https://f ...

https://news.sina.com.cn/roll/#pageid=153&lid=2512&k=&num=50&page=1
体育

zainex

  

子程序名	返回值类型	公开	备 注
_点击获取新闻_被单击

变量名	类 型	静态	数组	备 注
json	类_json
数	整数型
地址	文本型
时间	日期时间型
数量	整数型
页面	整数型
节点	节点
页数	整数型
类型	文本型

点击获取新闻.标题 ＝ “新闻获取中”
点击获取新闻.禁止 ＝ 真
编辑框1.内容 ＝ “”
类型 ＝ “2512”  ' 2509 是全部
地址 ＝ “https:/” ＋ “/feed.mix.sina.com.cn/api/roll/get?pageid=153&lid=” ＋ 类型 ＋ “&num=50”
地址 ＝ 地址 ＋ “&page=”
页数 ＝ 10  ' 自己指定
计次循环首 (页数, 页面)
json.解析 (UTF8到文本 (HTTP读文件 (地址 ＋ 到文本 (页面))))
数量 ＝ json.成员数 (“result.data”)
调试输出 (地址 ＋ 到文本 (页面), 数量)
计次循环首 (数量, 数)
标题 ＝ json.取通用属性 (“result.data[” ＋ 到文本 (数 － 1) ＋ “].title”)
如果真 (删全部空 (标题) ＝ “”)  ' 跳过空文本
到循环尾 ()
' 相同的文本只能成功加入节点一次， 利用这个特性，即可达到去重复的目的
如果真 (节点.加入属性 (标题, 0) ＝ 真)
编辑框1.加入文本 (标题 ＋ #换行符 )

计次循环尾 ()
计次循环尾 ()
编辑框1.内容 ＝ 文本_删除空行 (编辑框1.内容)  ' 再次删空行
点击获取新闻.标题 ＝ “获取完毕”
' 延时 (2000)
点击获取新闻.禁止 ＝ 假
点击获取新闻.标题 ＝ “点击重新获取”

i支持库列表	支持库注释
EDataStructure	数据结构支持库
internet	互联网支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EDataStructure<br /> .支持库 internet<br /> .支持库 spec<br /> <br /> .子程序 _点击获取新闻_被单击<br /> .局部变量 json, 类_json<br /> .局部变量 数, 整数型<br /> .局部变量 地址, 文本型<br /> .局部变量 时间, 日期时间型<br /> .局部变量 数量, 整数型<br /> .局部变量 页面, 整数型<br /> .局部变量 节点, 节点<br /> .局部变量 页数, 整数型<br /> .局部变量 类型, 文本型<br /> <br /> 点击获取新闻.标题 ＝ “新闻获取中”<br /> 点击获取新闻.禁止 ＝ 真<br /> 编辑框1.内容 ＝ “”<br /> 类型 ＝ “2512”  ' 2509 是全部<br /> 地址 ＝ “https:/” ＋ “/feed.mix.sina.com.cn/api/roll/get?pageid=153&lid=” ＋ 类型 ＋ “&num=50”<br /> 地址 ＝ 地址 ＋ “&page=”<br /> 页数 ＝ 10  ' 自己指定<br /> .计次循环首 (页数, 页面)<br />     json.解析 (UTF8到文本 (HTTP读文件 (地址 ＋ 到文本 (页面))))<br />     数量 ＝ json.成员数 (“result.data”)<br />     调试输出 (地址 ＋ 到文本 (页面), 数量)<br />     .计次循环首 (数量, 数)<br />         标题 ＝ json.取通用属性 (“result.data[” ＋ 到文本 (数 － 1) ＋ “].title”)<br />         .如果真 (删全部空 (标题) ＝ “”)  ' 跳过空文本<br />             到循环尾 ()<br />         .如果真结束<br />         ' 相同的文本只能成功加入节点一次， 利用这个特性，即可达到去重复的目的<br />         .如果真 (节点.加入属性 (标题, 0) ＝ 真)<br />             编辑框1.加入文本 (标题 ＋ #换行符)<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> 编辑框1.内容 ＝ 文本_删除空行 (编辑框1.内容)  ' 再次删空行<br /> 点击获取新闻.标题 ＝ “获取完毕”<br /> ' 延时 (2000)<br /> 点击获取新闻.禁止 ＝ 假<br /> 点击获取新闻.标题 ＝ “点击重新获取”

ahuo888

zainex 发表于 2026-1-25 17:11
[e=1].版本 2
.支持库 EDataStructure
.支持库 internet

这个有去除重复吗？

ahuo888

zainex 发表于 2026-1-25 17:11
[e=1].版本 2
.支持库 EDataStructure
.支持库 internet

完美。就这样子了。