texto por whatsApp

[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

[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

[alaminojunior]

Eu costumo trocar:

Código: Selecionar todos

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

[JoséQuintas]

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

[alaminojunior]

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.