| |
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 |
|
|
Neu! sevCommand 4.0
Professionelle Schaltflächen im modernen Design!
Mit nur wenigen Mausklicks statten auch Sie Ihre Anwendungen ab sofort mit grafischen Schaltflächen im modernen Look & Feel aus (WinXP, Office, Vista oder auch Windows 8), inkl. große Symbolbibliothek. Weitere InfosTipp des Monats Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere 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
|
|