用VB编程发送邮件,其实思路很简单:VB先引用jmail,然后用jmail连接邮箱服务器,通过邮箱服务器向其他邮箱发送邮件,所以只有两个动作而已,so
easy。
步骤一:开启邮箱服务器(这里我用的是163邮箱,其他邮箱没测试过,不知道行不行,猜应该可以)
进入163邮箱设置\客户端授权密码,输入手机短信验证码,获取客户端授权密码,这个密码就是后面源代码里面的服务器登入密码,千万别忘记了。然后开启“设置客户端授权码”,
再进入POP3/SMTP/IMAP,勾选POP3/STMP服务和IMAP/SMTP服务,然后点击保存,这样邮箱服务器就设置OK了。
步骤二:编写程序。
先引用jmail 4.0 library(这个东东要从网上下载,然后放入System32文件夹,在用regsvr32
jmail.dll注册),才能使用,不然会报错的。
源代码:
Option Explicit