微信wxid转换二维码微信号加好友工具，自动批量转码器免费分享，开源版哈收藏！

标签：bf socket 微信 局部变量 msg 版哈 码器 Msg wxid

wxid估计很多小伙伴都知道，就是属于那种没有设置了微信号的账号，它没有设置自己的微信号或者就显示了默认的ID值，这个ID值你是没办法通过微信的好友添加框去添加的，但是有一种办法可以实现这种效果，只需要用软件，安卓手机或者电脑都可以我这里分享的是电脑的源码，目前是2023年11月20号，这个还是非常稳定的，网上这个是收费的，我这里直接免费开源分享。

UI界面：

 

 

然后下面是我测试的一个没有设置了微信号的账号，就是只有WXID，看我怎么去加它【图片仅供演示用哈！】

 

 

没有设置微信号

然后我用工具转换的，可以直接加对方为好友，进入到对方的主页里面能正常的去加好友的。

 

 

进入到了对方主页

易语言程序集代码：

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

.版本 2

.支持库 iext

.支持库 spec

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

.程序集变量 m_hServer, 整数型

.程序集变量 m_FriendList, UserData, , "0"

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

置现行时间 (到时间 (“2017年7月15日” ＋ 时间_到文本 (, , 3)))

ETCP初始化 (&ServerCallBack)

m_hServer ＝ 服务端创建 (9091, 真, “127.0.0.1”)

.如果真 (m_hServer ＝ 0)

MessageBox (0, “CreateServer [127.0.0.1:9091]”, “error”, 0)

结束 ()

.如果真结束

.如果真 (服务端取端口 (m_hServer) ≠ 9091)

MessageBox (0, “Port ≠ 9091”, “error”, 0)

结束 ()

.如果真结束

编辑框_微信目录.内容 ＝ 取文本注册项 (#现行用户, “Software\Tencent\WeChat\InstallPath”, )

.子程序 ServerCallBack

.参数 hServer, 整数型

.参数 socket, 整数型

.参数 Type, 整数型

.参数 Packet, 整数型

.参数 Len, 整数型

.参数 num, 整数型

.局部变量 bf, ByteBuffer

.局部变量 Msg, WeChatMsg

.局部变量 Friend, UserData

.局部变量 My, MyData

.局部变量 Bin, 字节集

.局部变量 PreFix, 字节型

.局部变量 wxid, 文本型

.局部变量 v1, 文本型

.局部变量 v2, 文本型

.局部变量 nickname, 文本型

.局部变量 i, 整数型

.局部变量 o, 整数型

.局部变量 n, 整数型

.如果真 (Type ＝ #etcp_Close)

.计次循环首 (微信号列表.取表项数 (), i)

.如果真 (微信号列表.取表项数值 (i － 1) ＝ socket)

微信号列表.删除表项 (i － 1)

跳出循环 ()

.如果真结束

.计次循环尾 ()

调试输出 (“客户离开”)

.如果真结束

.如果真 (Type ＝ #etcp_Accept)

调试输出 (“客户进入”)

.如果真结束

.如果真 (Type ＝ #etcp_Recv)

Bin ＝ 通用取数据 (Packet, Len)

bf.ByteBuffer (Bin)

PreFix ＝ bf.GetByte ()

.判断开始 (PreFix ＝ 0)

wxid ＝ UnicodeToAnsi (bf.GetToken ())

log (“[初始化完毕] wxd:” ＋ wxid) ' 不可用

.判断 (PreFix ＝ 1) ' 收到自己信息

My.Name ＝ UnicodeToAnsi (bf.GetToken ())

My.User ＝ UnicodeToAnsi (bf.GetToken ())

My.Wxid ＝ UnicodeToAnsi (bf.GetToken ())

My.Phone ＝ UnicodeToAnsi (bf.GetToken ())

i ＝ 微信号列表.插入表项 (, , , , , socket)

微信号列表.置标题 (i, 0, My.Name)

微信号列表.置标题 (i, 1, My.Wxid)

log (“[my] name:” ＋ My.Name ＋ “ Wxid:” ＋ My.Wxid)

.判断 (PreFix ＝ 2) ' 收到好友信息 没用 删掉了

.判断 (PreFix ＝ 4)

wxid ＝ UnicodeToAnsi (bf.GetToken ()) ' 账号的wxid 多进程时判断是哪个微信的好友列表

wxid ＝ UnicodeToAnsi (bf.GetToken ()) ' 群wxid 判断是哪个群的用户列表

n ＝ bf.GetInt ()

.计次循环首 (n, i)

.如果真 (bf.GetInt () ＝ 0)

跳出循环 ()

.如果真结束

Friend.Name ＝ UnicodeToAnsi (bf.GetToken ())

Friend.User ＝ UnicodeToAnsi (bf.GetToken ())

Friend.Wxid ＝ UnicodeToAnsi (bf.GetToken ())

Friend.V1 ＝ UnicodeToAnsi (bf.GetToken ())

Friend.Note ＝ UnicodeToAnsi (bf.GetToken ())

o ＝ 群成员列表框.插入表项 (, , , , , )

群成员列表框.置标题 (o, 0, 到文本 (i))

群成员列表框.置标题 (o, 1, Friend.Name)

群成员列表框.置标题 (o, 2, Friend.Wxid)

.计次循环尾 ()

.判断 (PreFix ＝ 5) ' 好友列表

wxid ＝ UnicodeToAnsi (bf.GetToken ()) ' 是哪个账号的好友列表 多进程时判断是哪个微信的好友列表

n ＝ bf.GetInt ()

.计次循环首 (n, i)

.如果真 (bf.GetInt () ＝ 0)

跳出循环 ()

.如果真结束

Friend.Name ＝ UnicodeToAnsi (bf.GetToken ())

Friend.User ＝ UnicodeToAnsi (bf.GetToken ())

Friend.Wxid ＝ UnicodeToAnsi (bf.GetToken ())

Friend.V1 ＝ UnicodeToAnsi (bf.GetToken ())

Friend.Note ＝ UnicodeToAnsi (bf.GetToken ())

.判断开始 (寻找文本 (Friend.Wxid, “@chatroom”, , 假) ＝ -1)

o ＝ 好友列表框.插入表项 (, , , , , socket)

好友列表框.置标题 (o, 0, Friend.Name)

好友列表框.置标题 (o, 1, Friend.Note)

好友列表框.置标题 (o, 2, Friend.User)

好友列表框.置标题 (o, 3, Friend.Wxid)

好友列表框.置标题 (o, 4, Friend.V1)

.默认

o ＝ 群列表框.插入表项 (, , , , , socket)

群列表框.置标题 (o, 0, Friend.Name)

群列表框.置标题 (o, 1, Friend.Wxid)

.判断结束

.计次循环尾 ()

.判断 (PreFix ＝ 3) ' 收到消息

wxid ＝ UnicodeToAnsi (bf.GetToken ()) ' 用来判断该消息来自哪个微信

Msg.Type ＝ bf.GetInt ()

Msg.Wxid ＝ UnicodeToAnsi (bf.GetToken ()) ' 发信人

Msg.Msg ＝ UnicodeToAnsi (bf.GetToken ())

.判断开始 (Msg.Type ＝ 1)

log (“[msg 文字] 发信人:” ＋ Msg.Wxid ＋ “ 信息:” ＋ Msg.Msg)

.判断 (Msg.Type ＝ 3)

log (“[msg 图片] 发信人:” ＋ Msg.Wxid ＋ “ 信息:” ＋ Msg.Msg)

.判断 (Msg.Type ＝ 34)

log (“[msg 语音] 发信人:” ＋ Msg.Wxid ＋ “ 信息:” ＋ Msg.Msg)

.判断 (Msg.Type ＝ 42)

log (“[msg 名片] 发信人:” ＋ Msg.Wxid ＋ “ 信息:” ＋ Msg.Msg)

.判断 (Msg.Type ＝ 43)

log (“[msg 小视频] 发信人:” ＋ Msg.Wxid ＋ “ 信息:” ＋ Msg.Msg)

.判断 (Msg.Type ＝ 49)

log (“[msg 邀请进群] 发信人:” ＋ Msg.Wxid ＋ “ 信息:” ＋ Msg.Msg)

.判断 (Msg.Type ＝ 10000)

.判断开始 (寻找文本 (Msg.Msg, “现在可以开始聊天了”, , 假) ≠ -1)

log (“[msg 添加好友成功] wxid:” ＋ Msg.Wxid ＋ “ 信息:” ＋ Msg.Msg)

.判断 (寻找文本 (Msg.Msg, “去了群聊”, , 假) ≠ -1)

log (“[msg 加群信息] wxid:” ＋ Msg.Wxid ＋ “ 信息:” ＋ Msg.Msg)

.默认

log (“[msg 10000] wxid:” ＋ Msg.Wxid ＋ “ 信息:” ＋ Msg.Msg)

.判断结束

.判断 (Msg.Type ＝ 37 且 Msg.Wxid ＝ “fmessage”)

wxid ＝ 取文本中间内容 (Msg.Msg, “fromusername=#引号”, “#引号 ”)

v1 ＝ 取文本中间内容 (Msg.Msg, “encryptusername=#引号”, “#引号 ”)

v2 ＝ 取文本中间内容 (Msg.Msg, “ticket=#引号”, “#引号 ”)

nickname ＝ 取文本中间内容 (Msg.Msg, “fromnickname=#引号”, “#引号 ”)

log (“[msg 有人加好友]” ＋ nickname ＋ “ ” ＋ v2 ＋ “ ” ＋ v1)

.如果真 (选择框_同意好友.选中 ＝ 真)

AcceptFriend (socket, AnsiToUnicode (v1), 到字节集 (v2))

.如果真结束

.判断 (Msg.Type ＝ 51)

' 过滤信息

.默认

log (“[Msg] type:” ＋ 到文本 (Msg.Type) ＋ “ wxid:” ＋ Msg.Wxid ＋ “ msg:” ＋ Msg.Msg)

.判断结束

.默认

log (“未知包头:” ＋ 到文本 (PreFix))

.判断结束

.如果真结束

.子程序 log

.参数 str, 文本型

编辑框_Log.加入文本 (str ＋ #换行符)

.子程序 SendWeChatMessage

.参数 socket, 整数型

.参数 wxid, 字节集

.参数 type, 整数型, , 1=发送文本 2=发送图片 3=发送文件

.参数 msg, 字节集

.局部变量 bf, ByteBuffer

置入代码 (#VmProtectBegin)

bf.CreateBuffer (_add2 (20, 取字节集长度 (wxid), 取字节集长度 (msg)))

bf.SetByte (1) ' 发送消息

bf.SetToken (wxid)

bf.SetInt (type)

bf.SetToken (msg)

ServerSendPack (socket, bf.GetBuffer ())

置入代码 (#VmProtectEnd)

.子程序 AddFriend

.参数 socket, 整数型

.参数 wxid, 字节集, , 微信id或v1

.参数 msg, 字节集, , 我是xxxx

.参数 type, 整数型, , 来源

.局部变量 bf, ByteBuffer

置入代码 (#VmProtectBegin)

bf.CreateBuffer (_add2 (20, 取字节集长度 (wxid), 取字节集长度 (msg)))

bf.SetByte (2) ' 添加好友

bf.SetToken (wxid)

bf.SetToken (msg)

bf.SetInt (type)

ServerSendPack (socket, bf.GetBuffer ())

置入代码 (#VmProtectEnd)

.子程序 AcceptFriend

.参数 socket, 整数型

.参数 v1, 字节集

.参数 v2, 字节集

.局部变量 bf, ByteBuffer

置入代码 (#VmProtectBegin)

bf.CreateBuffer (_add2 (10, 取字节集长度 (v1), 取字节集长度 (v2)))

bf.SetByte (3) ' 同意好友申请

bf.SetToken (v1)

bf.SetToken (v2)

ServerSendPack (socket, bf.GetBuffer ())

置入代码 (#VmProtectEnd)

.子程序 Room_DeleteUser, , , 群踢人

.参数 socket, 整数型

.参数 chatroom, 字节集

.参数 wxid, 字节集

.局部变量 bf, ByteBuffer

置入代码 (#VmProtectBegin)

bf.CreateBuffer (_add2 (10, 取字节集长度 (wxid), 取字节集长度 (chatroom)))

bf.SetByte (6) ' 群踢人

bf.SetToken (chatroom)

bf.SetToken (wxid)

ServerSendPack (socket, bf.GetBuffer ())

置入代码 (#VmProtectEnd)

.子程序 Room_AddUser, , , 拉人进群

.参数 socket, 整数型

.参数 chatroom, 字节集

.参数 wxid, 字节集

.参数 type, 整数型, , 0=直接拉 适合40人以下群 其他=发链接拉人

.局部变量 bf, ByteBuffer

置入代码 (#VmProtectBegin)

bf.CreateBuffer (_add2 (10, 取字节集长度 (wxid), 取字节集长度 (chatroom)))

bf.SetByte (7) ' 邀请

bf.SetToken (chatroom)

bf.SetToken (wxid)

bf.SetInt (type)

ServerSendPack (socket, bf.GetBuffer ())

置入代码 (#VmProtectEnd)

.子程序 Room_SendAnnouncement, , , 发群公告

.参数 socket, 整数型

.参数 chatroom, 字节集

.参数 msg, 字节集

.局部变量 bf, ByteBuffer

置入代码 (#VmProtectBegin)

bf.CreateBuffer (_add2 (10, 取字节集长度 (chatroom), 取字节集长度 (msg)))

bf.SetByte (8)

bf.SetToken (chatroom)

bf.SetToken (msg)

ServerSendPack (socket, bf.GetBuffer ())

置入代码 (#VmProtectEnd)

.子程序 Room_GetUserAll, , , 取群成员列表

.参数 socket, 整数型

.参数 wxid, 字节集, , 微信id或v1

.局部变量 bf, ByteBuffer

置入代码 (#VmProtectBegin)

bf.CreateBuffer (_add (10, 取字节集长度 (wxid)))

bf.SetByte (9) ' 取群成员

bf.SetToken (wxid)

ServerSendPack (socket, bf.GetBuffer ())

置入代码 (#VmProtectEnd)

.子程序 GetFriendList, , , 取好友列表

.参数 socket, 整数型

.局部变量 bf, ByteBuffer

置入代码 (#VmProtectBegin)

bf.CreateBuffer (1)

bf.SetByte (10) ' 取好友列表

ServerSendPack (socket, bf.GetBuffer ())

置入代码 (#VmProtectEnd)

.子程序 SendWeChatMgrEx, , , 发送消息Ex 可发送名片

.参数 socket, 整数型

.参数 wxid, 字节集

.参数 msg, 字节集

.参数 atwxid, 字节集

.参数 type, 整数型

.局部变量 bf, ByteBuffer

置入代码 (#VmProtectBegin)

bf.CreateBuffer (_add2 (100, 取字节集长度 (wxid), 取字节集长度 (msg)))

bf.SetByte (5)

bf.SetToken (wxid)

bf.SetToken (msg)

bf.SetToken (atwxid)

bf.SetInt (type)

ServerSendPack (socket, bf.GetBuffer ())

置入代码 (#VmProtectEnd)

.子程序 SendWeChatMgrHttp, , , 发送消息http 可发送链接

.参数 socket, 整数型

.参数 wxid, 字节集

.参数 msg, 字节集

.参数 type, 整数型

.局部变量 bf, ByteBuffer

置入代码 (#VmProtectBegin)

bf.CreateBuffer (_add2 (10, 取字节集长度 (wxid), 取字节集长度 (msg)))

bf.SetByte (4)

bf.SetToken (wxid)

bf.SetToken (msg)

bf.SetInt (type)

ServerSendPack (socket, bf.GetBuffer ())

置入代码 (#VmProtectEnd)

.子程序 ServerSendPack, 逻辑型

.参数 socket, 整数型

.参数 Bin, 字节集

.局部变量 ret, 字节集

.如果真 (m_hServer ＝ 0 或 socket ＝ 0)

返回 (假)

.如果真结束

公共_RC4 (Bin, ret, { 109, 117, 122, 105, 103, 97, 105, 121, 117 })

返回 (服务端发送 (m_hServer, socket, ret))

.子程序 _按钮_发送好友申请_被单击

.局部变量 wxid, 文本型

wxid ＝ 编辑框_添加好友wxid.内容

.如果真 (wxid ≠ “”)

AddFriend (g_socket, AnsiToUnicode (wxid), AnsiToUnicode (编辑框_附加消息.内容), 到整数 (编辑框_加人来源.内容))

.如果真结束

.子程序 __启动窗口_将被销毁

置现行时间 (取北京时间 ())

.子程序 取北京时间, 日期时间型

.局部变量 s, 文本型

.局部变量 t, 整数型

.局部变量 time, 日期时间型

网页_访问_对象 (“http://www.baidu.com/”, 2, , , , , s, , , )

s ＝ 文本_取出中间文本 (s, “Date: ”, “GMT”) ＋ “GMT”

time ＝ 增减时间 (时间_GMT转为时间 (s), #小时, 8)

返回 (time)

.子程序 _按钮_发送消息_被单击

.局部变量 wxid, 文本型

.局部变量 type, 整数型

.局部变量 msg, 文本型

wxid ＝ 编辑框_发送消息wxid.内容

msg ＝ 子文本替换 (编辑框_msg.内容, #HHF, #HHF, , , 真)

.判断开始 (单选框1.选中 ＝ 真)

type ＝ 1 ' 文本

.判断 (单选框2.选中 ＝ 真)

type ＝ 2 ' 图片

.默认

type ＝ 3 ' 文件

.判断结束

.如果真 (wxid ≠ “” 且 msg ≠ “”)

SendWeChatMessage (g_socket, AnsiToUnicode (wxid), type, AnsiToUnicode (msg))

.如果真结束

.子程序 _按钮_启动微信_被单击

.局部变量 lpStartupInfo, STARTUPINFO

.局部变量 lpProcessInformation, PROCESS_INFORMATION

.局部变量 Path, 文本型

.局部变量 File, 文本型

.局部变量 Dll, 文本型

File ＝ 读环境变量 (“appdata”) ＋ “\Tencent\WeChat\All Users\config\configEx.ini”

写配置项 (File, “Update”, “CrashCnt”, “0”)

Dll ＝ 取运行目录 () ＋ “\WeChatHook.dll”

Path ＝ 编辑框_微信目录.内容

File ＝ Path ＋ “\WeChat.exe”

CreateProcessA (File, File, 0, 0, 0, 4, 0, Path, lpStartupInfo, lpProcessInformation)

.如果真 (lpProcessInformation.dwProcessId ＝ 0)

返回 ()

.如果真结束

injectDll (lpProcessInformation.hProcess, lpProcessInformation.hThread, Dll)

ZwResumeProcess (lpProcessInformation.hProcess)

CloseHandle (lpProcessInformation.hProcess)

CloseHandle (lpProcessInformation.hThread)

.子程序 _微信号列表_左键单击表项

.局部变量 socket, 整数型

.局部变量 索引, 整数型

.局部变量 i, 整数型

.局部变量 o, 整数型

索引 ＝ 微信号列表.现行选中项

socket ＝ 微信号列表.取表项数值 (索引)

.如果真 (socket ＝ 0)

返回 ()

.如果真结束

好友列表框.全部删除 ()

群列表框.全部删除 ()

g_socket ＝ socket

g_wxid ＝ 微信号列表.取标题 (索引, 1)

连续赋值 (假, 分组框1.禁止, 分组框2.禁止, 分组框3.禁止)

' 分组框1.标题 ＝ “目前操作账号:” ＋ 微信号列表.取标题 (索引, 0)

好友列表框.全部删除 ()

群列表框.全部删除 ()

GetFriendList (g_socket)

.子程序 _群列表框_左键单击表项

.局部变量 socket, 整数型

.局部变量 索引, 整数型

.局部变量 i, 整数型

.局部变量 o, 整数型

索引 ＝ 群列表框.现行选中项

socket ＝ 群列表框.取表项数值 (索引)

.如果真 (socket ＝ 0)

返回 ()

.如果真结束

编辑框_群号.内容 ＝ 群列表框.取标题 (索引, 1)

编辑框_发送消息wxid.内容 ＝ 群列表框.取标题 (索引, 1)

群成员列表框.全部删除 ()

Room_GetUserAll (socket, AnsiToUnicode (群列表框.取标题 (索引, 1)))

.子程序 _按钮_邀请进群_被单击

Room_AddUser (g_socket, AnsiToUnicode (编辑框_群号.内容), AnsiToUnicode (编辑框_群操作wxid.内容), 1)

.子程序 _按钮_群踢人_被单击

Room_DeleteUser (g_socket, AnsiToUnicode (编辑框_群号.内容), AnsiToUnicode (编辑框_群操作wxid.内容))

.子程序 _按钮_群发公告_被单击

Room_SendAnnouncement (g_socket, AnsiToUnicode (编辑框_群号.内容), AnsiToUnicode (编辑框_群操作wxid.内容))

.子程序 _按钮_发送名片_被单击

.局部变量 wxid, 文本型

.局部变量 名片, 文本型

wxid ＝ 编辑框_发送消息wxid.内容

名片 ＝ 子文本替换 (#名片, “**”, g_wxid, , , 真)

名片 ＝ 子文本替换 (名片, “我不想装B”, 编辑框1.内容, , , 真)

SendWeChatMgrEx (g_socket, AnsiToUnicode (wxid), AnsiToUnicode (名片), { }, 42)

.子程序 _按钮_发送链接_被单击

.局部变量 wxid, 文本型

.局部变量 链接, 文本型

wxid ＝ 编辑框_发送消息wxid.内容

链接 ＝ 子文本替换 (#链接, “**”, g_wxid, , , 真)

链接 ＝ 子文本替换 (链接, “专注PC微信各种操作！”, 编辑框2.内容, , , 真)

链接 ＝ 子文本替换 (链接, “这不是吹B”, 编辑框3.内容, , , 真)

链接 ＝ 子文本替换 (链接, “https://www.baidu.com/s?wd=%E6%88%91%E5%A6%BB%E7%94%B1%E8%89%AF”, 编辑框4.内容, , , 真)

链接 ＝ 子文本替换 (链接, “https://imgsa.baidu.com/forum/w%3D580/sign=4af80a3b6863f6241c5d390bb745eb32/64495159252dd42a90d380a9003b5bb5c8eab8ba.jpg”, 编辑框5.内容, , , 真)

SendWeChatMgrHttp (g_socket, AnsiToUnicode (wxid), AnsiToUnicode (链接), 5)

.子程序 _按钮_at_被单击

.局部变量 wxid, 文本型

.局部变量 msg, 文本型

.局部变量 atwxid, 文本型

wxid ＝ 编辑框_群号.内容

atwxid ＝ 编辑框_群操作wxid.内容

msg ＝ 编辑框_GroupMsg.内容

SendWeChatMgrEx (g_socket, AnsiToUnicode (wxid), AnsiToUnicode (msg), AnsiToUnicode (atwxid), 1)

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

.局部变量 i, 整数型

.局部变量 wxid, 文本型

.局部变量 type, 整数型

.局部变量 msg, 文本型

.计次循环首 (好友列表框.取表项数 (), i)

wxid ＝ 好友列表框.取标题 (i － 1, 3)

msg ＝ 子文本替换 (编辑框_msg.内容, #HHF, #HHF, , , 真)

.判断开始 (单选框1.选中 ＝ 真)

type ＝ 1 ' 文本

.判断 (单选框2.选中 ＝ 真)

type ＝ 2 ' 图片

.默认

type ＝ 3 ' 文件

.判断结束

.如果真 (wxid ≠ “” 且 msg ≠ “”)

SendWeChatMessage (g_socket, AnsiToUnicode (wxid), type, AnsiToUnicode (msg))

.如果真结束

.计次循环尾 ()

.子程序 _好友列表框_左键单击表项

.如果真 (好友列表框.现行选中项 ＝ -1)

返回 ()

.如果真结束

编辑框_发送消息wxid.内容 ＝ 好友列表框.取标题 (好友列表框.现行选中项, 3)

.子程序 _群成员列表框_左键单击表项

.如果真 (群成员列表框.现行选中项 ＝ -1)

返回 ()

.如果真结束

编辑框_群操作wxid.内容 ＝ 群成员列表框.取标题 (群成员列表框.现行选中项, 2)

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

标签：bf,socket,微信,局部变量,msg,版哈,码器,Msg,wxid
From： https://www.cnblogs.com/javakji/p/17843436.html