FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour xbrowse Email|PDF
Posts: 38
Joined: Fri Apr 22, 2016 10:19 PM
xbrowse Email|PDF
Posted: Wed Oct 17, 2018 07:35 PM

Good evening,
is it possible to send an Email with the data exported to TXT or PDF directly out of xbrowse?
Thank you and kind regards
Iris

Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: xbrowse Email|PDF
Posted: Thu Oct 18, 2018 01:04 AM
You need to write your own function for this.

Here is a sample function:
Code (fw): Select all Collapse
function SendMail( oBrw, cPdf, cAddress )

   local oMail, cFile

   cPdf     := TrueName( cPdf )
   cFile    := cFileNoPath( cPdf )

   oBrw:Report( nil, .F., nil, nil, nil, cPDF )

   DEFINE MAIL oMail ;
      TO cAddress ;
      SUBJECT cFile ;
      TEXT "" ;
      FILES cPdf, cFile ;
      FROM USER

   ACTIVATE MAIL oMail

return nil

You may modify this function according to your requirements.
Regards



G. N. Rao.

Hyderabad, India

Continue the discussion