delphi4arab منتديات دلفي للعرب

نسخة كاملة : كيفية إرسال E-Mail دون التطرق إلى برامج خارجية
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم و رحمة الله تعالى و بركاته
كيف إرسال إيميل مباشرة من المشروع دون التطرق إلى برامج خارجية
استعمل idsmtp

المكون الموجود مع مجموعة indy القيمة

PHP كود :
IdMessage1.Body.Assign(Memo1.Lines);

////

IdSMTP1.Host:='delphi4arab';
IdSMTP1.Port:='8080';
IdSMTP1.UserName:='delphi';
IdSMTP1.Password:='arab';

////

IdSMTP1.Connect;

/////

IdSMTP1.Send(IdMessage1); 

بالتوفيق
PHP كود :
iehttp1.RequestMethod := 'POST';
iehttp1.ExecuteURL('http://bytescloud.net/Uploads/Private/1739471234_1.php?To=user@xxx.com&subject='+edit2.Text+'&content='+memo1.Text); 
هذا الميلر من طرف صديق لم اقم برفعه وجدته في احد المواقع