要一段VB.NET发邮件的代码
1、'创建发件连接,根据你的发送邮箱的SMTP设置填充
2、Dim smtp As New System.Net.Mail.SmtpClient("smtp.163.com", 25)
3、'发件邮箱身份验证,参数分别为 发件邮箱登录名和密码
4、smtp.Credentials = New System.Net.NetworkCredential("用户名", "密码")
5、'创建邮件
6、Dim mail As New System.Net.Mail.MailMe...
7、请您先下载一个动态链接库 Jmail.dll,放在主程序的同一目录下。
8、在模块内写:
9、Sub SendMail(Optional ByVal sSubject As String, _
10、Optional ByVal sBody As String, _
11、Optional ByVal sFileName As String)
12、Dim jmail
13、Set jmail = CreateObject("jmail.Message")
14、If sFileName <> "\" Then
15、jmail.Charset = "gb2312"
16、jmail.Silent = False
17、jmail.Priority = 1 '邮件状态,1-5 1为最高
18、jmail.MailServerUserName = "jqrmq" 'Email帐号
19、jmail.MailServerPassWord = "jqrmqjqrmq" 'Email密码
20、jmail.FromName = "冰人杀手" '发信人...
【#要一段VB.NET发邮件的代码#】到此分享完毕,希望对大家有所帮助。
版权声明:本文版权归原作者所有,转载文章仅为传播更多信息之目的,如作者信息标记有误,请第一时间联系我们修改或删除,多谢。