批量3G挂Q工具 [JS版]

乱码

[视频教程]《批量3G挂Q工具 [JS版]》的使用
http://www.52pojie.cn/thread-153758-1-1.html
教程已发，不会用的同学可以看一下...

记得很久以前我写了篇《VBS脚本之3GQQ无需密码登录 [POST方式 源码》
http://www.52pojie.cn/thread-146578-1-1.html
里面用到的是 SID 来挂QQ的，这里就不再重复讲什么是SID和如何提取了。
SID的获取方法请参考这篇文章。。

发现吾爱里有很多所谓挂Q的东西，有些是PHP写的网站，实现永久脱机挂Q，
有些用自己的服务器为你们永久脱机挂Q，其实原理都是一样，就是用服务器来帮我们挂Q、
但是用人家的软件挂自己的Q，虽说有密保，问题不大，但是你都已经在他的服务器里登录了，
比如有10000人在我的网站挂Q，我完全可以用这10000个已经登录的Q做点什么赚点小外快不是么。

所以归根结底本机的才是最安全放心的。用自己电脑，或者自己有VPS的，挂着就放心多了。

做为吾爱里有着'记事本帝'美誉的鄙人，不能让大家失望啊。
上次那个只能说是挂Q思路，本次提供的这是本机的挂Q工具，可以批量挂哦。
据传说SID有效期为一个月，可我挂了两个多月了，一直没掉。
看效果图先。。



其实WIN下VBS脚本一直都是做为霸主的存在('微软有意为之')，但是很多地方用着不爽，
没有JS来的灵活，所以借此机会向大家展示一下WIN平台WSH宿主下JS的风采。
比如这里的数组、正则表达式的运用，JS远远强过了VBS。
VBS虽然也能很简单的写出本工具，但是代码会非常的繁琐而且看着不够文艺。
毕竟现在都是文艺青年了，不能再像以前做为2B铅笔一样的存在了。

好了不罗嗦了，代码基本都加上注释了，便于大家理解。

/*
Version :  1.0
Date    :  2012-06-20
Author  :  乱码
源码献上,欢迎翻版,。
*/
QQ={
    login:function(sid){ //挂Q登录函数
        try{
            with(new ActiveXObject("Msxml2.ServerXMLHTTP")){ //创建http对象
                open("POST", "http://pt.3g.qq.com/s?aid=nLogin3gqqbysid&r=" + Math.random(), false); //打开3GQQ登录页面
                setRequestHeader("Content-Type", "application/x-www-form-urlencoded"); //POST编码格式
                send("auto=1&loginType=1&3gqqsid=" + sid); //发送数据登录3GQQ
                return /3G_UIN=(\d+)/.test(responseText)?responseText.match(/ (.*?) /)[1] + ' (' + responseText.match(/3G_UIN=(\d+)/)[1] + ')':'';
                //返回 昵称 (QQ号码) 这样的数据，登录失败则返回空。
            }
        }catch(e){
            return ''; //出错返回空
        }
    }
}
/*******************************************************/
var list = [ //sid数组，表示可以挂多个QQ哦...
    'AVWw6ZTunk5dTJOhC0ve****',
    'AesPJyu8rv5HeYMCSFL****',
    'ATwBgH_FRf4yD_sKJmXJ****',
    'AUdFeQwJzLprlc1R1XYr****',
    'ARMSd_Z5jG1JKxJY90ST****',
    'AZqV2pWSO4Z2O-cTSD6O****',
    'Ad0DmiIt9WZkfwMjC8ZH****'
];
while(1){ //无限循环，半小时执行一次。
    for(var i in list) QQ.login(list[i]); //遍历数组，执行挂Q
    WSH.sleep(1000*60*30); //挂起半小时
}
/*******************************************************/

最后再补充一点。如果安装了Dreamweaver或者其他WEB开发的IDE的话，
JS默认关联有可能会被破坏，所以我为大家提供了修复JS关联的注册表文件。

比如这样的。。。
由于我的机子是XP系统的，所以不知道win7的是否兼容，
建议win7的还是找朋友导一下注册表好了，以免搞出不必要的麻烦。。

Windows Registry Editor Version 5.00

;修复JS默认关联
[HKEY_CLASSES_ROOT\.js]
@="JSFile"

;修复JS默认图标
[HKEY_CLASSES_ROOT\JSFile\DefaultIcon]
@="%SystemRoot%\\System32\\WScript.exe,3"

;修复JS默认打开方式
[HKEY_CLASSES_ROOT\JSFile\shell\Open\Command]
@=hex(2):25,00,53,00,79,00,73,00,74,00,65,00,6d,00,52,00,6f,00,6f,00,74,00,25,\
  00,5c,00,53,00,79,00,73,00,74,00,65,00,6d,00,33,00,32,00,5c,00,57,00,53,00,\
  63,00,72,00,69,00,70,00,74,00,2e,00,65,00,78,00,65,00,20,00,22,00,25,00,31,\
  00,22,00,20,00,25,00,2a,00,00,00
;这里一长串是16进制数据，解码后是：%SystemRoot%\System32\WScript.exe "%1" %*

把这个保存为'修复JS关联.reg'，然后双击导入就可以了。

如果嫌麻烦，那么把'批量3G挂Q工具[JS版].JS'改成'批量3G挂Q工具[JS版].JSE'
如果还不行，那就只能用'修复JS关联.reg'修复下注册表了。

希望大家继续支持记事本帝，我会用记事本为你们打造不一样的精彩。


发现论坛更新后，很多UBB代码都不兼容了，那个纠结啊。文章排版比以前难看了，大家将就这看吧。。



应 Peace 要求，我把VBS版也贴出、、

list = Array( _
    "ActBRC3g_UQOds3ihWBg****" ,_
    "AfXdrBkxw9uCFYVv-L1K****" ,_
    "AdJNOSNKfZ9PwXDTFC4i****" ,_
    "AZ2oZkkAZHC_gmGOKQSl****" ,_
    "AcfC-F0KMIs4nGkzXfkN****" ,_
    "AesQ1wOEsO61WW9tPowb****" ,_
    "AaPi00aFEQp1fYlAUrWt****" _
) 'sid数组，表示可以挂多个QQ
'VBS是数组看起来有点别扭，多了个下划线(VB里代码换行的折行符)。

Do
    For i=0 To UBound(list) '遍历数组
        login list(i) '登录QQ
    Next
    WSH.sleep 1000*60*30 '挂起半小时
Loop

Function login(sid) 'QQ登录函数。简单起见，没做返回数据处理，不然代码就很长了。
    On Error Resume Next '容错语句
    With CreateObject("Msxml2.ServerXMLHTTP")
        .open "POST", "http://pt.3g.qq.com/s?aid=nLogin3gqqbysid&r=" & Rnd, False
        .setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
        .send "auto=1&loginType=1&3gqqsid=" & sid
    End With
End Function

前面说过vbs的也可以很容易的写出，但是如果要做返回数据的提取，正则表达式就比js的纠结多了，好麻烦的。
这里没有做返回数据的提取、、

984754551

记事本男~我要红包。沙发~

此号被封

不错嘛,这个脚本

984754551

你只不过是代码不支持。我打开帖子到可以回复2分钟不一定搞的定。。。。。

xuliang

前排支持，谢谢分享！

Rookietp

{:1_930:}膜拜师傅

19nuclear91

很好很强大  感谢楼主的作品

淡然出尘

支持湿傅作品、

fanshuzi

果然够强啊。谢谢分享。

hotool

感谢楼主的作品