开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 5903|回复: 55
收起左侧

[易语言纯源码] TX企鹅群恶搞群名片源码

[复制链接]
结帖率:67% (24/36)
发表于 2020-3-27 21:30:35 | 显示全部楼层 |阅读模式   河南省南阳市
分享源码
界面截图: -
是否带模块: 调用了模块
备注说明: -
注意:  因为有 反恶意 所以 你懂得,但是可以用. 你可以拿来改空白群名片噢.
如果你会过 反恶意 就算是完善了这个源码了.

最后注意用到了  精易web浏览器支持库




  
子程序名返回值类型公开备 注
读取所有群员  
参数名类 型参考可空数组备 注
群号文本型
变量名类 型静态数组备 注
xx包类_POSTxx类 
协yi头类_POSTxx类 
提交xx文本型 
提交协yi头文本型 
xx文本型 
json类_json 
当前整数型 
表项整数型 
' ----------------------------------
xx包.添加 (“gc”, 群号)
xx包.添加 (“st”, “0”)  ' 开始
xx包.添加 (“end”, “21”)  ' 结束人数.
xx包.添加 (“sort”, “ 0”)
xx包.添加 (“bkn”, bkn)
' ---------------------------------
协yi头.添加 (“user-agent”, “Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/80.0.3987.149 Safari/537.36”)
协yi头.添加 (“cookie”, cookies)
协yi头.添加 (“referer”, https://qun.qq.com/member.html)
' ---------------------------------
提交xx = xx包.获取Postxx ()
提交协yi头 = 协yi头.获取协yi头xx ()
xx = 编码_usc2到ansi (到文本 (网页_访问_对象 (https://qun.qq.com/cgi-bin/qun_mgr/search_group_members, 1, 提交xx, cookies, , 提交协yi头)))
' ---------------------------------
如果真 (json.解析 (xx))
计次循环首 (json.成员数 (“mems”), 当前)
表项 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (表项, 0, 到文本 (表项 + 1))
超级列表框1.置标题 (表项, 1, json.取通用属性 (“mems[”到文本 (当前 - 1)“].uin”))
超级列表框1.置标题 (表项, 2, json.取通用属性 (“mems[”到文本 (当前 - 1)“].nick”))
计次循环尾 ()


i支持库列表   支持库注释   
iext扩展界面支持库一

  
子程序名返回值类型公开备 注
改群成员名  
参数名类 型参考可空数组备 注
群号文本型
被改人文本型
名字文本型
变量名类 型静态数组备 注
xx包类_POSTxx类 
协yi头类_POSTxx类 
提交xx文本型 
提交协yi头文本型 
xx文本型 
xx包.添加 (“gc”, 群号)
xx包.添加 (“u”, 被改人)
xx包.添加 (“name”, 编码_URL编码 (名字, , ))
xx包.添加 (“bkn”, bkn)
' ---------------------------------
协yi头.添加 (“user-agent”, “Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/80.0.3987.149 Safari/537.36”)
协yi头.添加 (“cookie”, cookies)
协yi头.添加 (“referer”, https://qun.qq.com/member.html)
' ---------------------------------
提交xx = xx包.获取Postxx ()
提交协yi头 = 协yi头.获取协yi头xx ()
xx = 编码_usc2到ansi (到文本 (网页_访问_对象 (https://qun.qq.com/cgi-bin/qun_mgr/set_group_card, 1, 提交xx, cookies, , 提交协yi头)))
调试输出 (xx)


i支持库列表   支持库注释   
spec特殊功能支持库

恶搞.zip (1.04 MB, 下载次数: 52)

点评

这里面有些是 屏蔽词所以被屏蔽了   河南省南阳市  发表于 2020-3-27 21:37

评分

参与人数 1好评 +1 精币 +2 收起 理由
千面萌萌 + 1 + 2 奉上小小红包希望笑纳

查看全部评分


结帖率:60% (6/10)

签到天数: 9 天

发表于 2020-4-2 22:21:36 | 显示全部楼层   河南省驻马店市
我来看看什么原理  感觉很给力啊
回复 支持 反对

使用道具 举报

结帖率:65% (17/26)
发表于 2020-4-2 18:40:22 | 显示全部楼层   山东省潍坊市
大佬学习一下

回复 支持 反对

使用道具 举报

发表于 2020-3-31 21:59:50 高大上手机用户 | 显示全部楼层   江西省南昌市
感想大佬分享,赶紧去恶搞一波
回复 支持 反对

使用道具 举报

结帖率:0% (0/4)

签到天数: 5 天

发表于 2020-3-31 02:50:30 | 显示全部楼层   天津市天津市
没看懂,下载看看
回复 支持 反对

使用道具 举报

结帖率:100% (1/1)
发表于 2020-3-31 00:27:29 | 显示全部楼层   云南省临沧市
郭敬明你让他就突然计划投入就突然就突然
回复 支持 反对

使用道具 举报

结帖率:100% (4/4)
发表于 2020-3-30 21:21:21 | 显示全部楼层   河南省安阳市
感谢分享!!!
回复 支持 反对

使用道具 举报

结帖率:98% (43/44)

签到天数: 13 天

发表于 2020-3-30 20:29:00 | 显示全部楼层   湖北省仙桃市
没看懂,下载看看
回复 支持 反对

使用道具 举报

发表于 2020-3-30 14:49:06 | 显示全部楼层   陕西省渭南市
看看看怎么样
回复 支持 反对

使用道具 举报

签到天数: 9 天

发表于 2020-3-29 22:48:58 | 显示全部楼层   广西壮族自治区南宁市
看看怎么样
回复 支持 反对

使用道具 举报

结帖率:88% (7/8)
发表于 2020-3-29 22:42:32 | 显示全部楼层   江西省南昌市
        支持开源~!感谢分享
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 诚聘英才| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 800073686,邮箱:800073686@b.qq.com
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表