抖音评论采集提取工具，易语言实现，一键完整提取【仅供学习参考】

.版本 2
.支持库 EThread
.支持库 iext

.程序集 窗口程序集_启动窗口

.子程序 _按钮1_被单击


启动线程 (&Work, , )

.子程序 Work
.局部变量 Str, 文本型
.局部变量 p_num, 文本型
.局部变量 json, 类_json
.局部变量 r_id, 文本型
.局部变量 i, 整数型
.局部变量 a, 整数型
.局部变量 n, 整数型


超级列表框1.全部删除 ()

r_id ＝ 文本区分_只取数字 (编辑框1.内容)


.计次循环首 (到整数 (编辑框2.内容), i)

    Str ＝ UTF8到文本 (网页_访问_对象 (“https://www.douyin.com/aweme/v1/web/comment/list/?device_platform=webapp&aid=6383&channel=channel_pc_web&aweme_id=” ＋ r_id ＋ “&cursor=” ＋ 到文本 (i － 1) ＋ “&count=50&item_type=0&rcFT=&pc_client_type=1&version_code=170400&version_name=17.4.0&cookie_enabled=true&screen_width=1920&screen_height=1080&browser_language=zh-CN&browser_platform=Win32&browser_name=Chrome&browser_version=95.0.4638.69&browser_online=true&engine_name=Blink&engine_version=95.0.4638.69&os_name=Windows&os_version=10&cpu_core_num=12&device_memory=8&platform=PC&downlink=10&effective_type=4g&round_trip_time=50&webid=&msToken=&X-Bogus=”, , , “1”, , “User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36” ＋ #换行符 ＋ “referer: https://www.douyin.com/video/”, ))
    ' 调试输出 (Str)
    json.解析 (Str)

    p_num ＝ json.取通用属性 (“total”)
    标签2.标题 ＝ “共有评论：” ＋ p_num


    .计次循环首 (json.成员数 (“comments”), n)
        a ＝ 超级列表框1.插入表项 (, 到文本 (超级列表框1.取表项数 () ＋ 1), , , , )
        超级列表框1.保证显示 (a)
        超级列表框1.置标题 (a, 1, json.取通用属性 (“comments[” ＋ 到文本 (n － 1) ＋ “].user.nickname”))
        超级列表框1.置标题 (a, 2, json.取通用属性 (“comments[” ＋ 到文本 (n － 1) ＋ “].text”))
        超级列表框1.置标题 (a, 3, json.取通用属性 (“comments[” ＋ 到文本 (n － 1) ＋ “].user.uid”))

    .计次循环尾 ()


.计次循环尾 ()