| |
Fortgeschrittene ProgrammierungOutlook MAPI | | | Autor: Paulix1 | Datum: 16.09.14 17:49 |
| Hallo,
ich verwende das Programm aus vb@rchiv "Mails mit Anlagen versenden (MAPI-Control)"
Bei einem Anhang funktioniert es nahezu immer.
Bei mehreren Anhängen tritt beim Eintrag .AttachmentPosition = 1 oder 2 oder ... ein Fehler auf.
Das ist leider nicht immer so, manchmal gehen auch 3 Anhänge.
Das versenden ohne Anhang funktioniert immer.
Beispielcode:
Sleep 500
.AttachmentIndex = 0
.AttachmentPosition = 0
.AttachmentName = "a112.txt"
.AttachmentPathName = "D:\a112.txt"
.AttachmentIndex = 1
.AttachmentPosition = 1
.AttachmentName = "a112.txt"
.AttachmentPathName = "D:\a112.txt"
.AttachmentIndex = 2
.AttachmentPosition = 2
.AttachmentName = "a112.txt"
.AttachmentPathName = "D:\a112.txt"
Mit der Bitte um Hilfe
Paulix
Umgebung:
W7, Outlook 2013 | |
Re: Outlook MAPI | | | Autor: Blackbox | Datum: 19.09.14 17:44 |
| Hi,
wie ich mich richtig entsinne (schon lange nichts mehr mit Outlook-VBA gemacht) hat das Attachment-Objekt auch eine Collection namens Attachments. Und diese Collection hat eine Methode namens: Add,
also Attachments.Add ...
Über diese Methode werden der Auflistung einzelne Anhänge hinzugefügt. MW ist der Index der Collection sogar schreibgeschützt. | |
Re: Outlook MAPI | | | Autor: OGGI | Datum: 22.09.14 13:55 |
| Howdy Paulix1,
evtl. hilft dir dieser Codeschnipsel weiter, siehe Anmerkungen im Code:
'attachmend hinzufügen
If sAttachment <> "" Then
sp = Split(sAttachment, ",", -1)
For y = 0 To UBound(sp)
If sp(y) <> "" Then 'keinen nullstring senden
.AttachmentIndex = y
.AttachmentPosition = y 'zwei attachments
' können nicht an der gleichen position in
' der email stehen
.AttachmentName = DATNAME(sp(y))
.AttachmentPathName = sp(y)
End If
Next y
End If | |
Re: Outlook MAPI | | | Autor: Paulix1 | Datum: 25.09.14 16:24 |
| Hallo Oggi,
Danke für Deine Codeschnipsel.
Daß das Anhängen mal funktioniert mal nicht, da war der Grund, dass in der Mail mehr Characters sein müssen als Anhänge hinzugefügt werden.
Nach langem suchen, es gibt für MAPI auch eine Beschreibung und Hilfe.
Nochmals Danke
Paulix | |
Re: Outlook MAPI | | | Autor: visualfx | Datum: 11.02.17 17:56 |
| Hallo Paulix,
ich hatte gerade genau dasselbe Problem wie Du!
Ich möchte über MAPI eine neue Mail generieren mit E-Mail-Adresse, Betreff und einer PDF-Datei als Anlage.
Alles mögliche / unmögliche ausprobiert => Ergebnis: lauter mysteriöse Fehlermeldungen !!!
Nach stundenlangem (!!!) Rumprobieren bin ich zum Glück auf Deine Lösungs-Antwort gestoßen! Danke!
- ich setzte jetzt MsgNoteText auf ein Leerzeichen und schon funktioniert alles bestens
Gruß, Stefan
Beitrag wurde zuletzt am 11.02.17 um 18:01:17 editiert. | |
| Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
|
|
sevISDN 1.0
Überwachung aller eingehender Anrufe!
Die DLL erkennt alle über die CAPI-Schnittstelle eingehenden Anrufe und teilt Ihnen sogar mit, aus welchem Ortsbereich der Anruf stammt. Weitere Highlights: Online-Rufident, Erkennung der Anrufbehandlung u.v.m. Weitere InfosTipp des Monats Neu! sevEingabe 3.0
Einfach stark!
Ein einziges Eingabe-Control für alle benötigten Eingabetypen und -formate, inkl. Kalender-, Taschenrechner und Floskelfunktion, mehrspaltige ComboBox mit DB-Anbindung, ImageComboBox u.v.m. Weitere Infos
|
|
|
Copyright ©2000-2024 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
|
|