admin 管理员组文章数量: 887021
2024年1月24日发(作者:veilside中文翻译)
强制聊天代码,把代码中的“********”星号换成你想与其聊天的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=yes",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强制聊天代码 内容由网友自发贡献,该文观点仅代表作者本人, 转载请联系作者并注明出处:http://www.freenas.com.cn/jishu/1706060017h500157.html, 本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容,一经查实,本站将立刻删除。
发表评论