MailExport, how to check is sended?

Comments

• HERBERTS

  February 2008 edited 7:33PM

  Hello Coolman_kk,
  If the mail has been sent succesfully , then you wont get any feedback . But if it has not been sent due to some errors , then you will be informed that it has not been sent due to some errors .
• coolman_kk

  February 2008 edited 7:33PM

  Ok, This is my code:
  He working ok, but when disconnect network cable I not get a error message, nothing!?
  
  I want catch is sended or not?
  Thank you
  
  
  Form132.frxMailExport1.FromMail := 'mail@bgbox.net';
  Form132.frxMailExport1.FromName := 'mail@bgbox.net';
  Form132.frxMailExport1.Subject := 'INVOICE';
  Form132.frxMailExport1.FromCompany := 'AMK';
  Form132.frxMailExport1.SmtpHost := 'mail.bg';
  Form132.frxMailExport1.SmtpPort := 25;
  Form132.frxMailExport1.Login := 'bgbox.net';
  Form132.frxMailExport1.Password := '*********';
  Form132.frxMailExport1.Lines.Clear;
  Form132.frxMailExport1.Lines.Add( 'Text' );
  Form132.frxMailExport1.Address := 'zzz@bgbox.net';
  
  Form132.frxReport1.LoadFromFile( 'cit0010.fr3' );
  
  Form132.frxReport1.EngineOptions.SilentMode := True;
  Form132.frxReport1.PrepareReport;
  
  Form132.frxMailExport1.ShowExportDialog := False;
  Form132.frxMailExport1.ExportFilter := Form132.frxPDFExport1;
  
  Form132.frxReport1.Export(Form132.frxMailExport1);
  
• coolman_kk

  February 2008 edited February 2008

  Do you HELP me????
  
  When SilentMode = Flase Error message opened, I found it
  Form132.frxReport1.EngineOptions.SilentMode := True;
  
  but now I want to catch error without message, like that
  
  try
  Form132.frxReport1.Export(Form132.frxMailExport1);
  except
  bError := True;
  end;
  
  Thank you