Hoje iremos continuar nossa série de mensagens para o WhatsApp, mostrando como enviar Emojis automaticamente via AdvPL nas mensagens.
Primeiramente pessoal, tenha os fontes NETiZAP.prw e zZapSend.prw disponibilizados semana passada – clique aqui para saber mais.
Agora, o que precisamos saber, é que para usar os emojis, precisamos saber o código deles usado pelos navegadores e motores de internet.
Existem inúmeros sites que disponibilizam essa informação, no meu caso usei como exemplo o iemoji.com, por exemplo, esse é o link do emoji de hambúrguer – http://www.iemoji.com/view/emoji/433/food-drink/hamburger.
Após você acessar o emoji, navegue na página até encontrar a parte com C/C++/Java Src, então copie o conteúdo sem as aspas:
Com o código copiado, iremos agora para a parte via AdvPL, eu recomendo criar variáveis para os emojis, e colocar o conteúdo delas.
Então nosso exemplo de envio de mensagens, ficaria dessa forma:
//Bibliotecas
#Include "TOTVS.ch"
/*/{Protheus.doc} User Function zZapEmoji
Função de teste para envio de mensagens para o WhatsApp com emojis
@type Function
@author Atilio
@since 05/08/2021
@version version
@obs A lista de emojis você pode ver em http://www.iemoji.com
Navegue até encontrar C/C++/Java Src, então copie o código sem as aspas
/*/
User Function zZapEmoji()
Local aArea := GetArea()
Local aZap := {}
Local cSorriso := "\uE057"
Local cHamburguer := "\uE120"
Local cBacon := "\uD83E\uDD53"
Local cPizza := "\uD83C\uDF55"
Local cMensagem := ""
//Monta a mensagem para enviar com os emojis
cMensagem := "Hey Dan! " + cSorriso + " "
cMensagem += "Sei que ainda é cedo, mas que tal uma gordice? "
cMensagem += cHamburguer + cBacon + cPizza
//Faz o teste de envio
aZap := u_zZapSend("5514999998888", cMensagem)
//Se houve falha, mostra a mensagem de erro
If ! aZap[1]
MsgStop(aZap[2], "Falha no envio")
EndIf
RestArea(aArea)
Return
E abaixo um print do resultado da mensagem:
Obs.: Os códigos desenvolvidos nessa série do WhatsApp, estão dentro do nosso GitHub, o link é https://github.com/dan-atilio/AdvPL.
Lembrando também pessoal, se tiverem interesse em adquirir uma licença da API, entrem em contato com o pessoal da NETiZAP clicando aqui, e digam que conhecem o Atilio do Terminal de Informação.
Bom pessoal, por hoje é só.
Abraços e até a próxima.

