下载地址：https://pan38.com/share.php?code=vAWwa 提取码：8888
易语言开发的小红书自动发布工具核心代码实现。文中将包含图文/视频上传、模拟登录、自动发布等关键功能。
开发环境准备
.版本 2
.支持库 internet
.支持库 spec
.程序集 小红书发布工具
二、核心功能模块代码
- 模拟登录模块
.子程序 小红书登录, 逻辑型
.参数 用户名, 文本型
.参数 密码, 文本型
.局部变量 返回文本, 文本型
返回文本 ＝ 到文本 (网页_访问 ("https://www.xiaohongshu.com/api/sns/login", 1,
"username=" + 用户名 + "&password=" + 密码, , , "User-Agent: Mozilla/5.0", , , , ))
返回 (寻找文本 (返回文本, "登录成功", , 假) ≠ -1)
- 图文上传模块
.子程序 上传图片, 文本型
.参数 图片路径, 文本型
.局部变量 图片数据, 字节集
.局部变量 返回数据, 文本型
图片数据 ＝ 读入文件 (图片路径)
返回数据 ＝ 到文本 (网页_上传文件 ("https://www.xiaohongshu.com/api/sns/upload",
"file=" + 图片数据, , , "User-Agent: Mozilla/5.0"))
返回 (JSON解析(返回数据, "data.url"))
- 视频发布模块
.子程序 发布视频, 逻辑型
.参数 视频路径, 文本型
.参数 描述文本, 文本型
视频ID ＝ 到文本(网页_上传文件("https://www.xiaohongshu.com/api/sns/upload/video",
"file=" + 读入文件(视频路径), , , "User-Agent: Mozilla/5.0"))
发布结果 ＝ 网页_访问("https://www.xiaohongshu.com/api/sns/post", 1,
"type=video&video_id=" + 视频ID + "&content=" + 编码_URL编码(描述文本))
返回 (寻找文本(发布结果, "success", , 假) ≠ -1)
三、完整发布流程示例
.子程序 _启动子程序, 整数型
.如果真 (小红书登录("testuser", "123456"))
图片URL ＝ 上传图片("C:\pic.jpg")
视频结果 ＝ 发布视频("D:\video.mp4", "今日分享"+图片URL)
信息框 ("发布成功！", 0, , )
.否则
信息框 ("登录失败", 0, , )
.如果结束
返回 (0)
