怎么取出这个网站里文章的所有文本

huangjiahong

网址：https://www.jianshu.com/p/01a7eb8b48b3
怎么提取出来？提取后怎么写到易语言里？这里面的文本是会随时更新内容的，每一行文本以逗号分割出来，依次填入超级列表框里

熬夜

111.e (922.8 KB, 下载次数: 3)

2025-8-15 22:08 上传

点击文件名下载附件

华庭大哥

.版本 2
.支持库 spec

.子程序 功能_网页访问, 文本型
.局部变量 局_网址, 文本型
.局部变量 局_方式, 整数型
.局部变量 ADD_协议头, 类_POST数据类
.局部变量 局_提交协议头, 文本型
.局部变量 局_是否重定向, 逻辑型
.局部变量 局_结果, 字节集
.局部变量 局_返回, 文本型

局_网址 ＝ “https://www.jianshu.com/p/01a7eb8b48b3”
局_方式 ＝ 0
ADD_协议头.添加 (“sec-fetch-site”, “same-origin”, )
ADD_协议头.添加 (“sec-fetch-mode”, “navigate”, )
ADD_协议头.添加 (“accept”, “text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.9”, )
ADD_协议头.添加 (“accept-language”, “zh-CN,zh;q=0.9”, )
ADD_协议头.添加 (“upgrade-insecure-requests”, “1”, )
ADD_协议头.添加 (“sec-fetch-user”, “?1”, )
ADD_协议头.添加 (“cache-control”, “max-age=0”, )
ADD_协议头.添加 (“sec-fetch-dest”, “document”, )
ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”, )
局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()
局_是否重定向 ＝ 真
局_结果 ＝ 网页_访问_对象 (局_网址, 局_方式, , , , 局_提交协议头, , , 局_是否重定向, , , , , , , , , , )
局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果, , , ))
局_返回 ＝ 文本_取出中间文本 (局_返回, “<article class=” ＋ #引号 ＋ “_2rhmJa” ＋ #引号 ＋ “>”, “</article>”, , )
局_返回 ＝ 文本_替换 (局_返回, , , , “<p>”, “”, “</p>”, #换行符, , , , , , )
调试输出 (局_返回)
返回 (局_返回)


补充内容 (2025-8-15 21:07):
效果图：https://xiuxiu-pro.meitudata.com ... 5e4cafa5ba837b2.png

dtcly

感觉你要的不是答案，是写好的程序...