qq强制聊天代码原理

来源:百度知道 编辑:UC知道 时间:2024/09/28 17:34:26
帮忙解释下这几句话 什么意思 谢谢了
Set /p num=qq:
If /I "%num%"=="n" Exit
start tencent://Message/?Uin=%num%
cls

Set /p num=qq: 设置一个变量接受QQ号码
If /I "%num%"=="n" Exit 如果接受到的是字母n 直接退出
start tencent://Message/?Uin=%num% 打开聊天窗口
cls 清屏

1.QQ强制聊天代码,把代码中的“********”星号换成想与其聊天的QQ号即可。
代码如下:http://wpa.qq.com/msgrd?V=1amp;Uin=********amp;Site=ioshenmueMenu=yes
使用方法:把代码中星号换成想与其聊天的QQ号后复制到浏览器的地址栏处即可。无论他是否是好友,无须加好友就能给对方发QQ消息。
2.
第一步:在电脑桌面上点击右键,选择“新建”→“记事本”,然后在其中输入以下代码:
ON ERROR RESUME NEXT
Dim QQ_NUM
if Wscript.arguments.count<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 = Wscript.arguments.Item(0)
end if
set ws=wscript.createobject("wscript.shell")
ws.run "