易语言如何验证QQ密码是否正确?

2025-06-26 21:36:24
推荐回答(1个)
回答1:

哇哈哈 发了。。。这里放个
.版本 2
.支持库 internet

.程序集 窗口程序集1

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

编辑框1.输入方式 = 3
编辑框2.输入方式 = 2

.子程序 _按钮1_被单击
.局部变量 QQ号, 文本型
.局部变量 密码, 文本型

QQ号 = 到文本 (编辑框1.内容)
密码 = 到文本 (编辑框2.内容)
.如果 (连接发信服务器 (“smtp.qq.com”, , QQ号, 密码, 3000) = 真)
信息框 (“此QQ密码正确”, #信息图标, “正确”)
.否则
信息框 (“此QQ密码错误”, #信息图标, “错误”)
.如果结束
断开发信服务器 ()