envio de mail desde winforms

[mass1023]

Buenas noches,
Yo estoy desarrollando una aplicacion que permita el envio y recepcion de e-mails por medio de una cuenta de hotmail. El problema es que cuando intento enviar el correo, dice que el servidor requiere autenticacion :S y no se como indicar esto en codigo del c#

Estoy utilizando el SmtpClient, si alguien me pudiera ayudar se lo agradeceria mucho gracias!!!
:)

[mass1023]

este el codigo

SmtpClient theClient = new SmtpClient("smtp.live.com", 25);
System.Net.NetworkCredential theCredential = new
System.Net.NetworkCredential("[email protected] m", "pwd");
theClient.Credentials = theCredential;
theClient.Send(theMailMessage);

[felix46]

Iniciado por mass1023

este el codigo

SmtpClient theClient = new SmtpClient("smtp.live.com", 25);
System.Net.NetworkCredential theCredential = new
System.Net.NetworkCredential("[email protected] m", "pwd");
theClient.Credentials = theCredential;
theClient.Send(theMailMessage);

se requieren librerias extras?

[Dradi7]

no solo necesitar¡as importar esta clase

Imports System.Net.Mail
Imports System.Net.Mail.MailMessage

este el codigo que yo utilizo

Código vb.net:

' Procedimiento para Envio de Mensajes
    Public Sub EnviarMail(ByVal De As String, ByVal Para As String(), ByVal Asunto As String, ByVal Cuerpo As String, Optional ByVal CC As String() = Nothing, Optional ByVal CCO As String() = Nothing)
 
        Dim Msg As New MailMessage ' Instancia para Manejar el Envio de Archivos
        Dim SMTP As New SmtpClient ' Uso de SMTP para el envio y codificacion de Archivos
        System.Windows.Forms.Cursor.Current = Cursors.WaitCursor
        Try
 
            Msg.From = New System.Net.Mail.MailAddress(De, "", System.Text.Encoding.UTF8) ' De quien se envia el Correo
 
            For Each From As String In Para
                If From <> "" Then Msg.To.Add(From) ' Para quien se Envia
 
            Next
 
 
            If CC IsNot Nothing Then
                For Each C As String In CC
                    If C <> "" Then Msg.CC.Add(C)
                Next
            End If
 
            If CCO IsNot Nothing Then
                For Each C As String In CCO
                    If C <> "" Then Msg.Bcc.Add(C)
                Next
            End If
 
            Msg.Subject = Asunto ' Asunto sobre el Envio del Mensaje
            Msg.SubjectEncoding = System.Text.Encoding.UTF8 ' Encriptando el Asunto del Mensaje
 
            Msg.Body = Cuerpo ' Cuerpo del Mensaje 
            Msg.BodyEncoding = System.Text.Encoding.UTF8 ' Codificando el Cuerpo del Mensaje
            Msg.IsBodyHtml = False ' El Cuerpo del Mensaje no es HTML
 
            SMTP.UseDefaultCredentials = False ' Si requiere Credenciales por Defecto
            SMTP.Credentials = New System.Net.NetworkCredential("[email protected]", "xxxxxx") ' las Credenciales para poder enviar el Mensaje
            SMTP.Port = 587 ' El puerto que utiliza para el envio de Mensajes
            SMTP.Host = "smtp.gmail.com" ' el Servidor para el envio de Mensajes
            SMTP.EnableSsl = True ' Esto es para que vaya a través de SSL(Uso de Certificado Digital) por si usamos GMail por ejm.
            SMTP.DeliveryMethod = Net.Mail.SmtpDeliveryMethod.Network ' Enviando Atravez de la red
 
            SMTP.Send(Msg)
            MsgBox("Mensaje Enviado con Exito", 32, "Aviso")
 
        Catch ex As Exception
            MsgBox(ex.Message, 48, "Aviso")
        Finally
            System.Windows.Forms.Cursor.Current = Cursors.Default
        End Try
 
    End Sub
 
   ' Ejemplo de como utilizarlos
 
Dim CC() As String = {"correo1", "correo2", "correo3"}
Dim CCO() As String = {"correo3", "correo4", "correo5"}
EnviarMail("xxx", "xxx", "xxx", "xxxx", CC, CCO)
 

[felix46]

Iniciado por Dradi7

no solo necesitar¡as importar esta clase

Imports System.Net.Mail
Imports System.Net.Mail.MailMessage

este el codigo que yo utilizo

Código vb.net:

' Procedimiento para Envio de Mensajes
    Public Sub EnviarMail(ByVal De As String, ByVal Para As String(), ByVal Asunto As String, ByVal Cuerpo As String, Optional ByVal CC As String() = Nothing, Optional ByVal CCO As String() = Nothing)
 
        Dim Msg As New MailMessage ' Instancia para Manejar el Envio de Archivos
        Dim SMTP As New SmtpClient ' Uso de SMTP para el envio y codificacion de Archivos
        System.Windows.Forms.Cursor.Current = Cursors.WaitCursor
        Try
 
            Msg.From = New System.Net.Mail.MailAddress(De, "", System.Text.Encoding.UTF8) ' De quien se envia el Correo
 
            For Each From As String In Para
                If From <> "" Then Msg.To.Add(From) ' Para quien se Envia
 
            Next
 
 
            If CC IsNot Nothing Then
                For Each C As String In CC
                    If C <> "" Then Msg.CC.Add(C)
                Next
            End If
 
            If CCO IsNot Nothing Then
                For Each C As String In CCO
                    If C <> "" Then Msg.Bcc.Add(C)
                Next
            End If
 
            Msg.Subject = Asunto ' Asunto sobre el Envio del Mensaje
            Msg.SubjectEncoding = System.Text.Encoding.UTF8 ' Encriptando el Asunto del Mensaje
 
            Msg.Body = Cuerpo ' Cuerpo del Mensaje 
            Msg.BodyEncoding = System.Text.Encoding.UTF8 ' Codificando el Cuerpo del Mensaje
            Msg.IsBodyHtml = False ' El Cuerpo del Mensaje no es HTML
 
            SMTP.UseDefaultCredentials = False ' Si requiere Credenciales por Defecto
            SMTP.Credentials = New System.Net.NetworkCredential("[email protected]", "xxxxxx") ' las Credenciales para poder enviar el Mensaje
            SMTP.Port = 587 ' El puerto que utiliza para el envio de Mensajes
            SMTP.Host = "smtp.gmail.com" ' el Servidor para el envio de Mensajes
            SMTP.EnableSsl = True ' Esto es para que vaya a través de SSL(Uso de Certificado Digital) por si usamos GMail por ejm.
            SMTP.DeliveryMethod = Net.Mail.SmtpDeliveryMethod.Network ' Enviando Atravez de la red
 
            SMTP.Send(Msg)
            MsgBox("Mensaje Enviado con Exito", 32, "Aviso")
 
        Catch ex As Exception
            MsgBox(ex.Message, 48, "Aviso")
        Finally
            System.Windows.Forms.Cursor.Current = Cursors.Default
        End Try
 
    End Sub
 
   ' Ejemplo de como utilizarlos
 
Dim CC() As String = {"correo1", "correo2", "correo3"}
Dim CCO() As String = {"correo3", "correo4", "correo5"}
EnviarMail("xxx", "xxx", "xxx", "xxxx", CC, CCO)
 

pero eso seria para vb

[Peterpay]

Ok en algo esto desacuerdo con muchos posts en el foro

Yo se que todos buscan una solucion exacta a su problema. pero si es la misma plataforma no puede tomar el codigo en vb ver que objetos , clases y recuros usan,y a mano hacer su propio codigo en c# o viceversa si fuera el caso.

Veo que muchas veces la gente no tiene la iniciativa de buscar la solucion si no como decimos aca (en mexico) quieren todo peladito y a la boca. las cosas no son simples y recuerden que esto es un foro y nadie esta obligado a hacer el trabajo de nadie si quiera a contestar, pero si gente como el buen dradi o el que escribio el post y se auto-responde, y muchos mas hacen el esfuerzo por compartir su codigo, porque no tener por lo menos la curiosidad de investigar.

PD: Este es un punto de vista offtopic al post anterior asi que solo tomenlo como una recomendacion.

[Dradi7]

PeterPay tiene razon si se usa la misma plataforma porque no lo pasas tu a C# acaso tan complicado es en pasar ese codigo en C# acuerdate que nadie te va a dar todo apoyamos y aportamos ideas pero si tu quieres que te den todo servido entonces como piensan tu y los otros aprender