asp.net中发送Mail的简单实例

来源:互联网 发布:mac see sheer西柚色 编辑:程序博客网 时间:2024/05/18 00:11

   Dim cmail As New Mail.MailMessage
        Dim sqlcmd As New SqlClient.SqlCommand
        Dim cn As SqlConnection

        ' cmail.To = AddressList.Trim
        cmail.To = "yf.zhang@wongswtsz.com" '收信人
        cmail.From = "postmaster@wongswtsz.com"'发送人
        cmail.Subject = strSubject.Trim '邮件标题
        cmail.Body = strBody.Trim  '邮件内容
        cmail.BodyFormat = MailFormat.Html '邮件格式
        If cmail.To.Trim <> "" Then
            SmtpMail.SmtpServer = "10.10.11.204" '邮件服务器
            SmtpMail.Send(cmail)  '邮件发送
        End If

原创粉丝点击