Hallo Zusammen,
wir haben durch einen Kunden die Anforderung, Emails aus dem ERP System Microsoft Dynamics NAV heraus zu versenden. Dafür will ich gern die MAPI Schnittstelle von DAVID FX 12 (DVAPI32) verwenden.
[Blockierte Grafik: http://tearvolt.de/bilder/davidfx_2.png]
[Blockierte Grafik: http://tearvolt.de/bilder/davidfx_1.png]
Jedoch bekomme ich es nicht hin, eine Instanz zu erstellen. Es scheint mir so, als ob die DLL's bei der DAVID FX Client Installation nicht richtig registriert wurden.
Beim erneuten Versuch, die DLL's zu registrieren, erscheint immer wieder die Meldung:
[Blockierte Grafik: http://tearvolt.de/bilder/davidfx_3.png]
Zur Info:
Ich verwende folgenden Funktionen aus einem anderem Forum als Basis:
oApp = CREATEOBJECT("DVOBJAPILib.DvISEAPI")
oAccount = oApp.Logon("", "", "", "", "", "AUTH")
oArchive = oAccount.GetSpecialArchive(102)
*-- neues Email Object erstellen
oMailItem = oArchive.NEWITEM(2)
*-- Alle evtl. Einstellungen löschen
oMailItem.Recipients.CLEAR()
oMailItem.bcc.CLEAR()
*-- Mail Empfänger
oMailItem.Recipients.ADD(ALLTRIM(THISFORM.mail_receivers))
*-- Mail Blind Copy Empfänger
IF !EMPTY(ALLTRIM(THISFORM.mail_bccs))
oMailItem.bcc.ADD(ALLTRIM(THISFORM.mail_bccs))
ENDIF
*-- Mail Betreff
IF !EMPTY(ALLTRIM(THISFORM.mail_subject))
oMailItem.Subject = ALLTRIM(THISFORM.mail_subject)
ENDIF
*-- Mail Body (nur Text)
oMailItem.Bodytext.plaintext = ALLTRIM(THISFORM.mail_body)
*-- Mail senden
oMailItem.SEND()
Bin für jede(n) Hinweis oder Idee dankbar.