none
Enviar e-mail usando Windows Forms sem Erro: "não foi possivel encontrar o objeto CDO.Message" RRS feed

  • Pergunta

  • Como devo proceder para Enviar um  e-mail usando Windows Forms sem Erro: "não foi possivel encontrar o objeto CDO.Message". já fiz isso:

    Imports System.Web.Mail
    Imports System.IO.StringWriter
        Private Sub Enviar_Email(ByVal w_CorpoEmail As String)
            Dim SndMail As New MailMessage
            Dim Dr As SqlClient.SqlDataReader
            Dim sSql As String
            Dim MailConsultor As String 


            With SndMail
                 .From = "Relatório de Erro"
                 .To = "leonardofontoura@gmail.com"
                 .Subject = "O TITULO..."
                 .Body = w_CorpoEmail
                 .BodyFormat = MailFormat.Html 
            End With
            Try
                 SmtpMail.SmtpServer = "10.10.1.9" //servidor da empresa
                 System.Web.Mail.SmtpMail.Send(SndMail)
            Catch ex As System.Exception
                 Response.Write(ex.Message)
            End Try 

     End Sub

     

    mas continua dando o erro!

    terça-feira, 13 de fevereiro de 2007 14:33

Todas as Respostas