发送邮件怎么操作（使用按键发送邮件）

这几年大家通过邮件营销（引流）的方式越来越少了，一是因为邮件发送多了容易出现发不出去或者进入目标邮箱的垃圾箱的情况，二是人们看邮箱的次数越来越少了，除了部分企业的办公需要，大部分用户基本不会主动去看邮箱。

对于我们写脚本的人来说，发邮件除了作为引流方式以外，还可以作为数据的传输工具使用。比如以下两个功能：

（1）监控脚本运行情况，当脚本运行异常的时候，可以通过发送邮件的方式远程发给我们，然后我们就可以知道脚本出问题了。

（2）监控脚本的使用数量，我们把一个脚本分享出去以后，想知道有多少人在使用，可以在脚本运行过程中发送一个邮件给我们自己的邮箱，这样通过邮件信息知道脚本运行的数量。

下面我来说一下具体使用方法，代码如下：

Dim 服务器="" Dim 发件人邮箱="" Dim 密码="" Dim 主题="" Dim 内容="" Dim 收件地址="" dim 返回值 = SendSimpleEmail(服务器,发件人邮箱,密码,主题,内容,收件地址) TracePrint 返回值

发送邮件的命令是SendSimpleEmail，它的难点是命令参数的填写。

我以QQ邮箱为例说一下怎么获取这些参数。

①服务器：smtp.qq.com

②发件人邮箱：你的QQ邮箱

③密码：不是你的QQ密码，是smtp授权码（重点****）

先打开邮箱，进入设置-账户

再开启smtp服务，生成授权码

这一步需要QQ的安全验证，按照提示一步步操作。

把授权码填写到密码位置，这个smtp服务授权码不用的时候记得关闭。

④主题：邮件的标题

⑤内容：邮件的内容，④⑤两项填写你要发送的内容

⑥收件地址：接收邮件的邮箱

这些参数中只有第3点是需要我们费些功夫的，其他参数都很简单。

当我们运行脚本以后，如果返回值是true，说明邮件已经发出去了。

发送是否成功也可以通过发给自己小号测试。

发邮件这个功能作为数据传输的工具还是不错了，大家不妨试一试。