下载地址：https://www.pan38.com/share.php?code=pvvmX 提取码：8888
在小红书私信有限制的，一天只能发10条真的非常的麻烦，那么如何解决这个问题呢，你需要的是用这种专业的第三方私信群发软件，这种软件的好处就是可以让你突破官方的私信数量限制，自己想发多少就能发多少，真的是好用到爆炸，哈哈，具体怎么用，只需要下载这款小红书私信插件即可。
源码部分：
'创建布局名称
Dim 布局名称,点击坐标,话术,分割话术,随机值,文本,id
布局名称 = "小红书自动收藏脚本v1.1"
'创建一个名称为布局名称的布局控件
TracePrint UI.Newlayout (布局名称)
'添加一个名称为"输入框1"，初始内容为"请在此输入内容"的文本框控件
TracePrint UI.AddEditText(布局名称, "输入框1", "我们是卖货的商家，需要找你们合作。#能合作吗我们是卖货的商家，需要找你们合作。")
'显示名称为：布局名称 的布局控件
TracePrint UI.NewRow(布局名称, "newrow" )
'创建一个名称为"按钮1"，标题为:"点我初始化"的按钮控件
TracePrint UI.AddButton(布局名称, "按钮1", "点我初始化数据")
'创建一个名称为"按钮1"，标题为:"全自动打招呼"的按钮控件
TracePrint UI.AddButton(布局名称, "按钮2", "全自动后台打招呼")
'设置名称为"按钮1"的控件的控件点击事件
TracePrint UI.SetOnClick("按钮1", 点我初始化)
TracePrint UI.SetOnClick("按钮2", 全自动搜索私信)
TracePrint UI.Show (布局名称)
Function 全自动搜索私信()
UI.Close (布局名称)
End Function
'创建一个初始化处理函数
Function 点我初始化()
话术=UI.GetText("输入框1")
分割话术=Split(话术,"#")
TracePrint 话术
TracePrint 分割话术(1)
End Function
For i = 1 To 3
'搜索红心，并点头像
Dim intX,intY
FindPic 0,0,0,0,"Attachment:红新.png","000000",0,0.9,intX,intY
If intX > -1 And intY > -1 Then
TracePrint intX
TracePrint intY
Tap intX, intY
Delay 200
Tap intX - 617, intY
Delay 2000
Dim intX1,intY1
FindPic 0,0,0,0,"Attachment:关注.png","000000",0,0.9,intX1,intY1
i = intX1
If i > 1 Then
Tap 650, 498
Delay 1000
Tap 172, 1130
Delay 1000
InputText 分割话术(1)
Delay 1000
Tap 654,1127
KeyPress "Back"
Delay 300
KeyPress "Back"
Delay 300
KeyPress "Back"
Delay 300
Swipe 458,613, 477,451,500
End If
Swipe 458,613, 477,451,500
End If
'搜索红心，并点头像结束
Next
