Um eine Einzel-eMail Vorlage vor dem Versand nochmals anzeigen zu lassen damit der Benutzer Änderungen vornehmen kann, gibt es im combit Relationship Manager die Methode SendSingleMailDialog.
Option Explicit
' Aktives cRM-Projekt
Dim oProject, oActiveView, oCurrentRecordSet
Set oProject = cRM.CurrentProject
Set oActiveView = oProject.ActiveViews.ActiveView
Set oCurrentRecordSet = oActiveView.CurrentRecordSet
' Aktueller Datensatz
Dim oCurrentRecord
Set oCurrentRecord = oCurrentRecordSet.CurrentRecordSynchronized()
' Mailvorlage aufrufen
oCurrentRecordSet.SendSingleMailDialog("%25PRJDIR%25\Mailvorlagen\Kontakte - Beispiel.mtp")
' Objekte freigeben
Set oCurrentRecord = Nothing
Set oCurrentRecordSet = Nothing
Set oActiveView = Nothing
Set oProject = Nothing
Die Methode erwartet als Parameter (STRING) die zu verwendende eMail-Vorlage. Dabei kann die %PRJDIR%-Variable für das aktuelle Projektverzeichnis oder der komplette Pfad verwendet werden.
Hinweis: Im Maileditor vorgenommene Änderungen/Ergänzungen werden nicht in der Vorlage gespeichert.
IDKBAD001186 KBAD001186