Autor Beitrag
JoelH
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 806
Erhaltene Danke: 17

Win10
Delphi Alexandria 11.2 Patch 1
BeitragVerfasst: Di 23.01.07 15:11 
Ich sende eMails mittels den Indykomponenten TIdMessage und TIdSMTP.

Wie schaffe ich es der eMail eine Lesebestätigung aufzupfropfen?

_________________
mfg. Joel
matze
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 4613
Erhaltene Danke: 24

XP home, prof
Delphi 2009 Prof,
BeitragVerfasst: Di 23.01.07 17:34 
einfach eine neue Headerzeile einfügen, in die du folgendes reinschreibst:
ausblenden Quelltext
1:
Disposition-Notification-To: Matze <matze@wasweißichdenn.de>					

Den Header musst du in der idMessage Komponente über AddHeaderoder so einfügen.
JoelH Threadstarter
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 806
Erhaltene Danke: 17

Win10
Delphi Alexandria 11.2 Patch 1
BeitragVerfasst: Mi 24.01.07 11:32 
Titel: hmm,
der Code wird zwar anstandslos gefressen und die Mail versendet aber es passiert nix :( Outlook zeigt kein Popup welches dazu auffordert eine Lesebestätigung zurück zu senden :(

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
procedure TForm1.Button1Click(Sender: TObject);
var
  msg_mail: TIdMessage;
begin
  smtp.Username := 'user';
  smtp.Password := 'pass';
  msg_mail := TIdMessage.Create( smtp);
  msg_Mail.Clear;
  msg_Mail.Body.Clear;
  with msg_Mail.Body do
  begin
    Add('Testemail.');
  end;
  msg_Mail.From.Address := 'daheim@daheim.de';
  msg_Mail.ReplyTo.EmailAddresses := '';
  msg_Mail.Recipients.EmailAddresses := 'woanders@woanders.de';
  msg_Mail.Subject := 'Testmail.';
  msg_mail.AddHeader('Disposition-Notification-To: JOELH <daheim@daheim.de>');
  smtp.Connect(-1);
  if b_connect then
  begin
    smtp.Send( msg_Mail);
    smtp.Disconnect;
    b_connect := false;
  end;
  msg_Mail.Clear;
  msg_mail.Free;
end;


scheinbar nimmt er den Header nicht denn den zeigt Outlook wie folgt an:
Zitat:

Microsoft Mail Internet Headers Version 2.0
Received: from JOELH ([xxx.xxx.xxx.xxx]) by EXCLUSTER.win.daheim.de with Microsoft SMTPSVC(6.0.3790.1830);
Wed, 24 Jan 2007 10:21:59 +0100
From: daheim@daheim.de
Subject: Testmail.
To: woanders@woanders.de
Date: Wed, 24 Jan 2007 10:21:59 +0100
X-Priority: 3
X-Library: Indy 9.00.10
Return-Path: woanders@woanders.de
Message-ID: <EX1aJ09N7sEawxxaRs500001a66@EXCLUSTER.win.daheim.de>
X-OriginalArrivalTime: 24 Jan 2007 09:22:00.0050 (UTC) FILETIME=[19E78D20:01C73F99]



Ideen?

_________________
mfg. Joel
matze
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 4613
Erhaltene Danke: 24

XP home, prof
Delphi 2009 Prof,
BeitragVerfasst: Mi 24.01.07 12:14 
Dann schau dir doch mal an, welche Header Outlook verschickt, wenn du ne Lesebestätigung anforderst.
JoelH Threadstarter
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 806
Erhaltene Danke: 17

Win10
Delphi Alexandria 11.2 Patch 1
BeitragVerfasst: Mi 24.01.07 12:33 
da steht leider auch nicht mehr drin,

langsam glaub ich es liegt am Exchangeserver:

Denn dieser Header (incl. Mail)

Zitat:

Return-path: <daheim@daheim.de>
Delivery-date: Wed, 24 Jan 2007 11:15:26 +0100
Received: by ritzo.webpack.hosteurope.de running ExIM using esmtp
from server.hosteurope.de ([xxx.xxx.xxx.xxx])
id 1H9fA6-00012u-Hw; Wed, 24 Jan 2007 11:15:26 +0100
Received: from server.daheim.de ([xxx.xxx.xxx.xxx] helo=EXCLUSTER.win.daheim.de)
by server.hosteurope.de (xxx.xxx.xxx.xxx, server.hosteurope.de) running EXperimental Internet Mailer (even more power) using esmtp
id 1H9fA4-0006at-7l
for woanders@woanders.de; Wed, 24 Jan 2007 11:15:26 +0100
Content-class: urn:content-classes:message
MIME-Version: 1.0
Content-Type: multipart/alternative;
boundary="----_=_NextPart_001_01C73FA0.8F9845EE"
Disposition-Notification-To: "JOELH" <daheim@daheim.de>
X-MimeOLE: Produced By Microsoft Exchange V6.5
Subject: test
Date: Wed, 24 Jan 2007 11:15:23 +0100
Message-ID: <8DF1CEA72A8293479915A482EC2EF5900126B766@EXCLUSTER.win.daheim.de>
X-MS-Has-Attach:
X-MS-TNEF-Correlator:
Thread-Topic: test
Thread-Index: Acc/oI9re8GJL0WzRk6gvPCb1ECl+A==
From: "JOELH" <daheim@daheim.de>
To: <woanders@woanders.de>
X-HE-Virus-Scanned: yes
X-HE-Spam-Level: /
X-HE-Spam-Score: 0.9
X-HE-Spam-Report: Content analysis details: (0.9 points)
pts rule name description
---- ---------------------- --------------------------------------------------
0.7 MIME_HTML_MOSTLY BODY: Multipart message mostly text/html MIME
0.2 HTML_MESSAGE BODY: HTML included in message
Envelope-to: woanders@woanders.de

This is a multi-part message in MIME format.

------_=_NextPart_001_01C73FA0.8F9845EE
Content-Type: text/plain;
charset="us-ascii"
Content-Transfer-Encoding: quoted-printable

test


------_=_NextPart_001_01C73FA0.8F9845EE
Content-Type: text/html;
charset="us-ascii"
Content-Transfer-Encoding: quoted-printable

<html>

<head>
<META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; =
charset=3Dus-ascii">

<meta name=3D"Microsoft Theme 2.00" content=3D"PawPrint.htm 011">

<meta name=3DGenerator content=3D"Microsoft Word 10 (filtered)">

<style>
<!--
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:"Times New Roman";}
a:link, span.MsoHyperlink
{color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{color:purple;
text-decoration:underline;}
span.EmailFormatvorlage17
{font-family:Arial;
color:windowtext;}
@page Section1
{size:595.3pt 841.9pt;
margin:70.85pt 70.85pt 2.0cm 70.85pt;}
div.Section1
{page:Section1;}
-->
</style>

</head>

<body lang=3DDE link=3Dblue vlink=3Dpurple>

<div class=3DSection1>

<p class=3DMsoNormal><font size=3D2 face=3DArial><span =
style=3D'font-size:10.0pt;
font-family:Arial'>test</span></font></p>

</div>

</body>

</html>
=00
------_=_NextPart_001_01C73FA0.8F9845EE--


bringt ne Lesebestätigung :(

_________________
mfg. Joel
Fighter#1
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 787

Win XP, Ubuntu 8.04
Turbo Delphi 2006, Delphi 2005 Pe, Delphi 5 Pe, Netbeans 6.1, Eclipse, Microsoft VisualC#, Dev C++, PHP, HTML, CSS
BeitragVerfasst: Sa 03.02.07 12:08 
Also, mir ist aufgefallen, Outlook setzt bei JOELH anführungszeichen!!!!!!
Vll solltest du dies auch probieren, mehr fällt mir jetzt auch nicht auf
Disposition-Notification-To: "JOELH" <daheim@daheim.de>

_________________
Wer andere beherrscht ist stark,
wer sich selbst beherrscht ist mächtig. Lao Tse
Tilman
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 1405
Erhaltene Danke: 51

Win 7, Android
Turbo Delphi, Eclipse
BeitragVerfasst: Di 15.12.15 19:11 
Auch wenn das Thema uralt ist, man findet den Thread über Google. Ich hab es nach viel rumprobieren geschafft Lesebestätigungen anzufordern.

ausblenden Delphi-Quelltext
1:
idMessage.ExtraHeaders.AddValue('Disposition-Notification-To','"Name" <'+MAILADRESSE+'>');					


in meinem Fall unmittelbar vor dem senden mittels idSMTP, ich weiß aber nicht ob die Stelle eine Rolle spielt. Vielleicht hilft es jemandem :-)

_________________
Bringe einen Menschen zum grübeln, dann kannst du heimlich seinen Reis essen.
(Koreanisches Sprichwort)