Envoi simple de mail en vb.net

Contenu du snippet

Une fonction pour envoyer des mails simples (vraiment pour débutant)

Source / Exemple :


Private Sub EnvoiMail(ByVal De as string, ByVal Sujet as string, ByVal A as string, ByVal Message as string)
   Dim m As New MailMessage
   Dim SMTP_SERV = "server"

   m.From = De
   m.Subject = Sujet

   ' Au format mail  m.BodyFormat = MailFormat.Html

   SmtpMail.SmtpServer = SMTP_SERV

   Try
       m.Body = Message
       m.To = A
       SmtpMail.Send(m)

    Catch ex As Exception

    End Try

End Sub

Conclusion :


Comme je l'ai dit c'est vraiment pour debuter dans l'envoi de mail, alors soyez indulgents ...
Ne pas oublier " Imports System.Web.Mail " en début de fichier

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.