mail gönderiminde okundu bilgisi isteme

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
gul_tanriover
Üye
Mesajlar: 18
Kayıt: 17 Eki 2006 11:24
Konum: İzmir

mail gönderiminde okundu bilgisi isteme

Mesaj gönderen gul_tanriover »

Arkadaşlar herkese merhaba,

Şirket için bir program hazırlıyorum.Toplu mail göndermeyi başardım ancak,gönderilen maillerin okunup okunmadığını öğrenmem gerkiyor ki müşteriyi aradığımda siz mailimizi almışsınız diyebileyim.Nasıl okundu bilgisi isteyebilirim?

Bilgisi olan varsa lütfen benimle paylaşsın.

Şimdiden çok teşekkürler....:)
Herşeye Rağmen....
Kullanıcı avatarı
SeRoKi
Üye
Mesajlar: 72
Kayıt: 09 Kas 2005 02:59
Konum: İstanbul

Mesaj gönderen SeRoKi »

okundu bilgisini göndermek için kullanıcıdan izin isteniyor bildiğim kadarıyla.
ya Hayır ı seçerlerse ??

indy help'e baktıktan sonra gelen edit:
idmessage nesnesinin Flags özelliğine mfSeen atanabilir.
Şöyle ki:

Kod: Tümünü seç

IdMessage1.Flags:=[mfSeen];
Flags özelliği TIdMessageFlagsSet olarak tenımlanmış. köşeli parantez içine şunlar da eklenebilir:
mfAnswered, mfFlagged, mfDeleted, mfDraft, mfSeen, mfRecent.

Kaynak: Internet Direct (Indy) 9.0 Yardım dosyası
erdoganturkmen

Mesaj gönderen erdoganturkmen »

Arkadaşlar kolay gelsin. Bende toplu mail gönderen bir program yapmam gerekiyor. Hangi nesneyi kullanarak yapmam gerekiyor ? Yapmışsanız bana yardımcı olursunuz umarım. Kolay gelsin.
ikut

mrb

Mesaj gönderen ikut »

erdoganturkmen yazdı:Arkadaşlar kolay gelsin. Bende toplu mail gönderen bir program yapmam gerekiyor. Hangi nesneyi kullanarak yapmam gerekiyor ? Yapmışsanız bana yardımcı olursunuz umarım. Kolay gelsin.
Arkadaşlar bu konu riskli bir konu. Biz şimdi nerden bilelim bu çıkacak programın SPAM göndermek için kullanılmayacağını ? Lütfen ne için kullanacaksınız onuda yazın
erdoganturkmen

Mesaj gönderen erdoganturkmen »

aa Doğru haklısınız. Bunu belirtmem gerekliydi. Çalıştığım şirkete bi web sitesi yaptım[Mermercilik üzerine]. Web sayfasındaki forumlardan iletişim mesajları var. Buraya diğer mermer şirketleri mail göndererek iletişim sağlamaya çalışıyorlar. Bende delphide yapmış olduğum program sayesinde ftp deki veritabanından bilgileri çekiyorum. bana gönderdikleri maillerde kendilerinin mail adresleri de var. Ben bunların hepsine birden mail göndermem gerekiyor. Amacım bu sn. Hocam :o
gul_tanriover
Üye
Mesajlar: 18
Kayıt: 17 Eki 2006 11:24
Konum: İzmir

Mesaj gönderen gul_tanriover »

SeRoKi yazdı:okundu bilgisini göndermek için kullanıcıdan izin isteniyor bildiğim kadarıyla.
ya Hayır ı seçerlerse ??

idmessage nesnesinin Flags özelliğine mfSeen atanabilir.
Şöyle ki:

Kod: Tümünü seç

IdMessage1.Flags:=[mfSeen];
Flags özelliği TIdMessageFlagsSet olarak tenımlanmış. köşeli parantez içine şunlar da eklenebilir:
mfAnswered, mfFlagged, mfDeleted, mfDraft, mfSeen, mfRecent.

Kaynak: Internet Direct (Indy) 9.0 Yardım dosyası

Seroki lütfen biraz daha açabilirmisin konuyu?ben bu kodu nereye eklemeliyim?
Herşeye Rağmen....
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

Selam..

- IdMessage1.Flags istediğiniz özellik değil. Bu mail server'den mail aldığınızda daha önce bu mailin yine sizin tarafınızdan okunup okunmadığını irdeler...

- Karşıdan Okundu Bilgisi İste için sormuşsunuz.

- Mail göndermeden önce aşağıdaki şekilde...

Kod: Tümünü seç

  IdMessage.ReceiptRecipient.Text   := 'rapor dönecek mail adresi';
derseniz, maili alan kişi tarafında otomatik olarak "Okunduğuna dair onay" istenir. Alıcı onay verirse bu kısımda verdiğiniz mail adresine ilgili rapor döner.

Örnek :
Okundu Bilgisi yazdı:Bu, şu kişiye gönderdiğiniz postanın okundu bilgisidir:
"<gönderilen e-mail adresi> - 15.12.2006 10:55

Bu alındı bilgisi, iletinin alıcının aşağıdaki bilgisayarında görüntülendiğini doğrulamaktadır:15.12.2006 10:55
Resim
Resim ....Resim
fduman
Moderator
Mesajlar: 2749
Kayıt: 17 Ara 2004 12:02
Konum: Ankara

Mesaj gönderen fduman »

Bu Microsoft Exchange sunucu ve MS Outlook Posta istemcisinin bir özelliği. Başka clientler ve protokollerde böyle birşey yok.

Dolayısıyla sadece @mrmarman'ın önerisini uygulayabilirsiniz. Müşterinin de buna tıklayıp tıklamayacağını bilemezsiniz.
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

@fduman evet haklı. Bunu eklemyi unutmuşum önemli bir ayrıntı.

- Örneklemek gerekirse; siz de bir eMail alma/gönderme programı hazırlıyorsunuz. Karşıdan bu bilgiyi içeren mail geldiğinde yazılımınız ile dikkate almazsanız bu bilginin hiçbir anlamı kalmaz. :idea:
Resim
Resim ....Resim
gul_tanriover
Üye
Mesajlar: 18
Kayıt: 17 Eki 2006 11:24
Konum: İzmir

Peki oulook'a yönlendiremezmiyim??

Mesaj gönderen gul_tanriover »

Önerileriniz için çok teşekkürler arkadaşlar , ancak takıldığım bir nokta var.Outlook Express 'e kurduğum posta hesabımı aracı olarak kullanabilirmiyim?Yani kendi programımdan okundu bilgisi isteyip,okundu bilgilerini outlook'un dikkate almasını sağlayamazmıyım?
Herşeye Rağmen....
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

Tabii kullanabilirsin.

Kod: Tümünü seç

  // Mail Body işlemleri
  IdMessage := TIdMessage.Create( nil );
  IdMessage.From.Name               := 'Muharrem ARMAN';
  IdMessage.From.Address            := 'gönderen email adresi';
  IdMessage.Recipients.Add;
    IdMessage.Recipients[0].Name    := 'eMerkez';
    IdMessage.Recipients[0].Address := 'alıcı email adresi';
  IdMessage.Subject                 := 'eMail Konusu';
  IdMessage.ContentType             := 'multipart/mixed';
  IdMessage.ReceiptRecipient.Text   := 'okundu bilgisi gelecek mail hesabı';
Resim
Resim ....Resim
gul_tanriover
Üye
Mesajlar: 18
Kayıt: 17 Eki 2006 11:24
Konum: İzmir

Mesaj gönderen gul_tanriover »

Merhabalar,

Tavsiye ettiğiniz kodları denedim ancak başarılı olamadım:(
Hatayı yakalayamıyorum.Mail gönderiyor ancak okundu iletisini göndermiyor.Neden Kaynaklanabilir sizce?


with IdMessage1 do
begin
TIDAttachment.create(IdMessage1.MessageParts,OpenDialog2.FileName);
TIDAttachment.create(IdMessage1.MessageParts,OpenDialog1.FileName);
From.text:='info@aaa.com';
from.Name:='ARENA ULUSLARARASI FUARCILIK LTD.STI.';
TIdMessage.Create( nil );
Recipients.Add;
Recipients.EMailAddresses:=listbox2.Items.Strings[a];
ContentType := 'multipart/mixed';
ReceiptRecipient.Text := 'info@aaaa.com';




Teşekkürler
Herşeye Rağmen....
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

@gul_tanriover

- Daha önce yayınladığım örnek kullandığım örnektir. Basitçe aşağıdaki şekilde deneyin ? Mail gönderiyor ama okundu iletisi göndermiyor demekle yanlış ifade etmişsiniz.

- Karşı taraftan okunduğuna dair onay istenir, okundu iletisi otomatik düzenlenmez. Bunun için karşı tarafın onayı gerekir. Onay karşı taraftan verilirse, ReceiptRecipient.Text içinde verdiğiniz mail adresine onay mesajı döner...

Kod: Tümünü seç

  // Mail Body işlemleri 
  IdMessage := TIdMessage.Create( nil ); 
  IdMessage.From.Name               := 'ARENA ULUSLARARASI FUARCILIK LTD.STI.'; 
  IdMessage.From.Address            := 'info@aaa.com'; 
  IdMessage.Recipients.Add; 
  IdMessage.Recipients[0].Address   := listbox2.Items.Strings[a]; 
  IdMessage.Subject                 := 'eMail Konusu'; 
  IdMessage.ContentType             := 'multipart/mixed'; 
  IdMessage.ReceiptRecipient.Text   := 'info@aaaa.com';
- Adım adım yazınız.

1. Mail gönderiliyor demişsiniz birinci adım tamam...
2. Karşı tarafın hesabından Outlook Express veya MS Outlook ile mesaj okunurken Onay mesajı çıkıyor mu ?
3. Onay mesajı çıkıyorsa, onay verilince karşı hesap size dönmek için doğru adrese onay maili otomatik düzenlenebiliyor ve yollanıyor mu ?

- Ancak bu aşamalarla cevap onay mailinin gelip gelmediğini irdeleyebilirsiniz.
Resim
Resim ....Resim
gul_tanriover
Üye
Mesajlar: 18
Kayıt: 17 Eki 2006 11:24
Konum: İzmir

Mesaj gönderen gul_tanriover »

Haklısınız,yanlış cümleler kullanmışım.Şu şekilde demeliydim;
-Toplu mail gönderebiliyorum
-Onay mesajı istemiyor

Tekrar deneyeceğim teşekkürler
Herşeye Rağmen....
gul_tanriover
Üye
Mesajlar: 18
Kayıt: 17 Eki 2006 11:24
Konum: İzmir

Mesaj gönderen gul_tanriover »

Merhabalar,

sizin yazdığınız kodları aynen yazıyorum ancak bir türlü olmuyor.Okundu raporuyla ilgili bir gelişme katedemiyorum.

Lütfen yardım:(

with IdMessage1 do
begin
TIdMessage.Create( nil );
From.Name := 'aaaa.';
From.Address := 'info@aaa.com';
Recipients.Add;
Recipients[0].Address := listbox2.Items.Strings[a];
Subject := 'Deneme maili'+' '+FormatDateTime('dd.mm.yyyy hh:nn:ss', Now);
ContentType := 'multipart/mixed';
ReceiptRecipient.Text := 'ddd@eee.com';
TIDAttachment.create(IdMessage1.MessageParts,OpenDialog2.FileName); //dosya ekle
TIDAttachment.create(IdMessage1.MessageParts,OpenDialog1.FileName); //dosya ekle
Herşeye Rağmen....
Cevapla