vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Zippen wie die Profis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Newsletter  | Impressum  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2015
 
zurück
Rubrik: HTML/Internet/Netzwerk · HTML/Email   |   VB-Versionen: VB4, VB5, VB629.11.01
Mails versenden mit dem MAPI-Control

Mit Hilfe des MAPI-Controls lässt sich auf einfachste Weise eine EMail-Nachricht versenden - wirklich ;-)

Autor:   Dieter OtterBewertung:     [ Jetzt bewerten ]Views:  34.205 
www.tools4vb.deSystem:  Win9x, WinNT, Win2k, WinXP, Vista, Win7, Win8 Beispielprojekt auf CD 

Summer-Special bei Tools & Components!
Gute Laune Sommer bei Tools & Components
Top Summer-Special - Sparen Sie teilweise über 100,- EUR
Alle sev-Entwicklerkomponenten und Komplettpakete jetzt bis zu 25% reduziert!
zum Beispiel:
  • Developer CD nur 455,- EUR statt 569,- EUR
  • sevDTA 2.0 nur 224,30 EUR statt 299,- EUR
  •  
  • vb@rchiv   Vol.6 nur 18,70 EUR statt 24,95 EUR
  • sevCoolbar 3.0 nur 58,70 EUR statt 69,- EUR
  • - Werbung -Und viele weitere Angebote           Aktionspreise nur für kurze Zeit gültig

    Wenn Sie regelmässiger Leser unseres Newsletter sind, dann kennen Sie sicherlich auch den Extra-Tipp EMails mit dem Winsock-Control versenden.

    Wenn auf dem System ein MAPI-fähiges Mailprogramm installiert ist (wie z.B. MS-Outlook), so lassen sich EMails schnell und einfach auch über das Microsoft MAPI Control versenden. MAPI steht übrigens für Message APplication Interface

    Fügen Sie dem Projekt zunächst die Microsoft MAPI Controls Komponente hinzu (Menü Projekt - Komponenten). Plazieren Sie nun auf die Form ein MAPISession und auch ein MAPIMessages Control.

    Alles, was Sie jetzt noch benötigen, ist folgender Code:

    ' Benutzer anmelden und SessionID erzeugen
    With MAPISession1
      ' Benutzername und Passwort (für das Mailkonto)
      .UserName = "Ihr Name"
      .Password = "Ihr Kennwort"
     
      .SignOn
     
      ' SessionID
      MAPIMessages1.SessionID = .SessionID
    End With
     
    ' Mail senden
    With MAPIMessages1
      ' Neue Nachricht
      .Compose
     
      ' Empfänger
      .RecipAddress = "empfaenger@web.de"
     
      ' Betreff
      .MsgSubject = "Test-Nachricht"
     
      ' Nachricht selbst
      .MsgNoteText = "Nachrichtentext"
     
       ' Namen auflösen
      .ResolveName
     
      ' Nachricht versenden
      .Send
    End With

    Und schon wird das Mail versandt
     

    Tipp: sevMail ActiveX mit ZIP-Funktionalität

    Mails senden, abrufen und decodieren - ganz easy
    Das SMTP Control sendet, das POP3 Control empfängt und der Mail-Parser decodiert empfangene Mails im Handumdrehen - natürlich unter Berücksichtigung von Multi-Part MIME Nachrichten, Anlagen u.v.m. Auf Wunsch zippt die Komponente Dateianlagen, um die Mail zu klein wie möglich zu halten. Auch werden SMTP-AUTH Server unterstütz, bei denen der Versand von Nachrichten nur mit korrekter Authentifizierung erfolgt.

    Weiter Infos im Downloadbereich...
     

    Dieser Tipp wurde bereits 34.205 mal aufgerufen.

    Voriger Tipp   |   Zufälliger Tipp   |   Nächster Tipp

    Über diesen Tipp im Forum diskutieren
    Haben Sie Fragen oder Anregungen zu diesem Tipp, können Sie gerne mit anderen darüber in unserem Forum diskutieren.

    Neue Diskussion eröffnen

    nach obenzurück


    Anzeige

    Kauftipp Unser Dauerbrenner!Diesen und auch alle anderen Tipps & Tricks finden Sie auch auf unserer aktuellen vb@rchiv  Vol.6
    (einschl. Beispielprojekt!)

    Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
    - nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten
    - Symbol-Galerie mit mehr als 3.200 Icons im modernen Look
    Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m.
     
       

    Druckansicht Druckansicht Copyright ©2000-2015 vb@rchiv Dieter Otter
    Alle Rechte vorbehalten.

    Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

    Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel