Sayfayı Yazdır | Pencereyi Kapat

E-Posta mesajı nasıl oluştururum?

Nereden Yazdırıldığı: Datakent
Kategori: Diğer bölümler
Forum Adı: Borland Delphi
Forum Tanımlaması: Borland Delphi ile ilgili soru / sorun / paylaşım bölümü
URL: http://forum.datakent.com/forum_posts.asp?TID=2968
Tarih: 29.Mart.2024 Saat 04:09


Konu: E-Posta mesajı nasıl oluştururum?
Mesajı Yazan: murat turan
Konu: E-Posta mesajı nasıl oluştururum?
Mesaj Tarihi: 29.Temmuz.2017 Saat 10:39
E-Posta mesajı nasıl oluştururum?

using ShellAp;

var
  cmdx: String;
  ePostaAdresi:String; //email
  konu:String; //subject
  Mesaj:String; //body
  DosyaEki:String; //file
begin
  ePostaAdresi:='eposta@datakent.com';
  konu:='test mesajı';
  Mesaj:='bu bir denemedir.';
  DosyaEki:='C:\tmp\liste.doc';

  cmdx := 'mailto:'+ePostaAdresi+'?subject='+konu+'&body='+Mesaj+'&file='+DosyaEki;
 
  ShellExecute(0, 'open', PChar(cmdx), nil, nil, SW_SHOWNORMAL);
end



KeyWords: How can I create the email message?, programımdan nasıl eposta oluşturabilirin.



-------------
http://www.kasatakip.com - Kasa Takip  |  http://www.caritakip.com - Cari Takip  |  http://www.evraktakip.com - Evrak Takip  |  http://www.etasqlmobil.com - ETA SQL Mobil



Sayfayı Yazdır | Pencereyi Kapat