admin管理员组

文章数量:1530875

2024年4月6日发(作者：)

强制聊天代码，把代码中的“********”星号换成你想与其聊天的QQ号即可。

代码如下：

/msgrd?V=1amp;Uin=********amp;Site=ioshenmueMenu=yes

使用方法：把代码中星号换成你想与其聊天的QQ号后复制到浏览器的地址栏处即可。

无论他是否你的好友，你无须加他为好友就能给他发QQ消息。

2.

第一步：在电脑桌面上点击右键，选择“新建”→“记事本”，然后在其中输入以下

代码：

ON ERROR RESUME NEXT

Dim QQ_NUM

if <1 then

QQ_NUM=InputBox(""&vbCr&vbCr&"QQ强行聊天器"&vbCr&vbCr&"","QQ强

行聊天器VBS实现","输入你想要聊天的QQ号码，如：123456789")

if QQ_NUM="" then

Wscript_.quit

end if

else

VQQ_NUM = (0)

end if

set ws=object("")

"/msgrd?V=1&Uin="+QQ_NUM+"&Site=ioshenmue&Menu=y

es",0

第二步：当输入完毕之后，点击“文件”，然后选择“另存为”，选择保存名字为“QQ

强行聊天器VBS实现.vbs”（不外加引号）。保存类型为“所有文件”。这时在保存的地

方双击打开这个文件，就可以在输入的对话框中输入任意QQ聊天了。前提是你在本机上

已经打开QQ了。

说明：上面是一段VBS代码具体意思如下：

ON ERROR RESUME NEXT 如果程序发生错误继续执行

Dim QQ_NUM 定义变量

inputbox 界面中默认显示内容，大家可以修改

对话框内容 if QQ_NUM="" then 检测用户的输入是否为空，如果为空

Wscript_.quit 退出脚本

t://Message/?Menu=YES&Uin=此处替换为您的qq号码

&websiteName=

把上面那个写入你要聊天的QQ号,就是=和&之间,那些字是没有的.然后复制到地址

栏,确定就行了.不用打开任何网页.

t://Message/?Menu=YES&Uin=此处替换为您的qq号码

&websiteName=

把上面那个写入你要聊天的QQ号,就是=和&之间,那些字是没有的.然后复制到地址

栏,确定就行了.不用打开任何网页.

5.有个小技巧,在地址栏输入 “ /msgrd?Uin=加明星的QQ号 ”就能

和他聊天啦!以上QQ大多数是加不上好友的!

本文标签： 输入代码复制到选择点击

版权声明：本文标题：QQ强制聊天代码 内容由热心网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：https://m.elefans.com/dianzi/1712382888a357672.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。