我闲着没事刷到了这个视频:https://www.bilibili.com/video/BV11fcheoEc7/
就在想能不能写一个程序自动化cha询流程
于是就有了这个程序
仅调用了精易模块
GitHub 下载:https://github.com/gytxtx/Bilibili-UID-Scanner/
蓝奏云 下载:https://wwcw.lanzoue.com/iztWn2l1n4eb
本源码各位可随意转载,使用。
非常感谢各位能看到这里!
来自 ChatGPT 的原理介绍与补充
本程序的核心功能是自动cha询 B 站用户的基本信息(包括 UID 对应的昵称、等级以及大概邮箱),并将结果以表格的形式展示出来。它支持导出cha询结果为 TXT 或 CSV 格式。
UID cha询:用户输入起始 UID 和递增数,程序会自动扫描一系列 UID 对应的 B 站信息。每个 UID 的信息包括:
昵称@qq.com
或 昵称@163.com
。cha询控制:
结果展示与导出:
超级列表框
(SuperListBox)控件呈现,用户可以查看每个 UID 对应的信息。界面与交互:
子程序_初始化报表列表框
,初始化表格的列结构。每个表格项包括 UID、昵称、等级和邮箱信息。子程序 子程序_初始化报表列表框, 超级列表框, 公开
.参数 欲修改的超级列表框, 超级列表框
欲修改的超级列表框.插入列 (-1, “序号”, 50, #左对齐, , )
欲修改的超级列表框.插入列 (-1, “UID”, 200, #左对齐, , )
欲修改的超级列表框.插入列 (-1, “昵称”, 100, #左对齐, , )
欲修改的超级列表框.插入列 (-1, “等级”, 50, #左对齐, , )
欲修改的超级列表框.插入列 (-1, “大概邮箱 (@qq.com)”, 150, #左对齐, , )
欲修改的超级列表框.插入列 (-1, “大概邮箱 (@163.com)”, 150, #左对齐, , )
子程序_开始cha询_线程
中,程序根据用户设置的起始 UID 和递增数,依次cha询多个 UID 对应的 B 站信息,并将其插入到超级列表框中。.子程序 子程序_开始cha询_线程, , 公开
.局部变量 现行UID, 长整数型
现行UID = 到长整数 (编辑框_操作区_cha询栏_起始UID.内容)
.计次循环首 (到整数 (编辑框_操作区_cha询栏_cha询次数.内容), i)
超级列表框_操作区_cha询结果_列表.插入表项 (-1, 到文本 (i), , , , )
超级列表框_操作区_cha询结果_列表.置标题 (i - 1, 1, 到文本 (到文本 (现行UID)))
超级列表框_操作区_cha询结果_列表.置标题 (i - 1, 2, B站_取昵称 (到文本 (现行UID)))
超级列表框_操作区_cha询结果_列表.置标题 (i - 1, 3, B站_取等级 (到文本 (现行UID)))
超级列表框_操作区_cha询结果_列表.置标题 (i - 1, 4, B站_取昵称 (到文本 (现行UID)) + “@qq.com”)
超级列表框_操作区_cha询结果_列表.置标题 (i - 1, 5, B站_取昵称 (到文本 (现行UID)) + “@163.com”)
现行UID = 现行UID + 到整数 (编辑框_操作区_cha询栏_UID递增数.内容)
.计次循环尾 ()
.子程序 _按钮_操作区_cha询结果_导出为纯文本_被单击, , 公开
.局部变量 局部变量_文件名, 文本型
局部变量_文件名 = 对话框_另存文件 (_启动窗口.取窗口句柄 (), , “保存 TXT 文件...”, ...)
.子程序 _按钮_操作区_cha询结果_导出为CSV_被单击, , 公开
.局部变量 局部变量_文件名, 文本型
局部变量_文件名 = 对话框_另存文件 (_启动窗口.取窗口句柄 (), , “保存 CSV 文件...”, ...)
下载与安装:
启动程序:
开始cha询:
导出结果:
阿白不爱吃菜 发表于 2025-1-16 00:29
这邮箱太多余了吧有点.就用户名+出来的
chenyucheng 发表于 2025-1-17 20:04
收起内容怎么弄出来的
欢迎光临 精易论坛 (https://125.confly.eu.org/) | Powered by Discuz! X3.4 |