مشروع تجاري مضاد سرقة الجهاز افكار وسورس
#27
  • تم تعديل المكون الان اصبح يدعمل الرسائل html
  • يدعم اكثر من مستقبل
  • يدعم اكثر من مرفق
  • اظهار رسائل الخطا مثلا كلمة المرور غير صحيحة
  • التنصيب سهل اضط على (install.bat)
[صورة: 20130518120717.jpg]

الرسالة بشكل منسق

[صورة: 20130518121818.jpg]

الاستخدام
PHP كود :
function TForm1.SendMessage(_file1, _file2: string): Boolean;
begin
Result
:=False;
if ((
Length(Form4.sEdit1.text)<1) or  (Length(Form4.sEdit2.text)<1)) then
Form4
.ShowModal;
mail1.UserName:=Form4.sEdit1.Text ;
mail1.Password:=Form4.sEdit2.Text ;
mail1.Mailto.Add('user@g mail.com') ;
mail1.Subject:='Anti-Theft Rapport';
mail1.FromEmail :='user@g mail.com';
if 
mail1.HTMLBody then
mail1
.body:= GeoDZHtml(GetListIP[0]).text
else
mail1.body:= GeoDZ(GetListIP[0]).text;
mail1.Attachment.Add(cdir+_file1);
mail1.Attachment.Add(cdir+_file2) ;

if 
mail1.SendMail then begin
 Result
:=True;
 
DeleteFile(cdir+'tmp');
 
DeleteFile(cdir+_file1);
 
DeleteFile(cdir+_file2);
 
end else
begin
DeleteFile
(cdir+'tmp');
DeleteFile(cdir+_file1);
DeleteFile(cdir+_file2);
         
end;
end; 

يمكنك تغيير الخلفية والاطار
PHP كود :
'<div style="font-family: Arial, Helvetica, sans-serif;font-size: 12px;font-weight: normal;color: #4e4e4e;background: #FAFAFA;border: 2px solid #EFEFEF;padding:16px;border-radius: 8px;margin:14px;">' ; 
ولاكن لا تغيروا الحقوق


الملفات المرفقة
.rar   mail.rar (الحجم : 3.46 ك ب / التحميلات : 26)
الرد


الردود في هذا الموضوع
مشروع تجاري مضاد سرقة الجهاز افكار وسورس - بواسطة onexite - 18-05-2013, 12:20 PM

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم