Siga-nos no Facebook Siga-nos no Instagram Siga-nos no LinkedIn Venha estudar Protheus
 
Bem Vindo Visitante Lista de Usuários

 Todos os Fórums
  ADVPL

Enviar para a impressoraImprimir   

Subject ADVPL - Inserir quebra de linha no e-mail.
Mensagem do Enviar e-mail Abrir o Perfil do usu�rio MARCIATAKE_ MARCIATAKE_ em 08/03/2021 as 13:52 hs
Local: PR   Membro desde: 21/08/2006  Postagem: 193
Como fao a quebra de linha no envio de e-mail do Corpo de mensagem?
Pois com + CRFL no est funcionando


cTexto := "" + CRFL
cTexto += "Estamos enviando o pedido conforme a solicitao." + CRFL
cTexto += "O mesmo ser despachado pela Transportador XXX." + CRFL
cTexto += "" + CRFL
cTexto += "" + CRFL
cTexto += "No h necessidade de responder este e-mail." + CRFL
cTexto += "" + CRFL

oMessage:cDate    := cValToChar( Date() )
oMessage:cFrom    := "@gmail.com"
oMessage:cTo      := "@gmail.com"
cMessage:cSubject := cTitulo       
oMessage:cBody    := cTexto

Mensagem do Enviar e-mail Abrir o Perfil do usu�rio RKGIUSTI RKGIUSTI em 08/03/2021 as 14:05 hs
Local: SP   Membro desde: 11/05/2016  Postagem: 2
Boa tarde,

Na varivel cTexto do oMessage:cBody concatene uma pgina em html:

cTexto := "<html>"
cTexto += "     <body>"
cTexto += "          Texto ser includo no corpo do e-mail."
cTexto += "     </body>"
cTexto += "</html>"

Realize os tratamentos em HTML com o testo que deseja enviar no corpo do e-mail, ento realize o envio.

Espero ter ajudado.

Mensagem do Enviar e-mail Abrir o Perfil do usu�rio MARCIATAKE_ MARCIATAKE_ em 08/03/2021 as 16:58 hs
Local: PR   Membro desde: 21/08/2006  Postagem: 193
No sei o que fiz errado, mas no funcionou.

cTexto := "<html>"
cTexto += "     <body>"
cTexto += "" + CRLF
cTexto += "Atendimento    : " + SUA->UA_NUM + SPACE(15) + "Data: " + DTOC(SUA->UA_EMISSAO) + CRLF
cTexto += "Cliente        : " + SUA->UA_CLIENTE + SUA->UA_LOJA + ' - ' + SA1->A1_NOME + CRLF
cTexto += "Operador(a)    : " + SUA->UA_OPERADO + ' - ' + SU7->U7_NREDUZ + CRLF
cTexto += "Vendedor(a)    : " + SUA->UA_VEND + ' - ' + _cNomeV + CRLF
cTexto += "     </body>"
cTexto += "</html>"

Mensagem do Enviar e-mail Abrir o Perfil do usu�rio MVINHOLI MVINHOLI em 08/03/2021 as 17:15 hs
Local: MS   Membro desde: 27/09/2006  Postagem: 141
Ol...
Se vc quer que seja um embaixo do outro, melhor pesquisar sobre CLULAS em HTML.
Do jeito que est fazendo no vai funcionar.

Marcelo Vinholi

Mensagem do Enviar e-mail Abrir o Perfil do usu�rio MARCIATAKE_ MARCIATAKE_ em 08/03/2021 as 17:26 hs
Local: PR   Membro desde: 21/08/2006  Postagem: 193
Vou pesquisar sobre clulas.

Este tentei, no deu certo tambm:
https://centraldeatendimento.totvs.com/hc/pt-br/articles/360024038172-MP-ADVPL-CONVERTER-TEXTO-PARA-BIN%C3%81RIO

Mensagem do Enviar e-mail Abrir o Perfil do usu�rio BASSRUANN BASSRUANN em 08/03/2021 as 17:32 hs
Local: DF   Membro desde: 06/12/2013  Postagem: 11
Boa tarde,

J tentou usar o <br/> em vez de CRLF?

cTexto := "<html>"
cTexto += "     <body>"
cTexto += "               <div id="text-email">"
cTexto += "                    <br/>"
cTexto += "                    <br/>Atendimento    : " + SUA->UA_NUM + SPACE(15) + "Data: " + DTOC(SUA->UA_EMISSAO)
cTexto += "                    <br/>Cliente        : " + SUA->UA_CLIENTE + SUA->UA_LOJA + ' - ' + SA1->A1_NOME
cTexto += "                    <br/>Operador(a)    : " + SUA->UA_OPERADO + ' - ' + SU7->U7_NREDUZ
cTexto += "                    <br/>Vendedor(a)    : " + SUA->UA_VEND + ' - ' + _cNomeV
cTexto += "          </div>"     
cTexto += "     </body>"
cTexto += "</html>"

Att,

Ruann Carlos
Consultor Protheus
www.rcarloslima.com

Mensagem do Enviar e-mail Abrir o Perfil do usu�rio MARCIATAKE_ MARCIATAKE_ em 08/03/2021 as 17:56 hs
Local: PR   Membro desde: 21/08/2006  Postagem: 193
D erro nesta linha: cTexto += "               <div id="text-email">"

alterei para cTexto += "               <div id="text-email"> , d erro.

Mensagem do Enviar e-mail Abrir o Perfil do usu�rio RKGIUSTI RKGIUSTI em 08/03/2021 as 19:29 hs
Local: SP   Membro desde: 11/05/2016  Postagem: 2
Ol,

Remova o id="text-email" deixando-o assim:

cTexto += "               <div>"

ou se preferir deixar o id, deixe-o assim:

cTexto += "               <div id='text-email'>"

O id somente servir se vc for estilizar, ou utilizar um javascript, o que neste caso no ser utilizado, ou seja, no ter efeito.

Nos informe se deu certo.

Abrax.

Mensagem do Enviar e-mail Abrir o Perfil do usu�rio MARCIATAKE_ MARCIATAKE_ em 08/03/2021 as 21:49 hs
Local: PR   Membro desde: 21/08/2006  Postagem: 193
Deu certooooo, obrigada.

Falta ainda o Detalhe que d erro.
Eu no posso fazer assim?

cTexto += "            <br/>ALLTRIM(SUB->UB_PRODUTO) + "-" + ALLTRIM(_DESC) + "| Qtde: " + STR(SUB->UB_QUANT,5) + "| Vlr: " + STR(SUB->UB_VRUNIT,10,2) + "| Total: " + STR(SUB->UB_QUANT*SUB->UB_VRUNIT,10,2)+ "| Desconto aplicado: " + STR(SUB->UB_VALDESC,10,2)


cTexto += "            <br/>"TOTAL ---> | Qtde: " + STR(_TOTQTDE,6) + "| Total: " + STR(_TOTVLR,12,2)

Mensagem do Enviar e-mail Abrir o Perfil do usu�rio MARCIATAKE_ MARCIATAKE_ em 09/03/2021 as 08:30 hs
Local: PR   Membro desde: 21/08/2006  Postagem: 193
Obrigada todos que me auxiliaram, consegui arrumar.

Para participar do Fórum você precisa efetuar login primeiro
Caso você não esteja registrado registre-se para participar do fórum

 Mudar para Fórum