Im Moment verwenden wir MAPI, um eine reine Text-E-Mail von unserer Anwendung zu senden. Wir geben das Dialog-Flag an, wenn der Benutzer diese Funktion aufruft, so dass die E-Mail in ihrem E-Mail-Client erscheint und sie dann modifizieren und senden kann.E-Mail im HTML-Format senden
Wir möchten die E-Mail verschönern und in einem HTML-Format senden.
Nach diesem Link MSDN Link MAPI diesen http://support.microsoft.com/kb/268440
Ich habe einen Artikel über ExpertsExchange nicht ist sutiable gesehen, dass Sie sagen, MAPI, es tun können, aber ich kann das Beispiel mit Outlook nicht an der Arbeit (nicht versucht anotherother Klient noch)
procedure ShowMailDlg(ToName,Address,HTMLMessage: string);
var
li: integer;
lMessage: TMapiMessage;
lRecipArray: array of TMapiRecipDesc;
lREs: DWord;
begin
SetLength(lRecipArray,1);
lRecipArray[0].ulRecipClass:=MAPI_TO;
lRecipArray[0].lpszName:=pChar(ToName);
lRecipArray[0].lpszAddress:=pChar(Address);
lMessage.ulReserved:=0;
lMessage.lpszSubject:=nil;
lMessage.lpszNoteText:=pChar(HTMLMessage);
lMessage.lpszMessageType:= nil;//pChar('HTML');
lMessage.lpszDateReceived:=nil;
lMessage.lpszConversationID:=nil;
lMessage.flFlags:=0;
lMessage.lpOriginator:=nil;
lMessage.nRecipCount:=length(lRecipArray);
lMessage.lpRecips:=PMapiRecipDesc(lRecipArray);
lMessage.nFileCount:=0;
lMessage.lpFiles:=PMapiFileDesc(nil);
lRes:=MapiSendMail(0, 0 , lMessage,MAPI_DIALOG, 0);
end;
Jeder hat irgendwelche Ideen, wie ich das tun kann. Ich könnte wahrscheinlich Outlook automatisieren, aber ich mag es behalten ziemlich unabhängig von E-Mail-Client (also MAPI)
Dank
Update: Dank für die Anregungen für jedermann. Die Funktion wird nicht so häufig verwendet, daher ist es nicht wirklich eine Option, den Benutzer zur Konfiguration von SMTP-Details aufzufordern. Ich denke, wir bleiben einfach bei der reinen Text-E-Mail.
Dank
Leider wird dies die E-Mail im Standard-E-Mail-Client des Benutzers wie MAPI nicht öffnen. –