Oscar Martin Blog 2.0

Como siempre trasteando, quería hacer una aplicacion para enviar emails desde mi cuenta de Gmail. El único problema es que Gmail tiene ciertas peculiaridades, en su servicio SMTP.

En principio el servidor SMTP (Simple Mail Transfer Protocol) de Gmail, no usa el puerto por defecto, sino que utiliza el 587. Además es necesario habilitar el servicio de SSL (Secure Sockets Layer).

Yo he usado en este ejemplo, VB.NET pero daría igual usa C#, ya que básicamente se usan dos clases las que uso:

• System.Net.Mail.MailMessage
• System.Net.NetworkCredential

Crea una aplicacion de consola, pega este código y modifica los parámetros necesarios:

Imports System
Imports System.Collections
Imports System.Net
Imports System.Net.Mail
Imports System.Net.Mime
Module SendEmailUsingGmail
    Sub Main()
        'Definicion e instanciacion de la clase MailMessage
        Dim MMessage As System.Net.Mail.MailMessage =
		New System.Net.Mail.MailMessage()
        'Rellenamos los parametros usuales para el envio de un email
        MMessage.To.Add("user@domain.com")
        MMessage.From = New MailAddress("my_user@gmail.com",
		"my_user", System.Text.Encoding.UTF8)
        MMessage.Subject = "Test"
        MMessage.SubjectEncoding = System.Text.Encoding.UTF8
        MMessage.Body = "Esto es una prueba"
        MMessage.BodyEncoding = System.Text.Encoding.UTF8
        MMessage.IsBodyHtml = False 'Formato texto plano
        'Definimos nuestras credenciales para el unvio de emails a traves de Gmail
        Dim SClient As New SmtpClient()
        SClient.Credentials = New System.Net.NetworkCredential("my_user@gmail.com",
		"my_password")
        SClient.Host = "smtp.gmail.com" 'Servidor SMTP de Gmail
        SClient.Port = 587 'Puerto del SMTP de Gmail
        SClient.EnableSsl = True 'Habilita el SSL, necesio en Gmail
        'Capturamos los errores en el envio
        Try
            SClient.Send(MMessage)
            Console.WriteLine("Mensaje enviado correctamente")
            Console.ReadLine()
        Catch ex As System.Net.Mail.SmtpException
            Console.WriteLine(ex.Message)
            Console.ReadLine()
        End Try
    End Sub
End Module

Esta entrada fue posteada el 12 Septiembre 2007 at 10:36 y pertenece a la categoria .NET, Google. Tu puedes seguir cualquier respuesta de esta entrada a traves de RSS 2.0. Tu puedes responder, o hacer trackback en tu propio sitio.