Feedback

VB - E-Mail mit optionaler Authentifizierung senden

Veröffentlicht von am 26.11.2006
(2 Bewertungen)
Mit dieser Funktion kann man eine E-Mail mit oder ohne Authentifikation senden.
GFU-Schulungen  [Anzeige]

JavaScript für .NET-Entwickler

Sie sind .NET-Entwickler und nun stehen Sie vor der Aufgabe, JavaScript in Ihre Arbeit einzubinden. Die Schulung vermittelt Ihnen die JavaScript Grundlagen und die Funktionen der Scriptsprache. Sie wissen, wie objektorientierte Programmierung in JavaScript funktioniert und lernen abschließend Best Practicies Fälle kennen.

VB.NET 2017/2015/2013 Komplett

Ziel des Seminars ist der flexible Umgang mit VB.NET, wie z.B. die damit verbundene eigenständige Entwicklung von Programmen oder das Verwenden von Datenbanken.

''' <summary>
''' Mit dieser Funktion kann man eine E-Mail mit oder ohne Authentifikation senden
''' </summary>
''' <param name="From">Absender</param>
''' <param name="To">Empfänger</param>
''' <param name="Subject">Titel</param>
''' <param name="Body">Inhalt</param>
''' <param name="Host">Der Host der die Email senden soll</param>
''' <param name="Creds">Optionaler Benutzername und Passwort der für den Host benötigt wird</param>
Public Sub SendMail(ByVal From As String, ByVal [To]() As String, ByVal Subject As String, ByVal Body As String, ByVal Host As String, Optional ByVal Creds As NetworkCredential = Nothing)
    Try
        Dim MyMail As New Mail.MailMessage()

        MyMail.From = New Mail.MailAddress(From)

        For i As Integer = 0 To [To].Length - 1
            MyMail.To.Add([To](i))
        Next

        MyMail.Subject = Subject
        MyMail.Body = Body

        Dim NewSMTP As New Mail.SmtpClient(Host)

        If Creds IsNot Nothing Then
            NewSMTP.Credentials = Creds
        End If

        NewSMTP.Send(MyMail)
    Catch ex As Exception
    End Try
End Sub
Abgelegt unter Authentifizierung, Email.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!