小红书视频作品评论用户ID提取,采集关键词工具,精易VIP模块轻松实现

发布时间 2023-11-17 12:13:30作者: 新壳软件

那么这个工具只是一个开源版,我会把源码,DLL命令,变量,都会公布出来,这样才完整,你可以直接复制去用,不像网上的一些博主就分享一个窗口的代码,用户复制发现缺少这个又缺少那个,非常麻烦,我这边分享的都是完整的哈。

实现原理是通过精易VIP助手,它使用C++开发的,直接调用谷歌浏览器官方内核,可以直接截取浏览器的数据流,只要是TCP\HTTP之类的数据都可以通过精易助手截取到,那么访问小红书连接的时间下面的作品评论肯定也是通过服务器返回的,通过VIP助手也就轻松的捕捉到了,就是这么个原理,具体咋实现的你研究代码就知道了

框架界面:

 

DLL部分:

======================================================

.版本 2

.支持库 eAPI

.DLL命令 CreateThread, 整数型, "Kernel32.dll", "CreateThread", 公开, 创建一个新的线程,创建完毕会立即返回。成功则返回新线程的句柄,零表示失败

.参数 lpThreadAttributes, 整数型, , 指向一个SECURITY_ATTRIBUTES结构,主要用来指定句柄是否可以被继承,如果让线程使用默认的安全属性,可以将此值设为 NULL

.参数 dwStackSize, 整数型, , 线程堆栈大小,如果为0,那么线程的堆栈大小和主线程使用的大小相同

.参数 lpStartAddress, 整数型, , 线程的开始执行地址,指向一个新线程函数(过程)的指针

.参数 lpParameter, 整数型, , 传递给自定义参数,传递给子线程的参数,0为无限止

.参数 dwCreationFlags, 整数型, , 设置线程被创建后的状态,如果为0表示,创建后立即运行,如果为CREATE_SUSPENDED标志,表示线程被创建后处于挂志状态,直到使用ResumeThread函数显式地启动线程为止

.参数 lpThreadId, 整数型, 传址, 指向一个双字节变量,用来接收函数返回的线程ID.线程ID在系统范围内是唯一的.

.DLL命令 localtime, 整数型, "msvcrt.dll", "@localtime"

.参数 time, 长整数型, 传址

.DLL命令 memcpy, 整数型, "msvcrt.dll", "@memcpy"

.参数 _Dst, 整数型

.参数 _Src, 整数型

.参数 _Size, 整数型

.DLL命令 PostMessageA, , "user32.dll", "PostMessageA", 公开, 投递消息

.参数 hwnd, 整数型

.参数 消息号, 整数型

.参数 消息参数1, 整数型

.参数 消息参数2, 整数型

.DLL命令 GetDlgCtrlID, 整数型, "user32.dll", "GetDlgCtrlID", 公开

.参数 hwnd, 整数型

.DLL命令 GetWindowRect, 逻辑型, "user32", "GetWindowRect"

.参数 hWnd, 整数型, , 0

.参数 lpRect, 矩形数据, , 0

.DLL命令 GetClientRect, 逻辑型, "user32", "GetClientRect"

.参数 hWnd, 整数型, , 0

.参数 lpRect, 矩形数据, , 0

.DLL命令 GetSystemMetrics, 整数型, "user32", "GetSystemMetrics"

.参数 nIndex, 整数型, , 0

.DLL命令 SendMessageA, 整数型, "user32.dll", "SendMessageA", , 将指定的消息发送到一个或多个窗口。此函数为指定的窗口调用窗口程序,直到窗口程序处理完消息再返回。而函数PostMessage不同,将一个消息寄送到一个线程的消息队列后立即返回。

.参数 hWnd, 整数型, , 其窗口程序将接收消息的窗口的句柄。

.参数 Msg, 整数型, , 指定被发送的消息。

.参数 wParam, 整数型, , 指定附加的消息特定信息。

.参数 lParam, 整数型, , 指定附加的消息特定信息。

============================================================

全局变量部分:

=========================================================

.版本 2

.支持库 ietb

.全局变量 谷歌浏览器, 谷歌填表, , , 这个代表一个浏览器, 程序销毁时释放, 一个程序最好只使用一个

.全局变量 id, 整数型

.全局变量 变量1

=========================================================

窗口程序集【全局代码】

==========================================================

.版本 2

.支持库 ietb

.支持库 spec

.支持库 iext

.支持库 eAPI

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

.程序集变量 页面, 谷歌页面

.程序集变量 ccookiesA, 文本型, , "0"

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

.局部变量 是否成功, 逻辑型

.局部变量 谷歌浏览器路径, 文本型

.局部变量 arg, 谷歌启动参数

.局部变量 ym, 谷歌页面

' 谷歌浏览器都必须初始化, 初始化1() 是简化版的初始化

谷歌浏览器路径 = “C:\Program Files\Google\Chrome Dev\Application\chrome.exe” ' 获取失败需要手动指定浏览器路径

' 谷歌浏览器路径 = 谷歌浏览器.取谷歌浏览器路径 () ' 获取失败需要手动指定浏览器路径

arg.添加参数 (“https://www.xiaohongshu.com/explore”, )

' arg.添加参数 (“www.douyin.com”, )

arg.缓存目录 = 取运行目录 () + “\例程缓存目录”

arg.调试端口 = 36125

是否成功 = 谷歌浏览器.初始化 (arg, , , 真, , , , )

.如果真 (是否成功 = 假)

信息框 (格式化文本A (“初始化失败, 错误原因 = %s”, 谷歌浏览器.取最后错误 ()), 0, , )

返回 ()

.如果真结束

输出调试文本 (“浏览器初始化成功”)

' 谷歌浏览器.置回调函数 (&连接回调, )

' 按钮_取页面.禁止 = 假

' 按钮_取页面.禁止 = 假

按钮1.禁止 = 真

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

.局部变量 页面数量, 整数型

.局部变量 cookies, 文本型

.局部变量 页面ID, 整数型, , "0"

.局部变量 i, 整数型

.局部变量 返回数据, 文本型

.局部变量 分割账号ID, 文本型, , "0"

.局部变量 返回的ck, 文本型

页面数量 = 谷歌浏览器.取标签数量 (页面ID)

调试输出 (页面数量)

.计次循环首 (页面数量, i)

页面 = 谷歌浏览器.取页面 (i, )

调试输出 (页面.取标题 ())

返回数据 = 页面.取标题 ()

返回的ck = 页面.获取Cookies (, 真)

.判断开始 (寻找文本 (返回数据, “音”, , 假) > 0)

加入成员 (ccookiesA, 返回的ck)

编辑框3.加入文本 (到文本 (i) + “@”)

.默认

.判断结束

.计次循环尾 ()

' 调试输出 (页面ID)

' 如果真 (页面数量 = 0)

' 信息框 (格式化文本A (“获取页面失败, 失败原因 = %s”, 谷歌浏览器.取最后错误 ()), 0, , )

' 返回 ()

' 页面 = 谷歌浏览器.取页面 (1, )

' 调试输出 (页面)

' 页面.附加 (页面ID [1], 真)

' ccookiesA = 页面.获取Cookies (, 真)

' 编辑框1.内容 = ccookiesA

' 页面 = 谷歌浏览器.取页面 (2, )

' 页面.附加 (页面ID [2], 真)

' ccookiesB = 页面.获取Cookies (, 真)

' 编辑框2.内容 = ccookiesB

' 调试输出 (ccookiesA)

.子程序 连接回调, 整数型, , 此回调不是在初始化线程调用, 请注意线程安全

.参数 页面ID, 整数型

.参数 事件类型, 整数型

.参数 附加参数1, 整数型

.参数 附加参数2, 整数型

.如果真 (事件类型 < 256)

返回 (0)

.如果真结束

.判断开始 (事件类型 = #谷歌事件.页面_框架停止加载)

' PostMessageA (取窗口句柄 (), #WM_COMMAND, GetDlgCtrlID (按钮_获取cookie.取窗口句柄 ()), 按钮_获取cookie.取窗口句柄 ()) ' 投递消息是为了在主线程中执行

' _按钮1_被单击 () ' 如果直接调用, 那按钮1被单击的代码就会在这个事件的线程内执行

.默认

.判断结束

返回 (0)

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

页面 = 谷歌浏览器.取页面 (1, )

页面.添加Cookies (ccookiesA [到整数 (编辑框4.内容)], 真)

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

.局部变量 分割账号, 文本型, , "0"

分割账号 = 分割文本 (编辑框3.内容, “@”, )

编辑框1.内容 = ccookiesA [到整数 (分割账号 [1])]

' 编辑框2.内容 = ccookiesA [到整数 (分割账号 [2])]

编辑框4.内容 = 分割账号 [1]

' 编辑框5.内容 = 分割账号 [2]

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

.局部变量 返回数据, 文本型

.局部变量 返回的ck, 文本型

.局部变量 文件号, 整数型

页面 = 谷歌浏览器.取页面 (1, )

调试输出 (页面.取标题 ())

返回数据 = 页面.取标题 ()

文件号 = 打开文件 (取运行目录 () + “/账号cookie.txt”, #写出, )

返回的ck = 页面.获取Cookies (, 真)

.判断开始 (寻找文本 (返回数据, “抖音”, , 假) > 0)

加入成员 (ccookiesA, 返回的ck)

信息框 (“coolie加入成功”, 0, , )

移到文件尾 (文件号)

写出文本 (文件号, 返回的ck + “----------”)

关闭文件 (文件号)

调试输出 (ccookiesA)

标签2.标题 = 到文本 (取数组成员数 (ccookiesA))

id = id + 1

调试输出 (id)

超级列表框1.插入表项 (id - 1, “”, , , , )

超级列表框1.置标题 (id - 1, 0, 到文本 (id))

超级列表框1.置标题 (id - 1, 1, 返回的ck)

.默认

.判断结束

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

页面 = 谷歌浏览器.取页面 (1, )

页面.清除Cookie ()

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

.局部变量 数量, 整数型

.局部变量 a, 整数型

.局部变量 发送id, 文本型, , "0"

.局部变量 登录情况, 逻辑型

.局部变量 z, 整数型

.局部变量 cookieAAA, 文本型

.局部变量 记录id, 整数型

.局部变量 分组ck, 文本型, , "0"

.局部变量 当前ck, 文本型

_启动窗口.位置 = 2

发送id = 分割文本 (编辑框5.内容, #换行符, )

页面 = 谷歌浏览器.取页面 (1, )

' 登录情况 = 页面.添加Cookies (ccookiesA [到整数 (编辑框4.内容)], 真)

记录id = 1

cookieAAA = 到文本 (读入文件 (取运行目录 () + “/账号cookie.txt”))

调试输出 (cookieAAA)

分组ck = 分割文本 (cookieAAA, “----------”, )

_启动窗口.标题 = “登录成功”

.计次循环首 (取数组成员数 (分组ck), a)

调试输出 (取数组成员数 (分组ck))

当前ck = 分组ck [a]

页面 = 谷歌浏览器.取页面 (1, )

登录情况 = 页面.添加Cookies (当前ck, 真)

.判断开始 (登录情况 = 真)

_启动窗口.标题 = “登录成功了”

延迟 (1000)

.计次循环首 (取数组成员数 (发送id) ÷ 取数组成员数 (分组ck), z)

记录id = 记录id + 1

标签6.标题 = 到文本 (记录id)

页面.浏览网页 (“https://www.douyin.com/user/” + 发送id [记录id], 真)

延迟 (3000)

_按钮6_被单击 ()

延迟 (2000)

.计次循环尾 ()

.默认

.判断结束

.计次循环尾 ()

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

.局部变量 搜索框, 网页元素

.局部变量 按钮, 网页元素, , "0"

.局部变量 a, 整数型

.局部变量 源码, 文本型

.局部变量 v, 整数型

.局部变量 私信源码, 网页元素, , "0"

.局部变量 g, 整数型

.局部变量 源码B, 文本型

.局部变量 话术, 文本型, , "0"

话术 = 分割文本 (编辑框2.内容, #换行符, )

.判断开始 (单选框2.选中 = 真)

.计次循环首 (10, g)

模拟鼠标点击 (1707, 265, ) ' 点击私信

延迟 (500)

.计次循环尾 ()

延迟 (2000)

' 模拟鼠标点击 (757, 212, )'点击第一条

延迟 (1000)

模拟鼠标点击 (1451, 777, )

延迟 (1000)

置剪辑板文本 (话术 [取随机数 (1, 取数组成员数 (话术))])

模拟按键 (#Ctrl键, #V键, )

延迟 (1000)

模拟按键 (#回车键, , )

.判断 (单选框1.选中 = 真)

延迟 (3000)

延迟 (3000)

模拟鼠标点击 (1062, 261, )

模拟鼠标点击 (1062, 261, )

.计次循环首 (10, g)

模拟鼠标点击 (1165, 261, ) ' 点击私信

延迟 (500)

.计次循环尾 ()

延迟 (2000)

' 模拟鼠标点击 (757, 212, )'点击第一条

延迟 (1000)

模拟鼠标点击 (951, 629, )

延迟 (1000)

置剪辑板文本 (话术 [取随机数 (1, 取数组成员数 (话术))])

模拟按键 (#Ctrl键, #V键, )

延迟 (1000)

模拟按键 (#回车键, , )

.默认

.判断结束

' 搜索框 = 页面.元素_取对象 (编辑框3.内容, , ) ' 选择器方式

' 调试输出 (搜索框.取内容 ())

' 调试输出 (搜索框.取网页源码W ())

' 页面.清除Cookie ()

.子程序 _分组框6_鼠标左键被按下, 逻辑型

.参数 横向位置, 整数型

.参数 纵向位置, 整数型

.参数 功能键状态, 整数型

.子程序 __启动窗口_创建完毕

.局部变量 cookieAAA, 文本型

.局部变量 分组ck, 文本型, , "0"

.局部变量 文件奥

.判断开始 (文件是否存在 (取运行目录 () + “/账号cookie.txt”) = 真)

_启动窗口.标题 = “cookie文件存在”

cookieAAA = 到文本 (读入文件 (取运行目录 () + “/账号cookie.txt”))

分组ck = 分割文本 (cookieAAA, “----------”, )

调试输出 (cookieAAA)

标签2.标题 = 到文本 (取数组成员数 (分组ck))

.默认

写到文件 (取运行目录 () + “/账号cookie.txt”, 到字节集 (“”))

.判断结束

.子程序 _分组框1_鼠标左键被按下, 逻辑型

.参数 横向位置, 整数型

.参数 纵向位置, 整数型

.参数 功能键状态, 整数型

id = 0

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

.局部变量 cookie, 文本型

页面 = 谷歌浏览器.取页面 (1, )

cookie = 编辑框1.内容

页面.添加Cookies (cookie, 真)

==========================================================