Page 1 of 1

Enviar correo de PREVIEW, con dstinatario?

Posted: Tue Jul 17, 2018 2:27 pm
by Armando
Hola Amigos:

En versiones recientes la vista previa nos permite la facilidad de llamar
a Outlook para enviar la vista previa por e-mail.

La pregunta, es posible indicar a Outlook la dirección del destinatario,
asunto y mensaje?

Saludos

Re: Enviar correo de PREVIEW, con dstinatario?

Posted: Wed Jul 18, 2018 11:02 am
by gmart1
Hola,
intenta usar bEmail de la clase rpreview.

Mira esto : http://forums.fivetechsupport.com/viewt ... il#p201049

Un saludo.

Re: Enviar correo de PREVIEW, con dstinatario?

Posted: Wed Jul 18, 2018 1:11 pm
by Armando
gmart1:

Muchas gracias, le voy a tirar un ojo.

Saludos

Re: Enviar correo de PREVIEW, con dstinatario?

Posted: Sat Jul 21, 2018 3:30 am
by Armando
gmart1

Te cuento que no doy pie con bola, hay algún ejemplo?

Saludos

Re: Enviar correo de PREVIEW, con dstinatario?

Posted: Mon Jul 23, 2018 1:48 pm
by karinha
Armando, que yo sepa, esto sólo funciona con Windows Live Mail.

Code: Select all

METHOD SendEmail() CLASS TPreview

   local oMail, cName, cFile

   cName := If( ::oReport != nil, ::oReport:cName, ::oDevice:cDocument )
   cFile := cFilePath( ::oDevice:aMeta[ 1 ] ) + StrTran( cName, '.', '' ) + ;
            Left( HB_TToS( HB_DateTime() ), 14 ) + ".pdf"

   CursorWait()
   cFile := ::SaveAs( .t., cFile, .f. )
   CursorArrow()

   if ! File( cFile )
      MsgInfo( FWString( "PDF not saved to send Email" ), FWString( "Information" ) )
   elseif ::bEmail != nil
      Eval( ::bEmail, Self, cName, cFile )
   else
      DEFINE MAIL oMail ;
         SUBJECT cName ;
         TEXT "Prezado Cliente, Segue Anexo, o PDF da NF-e." ;
         FILES cFile, cFile ;
         FROM USER

      ACTIVATE MAIL oMail

      // MsgInfo( oMail:nRetCode )  check the returned code!
   endif

   ::oMeta1:SetFocus()

return nil
 
Saludos.

Re: Enviar correo de PREVIEW, con dstinatario?

Posted: Mon Jul 23, 2018 4:27 pm
by Armando
Karinha:

Te agradezco la respuesta, ojalá Antonio nos provea de esta facilidad, sería un
buen complemento a lo que ya hay.

Saludos

Re: Enviar correo de PREVIEW, con dstinatario?

Posted: Mon Jul 23, 2018 6:19 pm
by karinha