qq强制聊天代码求QQ强行聊天的代码，没种语言的代码都要

求强制QQ聊天代码

自制QQ聊天工作，把下面内容保存为QQ强制聊天.bat@echo off title QQ强制聊天工具 color 0a echo. echo. echo. echo. echo. 本程序应用于与任意号码聊天，也可以用于骚扰把你加入黑名单的Q友…… echo. 有空欢迎看看最强大的QQ玩家乐园 /echo. QQ、QQ空间、QQ宠物的各种技巧，还有免费QQ表情、QQ头像下载， echo. echo. echo. echo. 请先打开QQ！！否则本程序无效！！！ echo. echo. echo. pause echo. echo. echo. echo. :a Set /p num=请输入你想要强制聊天的人的QQ号码: If /I "%num%"=="n" Exit start tencent://Message/?Uin=%num% cls echo. echo. echo. echo. echo. 点击任意键选择另一个人。

echo. echo. 有空欢迎看看最强大的QQ玩家乐园 /echo. QQ、QQ空间、QQ宠物的各种技巧，还有免费QQ表情、QQ头像下载， echo. pause echo. echo. echo. echo. Goto a

QQ强制聊天的代码（批处理文件的代码）是什么？

@echo off title QQ强制聊天工具 color 0a echo. echo. echo. echo. echo 本程序应用于与任意号码聊天,也可以用于骚扰把你加入黑名单的家伙。

。

。

。

。

。

echo. echo. echo. echo 请先打开QQ！！否则本程序无效！！！ echo. echo. echo. pause echo. echo. echo. echo. :a Set /p num=请输入你想要强制聊天的人的QQ号码: If /I "%num%"=="n" Exit start tencent://Message/?Uin=%num% cls echo. echo. echo. echo. echo 点击任意键选择另一个人。

echo. echo. pause echo. echo. echo. echo. Goto a

求QQ强行聊天的代码，没种语言的代码都要

Dim QQ_NUM if Wscript.arguments.count<1 then QQ_NUM=InputBox("by:作者 QQ：作者QQ"&vbCr&vbCr&" "&vbCr&vbCr&" ","QQ强行聊天器","默认QQ") if QQ_NUM="" then Wscript.quit end if else VQQ_NUM = Wscript.arguments.Item(0) end if set ws=wscript.createobject("wscript.shell") ws.run "/msgrd?V=1&Uin="+QQ_NUM,0 ------------------------------------------------- 的把上面的代码复制到记事本里面，保存再把文件拓展名改成VBS就可以了