位置: 首页 > 易语言 > 易语言批量获取CSDN博文

易语言批量获取CSDN博文

  • 阅读: 548
  • 发布时间: 2023-08-30 21:35:49
  • 评论: 9999+

本程序源码主要是通过易语言post请求获取到csdn的博文内容,可以实现批量获取,感兴趣的小伙伴可以了解下。

代码如下:

.版本 2
.支持库 iext

.子程序 _按钮1_被单击
.局部变量 返回文本, 文本型
.局部变量 json, JSON类
.局部变量 i, 整数型
.局部变量 index, 整数型

返回文本 = 模块_Utf8到Ansi (模块_WinHttp访问 (“https://cms-api.csdn.net/v1/web_home/select_content?componentIds=www-blog-recommend&&cate1=lang”, , , , ))
json.解析 (返回文本)
.如果真 (json.取通用属性 (“msg”) ≠ “ok”)
信息框 (“请求失败”, 0, , )
返回 ()
.如果真结束
超级列表框1.全部删除 ()
.计次循环首 (json.取成员数量 (“data['www-blog-recommend'].info”), i)
index = 超级列表框1.插入表项 (, 到文本 (i), , , , )
超级列表框1.置标题 (index, 1, json.取通用属性 (“data['www-blog-recommend'].info[” + 到文本 (i - 1) + “].extend.title”))
超级列表框1.置标题 (index, 2, json.取通用属性 (“data['www-blog-recommend'].info[” + 到文本 (i - 1) + “].extend.nickname”))
超级列表框1.置标题 (index, 3, json.取通用属性 (“data['www-blog-recommend'].info[” + 到文本 (i - 1) + “].extend.job”))
超级列表框1.置标题 (index, 4, json.取通用属性 (“data['www-blog-recommend'].info[” + 到文本 (i - 1) + “].extend.desc”))
超级列表框1.置标题 (index, 5, json.取通用属性 (“data['www-blog-recommend'].info[” + 到文本 (i - 1) + “].extend.url”))
超级列表框1.置标题 (index, 6, json.取通用属性 (“data['www-blog-recommend'].info[” + 到文本 (i - 1) + “].extend.views”))
超级列表框1.置标题 (index, 7, json.取通用属性 (“data['www-blog-recommend'].info[” + 到文本 (i - 1) + “].extend.comments”))
超级列表框1.置标题 (index, 8, json.取通用属性 (“data['www-blog-recommend'].info[” + 到文本 (i - 1) + “].extend['user_days']”))
超级列表框1.置标题 (index, 9, json.取通用属性 (“data['www-blog-recommend'].info[” + 到文本 (i - 1) + “].extend['created_at']”))
.计次循环尾 ()

.子程序 _超级列表框1_被双击, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

编辑框1.内容 = “”
编辑框1.加入文本 (子程序_获取博文 (超级列表框1.取标题 (超级列表框1.现行选中项, 5)))

全部代码请查看全文

发布评论 留下您的评论 给个鼓励吧

搜索

用户推荐

hxm8888
TA很懒,还没有添加简介
sq1995liu
TA很懒,还没有添加简介
haru88
TA很懒,还没有添加简介
287801813
TA很懒,还没有添加简介
ffshen
TA很懒,还没有添加简介
renhuanxi
TA很懒,还没有添加简介
erpao123
TA很懒,还没有添加简介
summber
TA很懒,还没有添加简介
dwktjyh
TA很懒,还没有添加简介
yy1992
TA很懒,还没有添加简介