Página 1 de 1

texto por whatsApp

Enviado: 02 Abr 2025 12:24
por paiva
Boa tarde

ao enviar um TEXTO pegando de um TXT

a cada quebra de linha coloco \n

em alguns clientes com w10 (NAO todos)

ao enviar não é feita a quebra de linha

me indicaram trocar por \u000A (usado em harbour) Não funcionou

teria algum outro codigo para Xharbour ?

desde já agradeço

PAiva

texto por whatsApp

Enviado: 02 Abr 2025 12:54
por paiva
aqui em casa com W10 funciona nas duas formas /n ou /u000A

ate peguei o txt lá da cliente e sem mexer em nada funciona

acredito que deve ser alguma parametrização do WIN que ferra nesses 2 clientes específicos

texto por whatsApp

Enviado: 03 Abr 2025 10:53
por alaminojunior
Eu costumo trocar:

Código: Selecionar todos

Chr(13) + Chr(10)
// por
"\r\n"

texto por whatsApp

Enviado: 03 Abr 2025 12:37
por JoséQuintas
lineending.png
CR = Chr(13) = Carriage Return = retornar ao início (talvez derivado da máquina de escrever)
LF = Chr(10) = Line Feed = avanço de linha

Acho que tem função pronta pros dois, senão é criar.

Código: Selecionar todos

IF ! hb_Eol() $ cText
   IF hb_Lf() $ cText
      cText := StrTran( cText, hb_Lf(), hb_Eol() )
   ELSEIF hb_cr() $ cText
      cTet := StrTran( cText, hb_cr(), hb_Eol()
   ENDIF
ENDIF
IF Right( cText, 1 ) == Chr(26) // control-z fim de arquivo NO DOS Ctrl-Z
   cText := Left( cText, Len( cText ) - 1 )
ENDIF

texto por whatsApp

Enviado: 03 Abr 2025 13:31
por alaminojunior
alaminojunior escreveu:Eu costumo trocar:

Código: Selecionar todos

Chr(13) + Chr(10)
// por
"\r\n"
A grande questão é que normalmente as API´s para WhatsApp estão em servidores Linux.