Send Email code in VB.NET

原创 2007年10月12日 10:19:00
Dim mailserver As String
mailserver ="test"
 Private Function SendEmail(ByVal reportname As String, ByVal MailAddress As String, ByVal filename As String) As Boolean
        'Send Email到指定Email Address
        Try
            Dim mesbody As String 'MAIL主体
            mesbody = "   test<BR><BR>"
            mesbody += Errorinfo
            Dim Message As System.Web.Mail.MailMessage = New System.Web.Mail.MailMessage
            Message.To = MailAddress '接收人,多个用分号;隔开
            Message.From = "Admin" '发送者
            Message.Subject = reportname '标题
            Message.Body = mesbody
            Message.BodyFormat = MailFormat.Html '编码方式
            Try
                If System.IO.File.Exists(filename) Then '如果指定的附加文件存在,粘贴附件
                    Dim myAttachment As MailAttachment = New MailAttachment(filename)
                    Message.Attachments.Add(myAttachment)
                End If
                SmtpMail.SmtpServer = mailserver '设置MAIL服务器
                SmtpMail.Send(Message)
                Return True
            Catch ex As Exception
                StatusBar1.Panels(1).Text = "Error: " & ex.Message
                Return False
            End Try
        Catch ex As Exception
            Return False
        End Try
    End Function 

[Python] 发送email的几种方式

python发送email还是比较简单的,可以通过登录邮件服务来发送,linux下也可以使用调用sendmail命令来发送,还可以使用本地或者是远程的smtp服务来发送邮件,不管是单个,群发,还是抄送...
  • lzz957748332
  • lzz957748332
  • 2014年08月15日 22:03
  • 4925

生成条码Code39

//辅助类 using System; using System.Collections; using System.ComponentModel; using System.Dr...
  • u013214705
  • u013214705
  • 2014年01月18日 11:01
  • 886

Django发送html邮件

Django发送html邮件         在Django中,发送邮件非常的方便,一直没有时间,今天来做一个小小的总结吧。          我们常用的当然是通过send_mail发送邮件:    ...
  • yima1006
  • yima1006
  • 2013年05月29日 21:22
  • 5719

EJB3 学习笔记七

开发消息驱动bean Java消息服务 java message service用于访问企业消息系统的开发商中立的api 应用场合:两个没有直接代码关联的应用a和b 可以通过消息服务器进行消息的传...
  • retacn_yue
  • retacn_yue
  • 2016年08月22日 11:46
  • 267

sendEmail发送带有附件的邮件

需求:     从数据库获取数据并保存为CSV的文件,并把数据文件通过sendEmail以附件的形式发送到指定邮箱。     这里主要利用sendEmail的: -m 邮件内容  ...
  • daydring
  • daydring
  • 2013年11月22日 16:23
  • 2399

VB.NET异常处理及抛出异常

异常处理是.NET平台重要的安全机制,它将错误代码的接受和处理的进行了完美的分离,理清了编程者的思绪,也帮助代码增强了可读性,方便了维护者的阅读和理解,而且还提供了处理程序运行时出现的任何意外或异常情...
  • zhang_xinxiu
  • zhang_xinxiu
  • 2013年05月19日 21:57
  • 13596

使用flask 发送电子邮件时候遇到的几个问题

1. flask 框架http://flask.pocoo.org/ flask 是python 用于web 开发的一个非常有用的微框架, 特点是易于自定义扩展, 使用简单, 方便2. flask-m...
  • zhyh1435589631
  • zhyh1435589631
  • 2016年06月04日 17:19
  • 2822

jQuery插件:表单Email常用邮箱选择控件

jQuery插件:表单Email常用邮箱选择控件先上截图:用法: $(selector).emailSelector(emailType); //emailType(可选),是一个数组,...
  • peakchen_90
  • peakchen_90
  • 2016年10月30日 02:14
  • 1406

ABAP 发送邮件的两种方式

第一种:Call the FM to post the message to SAPMAIL, CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1' C...
  • ERP_TOP_DD
  • ERP_TOP_DD
  • 2015年12月11日 14:11
  • 2562

php在原生代码中如何简单快速的发送email

  • haoyunyun888
  • haoyunyun888
  • 2016年04月27日 08:17
  • 4512
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:Send Email code in VB.NET
举报原因:
原因补充:

(最多只允许输入30个字)