软件简介:/ _5 N, @! H: @/ i
------------------------------------------------------------------------------------------
: g0 M2 S. ~+ o2 F 大家好,我是爱吹冷风,今天给大家做用记事本做QQ聊天器的教程o(_)o...
/ N; [* U: {* y7 i% p4 w/ O我想跟沉睡在游戏中的朋友们说:不要整天沉浸在游戏,多一分学习,多一分收获o(_)o...* p$ m9 u# `5 v d6 o6 l
------------------------------------------------------------------------------------------
' Z# r w0 m0 ?' _( s- P' u% r8 V! H工具:
, ?9 t* B: f- x* Z1.记事本' A$ ?5 A+ ~0 D$ N4 ^0 P/ O& `' i
------------------------------------------------------------------------------------------
' O' u8 b5 h2 Q9 f, g/ ? 本人技术交流群
6 |. l+ r" K3 N' h9 }. Z
' }3 R/ c9 p. X! P 总群:28053896(满)
J9 M+ W, T8 L) X6 f* Z& u. w7 d 2群:42084146" q7 w2 a, {7 b/ h6 I) v
3群:43062302
: W5 B: M$ e5 f" @) w% @ 4群:43081337 欢迎加入交流学习o(_)o...
1 b- {# s$ f; A1 Z2 a; r v$ b------------------------------------------------------------------------------------------ w% f/ l/ w$ A. \; _$ V- p7 m6 T
第一种方法:" }/ P# t' d W9 |" v8 m; o& n
ON ERROR RESUME NEXT
3 }" j$ K& o/ D, C2 p, XDim QQ_NUM # Y4 Y6 o4 \( \6 S0 S
if Wscript.arguments.count1 then 0 M" h. Q" M& e2 \: m: b
QQ_NUM=InputBox(爱吹冷风 ,QQ强行聊天器VBS版,10000)
# M3 r# e: Z3 D8 C7 G% o if QQ_NUM= then
( @- o; H; w3 n$ i0 g! Q Wscript.quit
) S6 M4 q! \# @0 t8 M end if + m/ b/ q1 J$ h! w0 a) q
else
7 d$ ]+ c$ p' P1 E$ [/ U$ _ VQQ_NUM = Wscript.arguments.Item(0)
$ Q, H, K. n7 g; k+ O6 gend if
g. S- S) U7 wset ws=wscript.createobject(wscript.shell)
2 j0 |, Q5 x" W8 ^9 O) e0 Mws.run http://wpa.qq.com/msgrd?V=1+QQ_NUM+,0& o- E5 u0 }* w- z3 D' V, p1 _
解释下上面的代码: B3 E7 u h; S2 }, }& ^# q0 k
ON ERROR RESUME NEXT 如果程序发生错误继续执行3 \6 t. t+ Y; y- G* O! I
Dim QQ_NUM 定义变量
$ [8 e/ g; f P! P. N) P% m: G( o* EInputBox界面中的内容
$ V4 K0 Q7 M2 Hif QQ_NUM= then 对话框中的内容; d) o- R1 n- [/ } i" M: k
Wscript.quit 退出脚本
) B) B& M* y6 w0 i. S8 ?2 r/ phttp://wpa.qq.com/msgrd?V=1+QQ_NUM+,0 QQ聊天临时代码
2 _: }# J! l7 ^---------------------------------------------------------------------------------------/ Q: ~; K; k- k2 k) v
第二种:# T* l1 O/ Y- X' ]! L I
@echo off9 W4 P( W' S0 q2 N
echo 爱国者黑客 http://www.3800cc.com2 }$ u0 y" _) L* `
rem 以下代码用于循环
7 Y1 T& ]; |3 V$ u* a:start
4 f5 w& Y. C, T' Yset /p a=请输入聊天的QQ号码:
, v: R5 }$ F8 s9 {5 j; y7 Kstart tencent://message/?uin=%a%( d* X* o. [7 \* z
goto start
; j+ M/ D9 l" @% d-----------------------------------------------------------------------
4 Q5 R1 Q+ Y7 w2 G第三种:3 w9 b. r. C# f* }6 R# y
@echo off( W/ Y) S7 l& O$ L! o [* ?; h
Set/p qq=请输入你想要聊天的QQ号码6 ^4 _$ y+ \- k0 [5 n- p( ~
start tencent://Message/?Uin=%qq% s5 @* ?+ t& ]9 V- ?+ b+ v3 M! l
------------------------------------------------------------------/ ]! C6 p/ { X, J4 Z5 I
第四种:
: j' I$ {* |! t1 a1 I j@echo off
, |' v' m# `2 F) ~title QQ强行聊天器 by:爱吹冷风% K: N; W7 ~ J; B7 d5 a/ M
color le
% B' b8 i8 \8 Gcls
. N2 z) {" s& ]echo ...................6 U6 C7 o; m4 c: t( k8 b" T2 G
echo . QQ强行聊天器
8 j* s. h4 a' z1 M% Wecho ...................
9 t( U3 V0 n* W! v9 Necho
- ^7 Y; O- z8 W; Recho 本程序可与任意号码聊天0 O( J" H* d- g, u
echo -请先打开QQ-
& ]* r/ |! `, V$ h" z& @* Xpause4 X* { @) ~" F- w7 k+ f4 T. T
:q
, S4 }1 j$ E3 DSet /p qq=请输入你想要聊天的QQ号码:1 a, `4 [2 u( U6 D# V, V
If/I%qq%==nExit# I/ N' o4 W3 B4 R" A y8 m
start tencent://Message/?Uin=%qq%
8 Q$ e4 {0 q7 Zpause
# U8 h5 c+ W) f9 f g$ Igoto q" I1 F; ^4 E) ]4 \ f0 p
-----------------------------------------------------------
5 {' I- G$ d6 G4 s3 F( o z1 e下载地址:
|