FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Enviar correo en forma desatendida?
Armando
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Enviar correo en forma desatendida?
Posted: Mon Feb 25, 2019 05:29 PM

Hola Foreros:

Con las más recientes versión de FWH, más específicamente desde el PREVIEW existe
la forma de enviar por correo la imagen de la vista previa.

La pregunta, es posible llenar todo lo necesario y enviar el correo sin que pase por
Outlook?, es decir; pasar el destinatario, el mensaje, el título del mensaje y el o los
adjuntos y que el correo salga en forma automática?

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
karinha
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: Enviar correo en forma desatendida?
Posted: Tue Feb 26, 2019 04:40 PM
no use el preview, use el RMAIL.PRG:

http://www.pctoledo.com.br/forum/download/file.php?id=6904

Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Armando
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Enviar correo en forma desatendida?
Posted: Tue Feb 26, 2019 04:58 PM

Karinha:

Vou dar uma olhada :D

obrigado

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
karinha
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: Enviar correo en forma desatendida?
Posted: Tue Feb 26, 2019 05:12 PM
Armando, mira / olha: Enviando automático centenas de emails sem o usuário interferir. Botão: <Enviar Email Automático>.



Saludos, Saudações.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Armando
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Enviar correo en forma desatendida?
Posted: Tue Feb 26, 2019 05:56 PM

Kainha:

Muito Obrigado.

Saudações

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
karinha
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: Enviar correo en forma desatendida?
Posted: Tue Feb 26, 2019 06:20 PM
Armando, o dialogo que uso para melhor te ajudar. Como falas português, será fácil.

Code (fw): Select all Collapse
DLG_TIPO_OUTLOOK DIALOG 200, 63, 320, 290
STYLE DS_ABSALIGN | DS_MODALFRAME | 0x4L | WS_POPUP | WS_VISIBLE | WS_CAPTION
CAPTION "PLENOWIN: Enviador de Email da NF-e."
FONT 8, "MS Sans Serif"

{
 EDITTEXT 20, 60, 1, 236, 12, ES_MULTILINE | NOT WS_TABSTOP | WS_BORDER
 EDITTEXT 21, 60, 14, 236, 12, ES_MULTILINE | WS_BORDER | WS_HSCROLL | WS_GROUP | WS_TABSTOP
 EDITTEXT 22, 60, 27, 236, 12, ES_MULTILINE | WS_BORDER | WS_HSCROLL | WS_GROUP | WS_TABSTOP
 EDITTEXT 23, 60, 40, 236, 12, ES_MULTILINE | WS_BORDER | WS_HSCROLL | WS_GROUP | WS_TABSTOP
 EDITTEXT 24, 60, 53, 258, 12, ES_MULTILINE | WS_BORDER | WS_HSCROLL | WS_GROUP | WS_TABSTOP
 EDITTEXT 25, 0, 79, 318, 58, ES_MULTILINE | WS_BORDER | WS_VSCROLL | WS_TABSTOP
 PUSHBUTTON "&Enviar(Send) Email", 301, 22, 229, 110, 14
 PUSHBUTTON "Enviar Email &Automático", 303, 135, 229, 110, 14
 PUSHBUTTON "&Saida", 302, 248, 229, 50, 14
 PUSHBUTTON "A&nexar", 304, 108, 166, 50, 14
 PUSHBUTTON "E&xcluir", 305, 161, 166, 50, 14
 LISTBOX 101, 0, 182, 318, 50, LBS_STANDARD
 EDITTEXT 26, 0, 153, 318, 12, ES_MULTILINE | ES_WANTRETURN | NOT WS_TABSTOP | WS_BORDER | WS_HSCROLL | WS_GROUP
 RTEXT "De...:", 401, 7, 1, 50, 12, SS_RIGHT | NOT WS_GROUP
 RTEXT "Para...:", 402, 7, 14, 50, 12, SS_RIGHT | NOT WS_GROUP
 RTEXT "Cc...:", 403, 7, 27, 50, 12, SS_RIGHT | NOT WS_GROUP
 RTEXT "Cco...:", 404, 7, 40, 50, 12, SS_RIGHT | NOT WS_GROUP
 RTEXT "Assunto...:", 405, 7, 53, 50, 12, SS_RIGHT | NOT WS_GROUP
 LTEXT "Anexo(s):", 406, 18, 139, 50, 12, NOT WS_GROUP
 LTEXT "<ESC> Sair", 408, 268, 139, 50, 12, NOT WS_GROUP
 LTEXT "Arquivos *.PDF em: C:\\NFEPDF.", 410, 3, 249, 200, 12, NOT WS_GROUP
 CONTROL "TBitMap", 120, "TBitMap", WS_CHILD | WS_VISIBLE, 297, 14, 20, 12
 CONTROL "TBitMap", 121, "TBitMap", WS_CHILD | WS_VISIBLE, 297, 27, 20, 12
 CONTROL "TBitMap", 122, "TBitMap", WS_CHILD | WS_VISIBLE, 297, 40, 20, 12
 CONTROL "TBitMap", 125, "TBitMap", WS_CHILD | WS_VISIBLE, 247, 244, 70, 34
 LTEXT "                      joao@pleno.com.br                      ", 412, 3, 274, 314, 12, NOT WS_GROUP
 LTEXT "Para Enviar Email Para Vários Contatos, Ex.:", 411, 3, 261, 229, 12, NOT WS_GROUP
 RTEXT "*.PDF em:", 407, 71, 139, 50, 12, SS_RIGHT | NOT WS_GROUP
 CONTROL "GET/TEXT", 27, "EDIT", ES_LEFT | ES_MULTILINE | WS_CHILD | WS_VISIBLE, 124, 139, 62, 12
 LTEXT "Arquivos Anexados:", 409, 3, 169, 103, 12, NOT WS_GROUP
 CONTROL "", 801, "TDSay", 0 | WS_CHILD | WS_VISIBLE, 0, 67, 321, 12
 CTEXT "<Click> Duplo na Listbox Acima, Mostra os Arquivos Anexados da NFe.", 413, 1, 216, 318, 12, SS_CENTER | NOT WS_GROUP
}


Saudações.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
karinha
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: Enviar correo en forma desatendida?
Posted: Tue Feb 26, 2019 06:31 PM
Armando, para facilitar minha vida e a do cliente, criei um configurador de email parecido com o do outlook express/windows live mail. cada cliente usa o provedor que achar melhor. Veja:



Saudações.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Continue the discussion

Static archive · New replies & topics via GitHub Discussions