mail teslim bilgisi

[cmkare]

Arkadaşlar merhaba.

Delphi7 standart component idmessage ve idsmtp componentlerini kullanıyorum. Mail gönderebiliyorum ama teslim bilgiside atmak istiyorum. Yani attığım kişiye ulaştımı ulaşmadımı onu öğrenmek için. ne yapmam gerekiyor.

(idmsg1.ReceiptRecipient = okundu bilgisi atıyor.)

[xxxjedixxx]

IdMsg1.Headers.AddValue('Return-Receipt-To', 'deneme@domain.com');
veya
IdMsg1.Headers.AddValue('Return-Receipt-To', '<deneme@domain.com>');

Bunu dener misin?

[cmkare]

Merhabalar. yazdığın kodları denedim ama olmadı maalesef. İnternettede bununla ilgili bir bilgi bulamadım. Başka bir component yardımıyla yapılabilinirmi? yapılırsa hangi component?

[ikra]

Kod: Tümünü seç

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('Deneme.');
  end;
  msg_Mail.From.Address := 'gonderen@adres.com';
  msg_Mail.ReplyTo.EmailAddresses := '';
  msg_Mail.Recipients.EmailAddresses := 'alici@adres.com';
  msg_Mail.Subject := 'Testmail.';
  msg_mail.AddHeader('Disposition-Notification-To: <gonderen@adres.com>');
  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;

[cmkare]

@ikra Teşekkürler, ama bu gönderdiğin kod okundu bilgisi gönderiyor. Benim yapmak istediğim mail gittiği anda teslim bilgisi almak.
Outlookta Teslim bilgisi iste butonu varya o mantık. siz maili gönderdiğinizde mail karşı tarafa ulaştığı anda İletiniz 'aaa@aaa.com' adresine teslim edildi diye bir mail dönüyor. Aynı bu şeyi yaptırmak istiyorum.

[ikra]

sunu bir dene

Kod: Tümünü seç

idmessage.ReceiptRecipient.Text:= 'gonderen@adres.com'