{"id":9530,"date":"2020-04-02T11:51:38","date_gmt":"2020-04-02T14:51:38","guid":{"rendered":"http:\/\/kb.elipse.com.br\/?p=9530"},"modified":"2024-09-09T13:03:08","modified_gmt":"2024-09-09T16:03:08","slug":"enviando-mensagens-no-whatsapp-via-elipse-e3-power","status":"publish","type":"post","link":"https:\/\/kb.elipse.com.br\/en\/enviando-mensagens-no-whatsapp-via-elipse-e3-power\/","title":{"rendered":"Enviando mensagens no WhatsApp via Elipse E3\/Power."},"content":{"rendered":"

Este artigo demonstra como configurar e efetuar o envio de mensagens<\/strong> do aplicativo WhatsApp via aplica\u00e7\u00e3o Elipse E3\/Power.<\/p>\n

\u00c9 necess\u00e1rio utilizar um provedor de mensagens, que atrav\u00e9s de integra\u00e7\u00f5es Web API\u2019s, permite o envio de mensagens via WhatsApp.
\nNeste exemplo utilizaremos a plataforma Zenvia<\/a>, mas outros provedores<\/a> podem ser utilizados.
\nA API segue o modelo HTTP padr\u00e3o, baseado em solicita\u00e7\u00e3o e resposta.<\/p>\n

<\/h2>\n

API do WhatsApp<\/b><\/h2>\n

1.<\/strong> Primeiramente, \u00e9 necess\u00e1rio criar uma conta no provedor<\/a>, para obter o acesso a API:<\/p>\n

\"\"<\/a><\/p>\n

Este acesso \u00e9 fornecido gratuitamente.<\/strong><\/p>\n

2.<\/strong> Logo ap\u00f3s realizar o login, \u00e9 poss\u00edvel testar a API via Sandbox e validar a integra\u00e7\u00e3o, para isso basta acessar este endere\u00e7o<\/a>.<\/p>\n

\"\"<\/a><\/p>\n

3.<\/strong> No painel de valida\u00e7\u00e3o da API, selecione a op\u00e7\u00e3o “Criar novo teste”, e selecione o canal “WhatsApp”<\/p>\n

\"\"<\/a><\/p>\n

4.<\/strong> Em seguida inclua o(s) contato(s) para recebimento da mensagem:<\/p>\n

\"\"<\/a><\/p>\n

5.<\/strong> Com o contato inclu\u00eddo, \u00e9 poss\u00edvel enviar uma mensagem. Logo abaixo \u00e9 informada a resposta de envio da requisi\u00e7\u00e3o realizada:<\/p>\n

\"\"<\/a><\/p>\n

NOTA:<\/strong> Caso ocorra algum tipo de instabilidade ao enviar a mensagem teste, \u00e9 poss\u00edvel gerar um token manualmente e ent\u00e3o inserir os dados no cabe\u00e7alho da solicita\u00e7\u00e3o via Elipse E3. Para gerar o token, verifique este endere\u00e7o<\/a>.<\/p>\n

Utilizando o WhatsApp com o Elipse E3\/Power<\/strong><\/h2>\n

1.<\/strong> Para realizar a escrita na API, utilizamos o objeto ServerXMLHTTP<\/strong>, que fornece m\u00e9todos e propriedades que permitem estabelecer uma conex\u00e3o HTTP entre arquivos ou objetos em diferentes servidores web. Com base no request utilizado no teste anterior, o script abaixo foi utilizado para enviar a mensagem ao telefone desejado:<\/p>\n

Sub CommandButton1_Click()\r\n  number = Screen.Item(\"spNumber\").Value\r\n  msg = Screen.Item(\"spMessage\").Value\r\n  WhatsAppMessage_Send number, msg   \r\nEnd Sub\r\n\r\nfunction WhatsAppMessage_Send(strNumber, strMessage)\r\nAPI_URL = \"https:\/\/api.zenvia.com\/v2\/channels\/whatsapp\/messages\"\r\nstrJson = \"{\"\"from\"\": \"\"abundant-judo\"\",\"\"to\"\": \"\"\" & strNumber & \"\"\",\"\"contents\"\": [{\"\"type\"\": \"\"text\"\",\"\"text\"\":\"\"\" & strMessage & \"\"\"}]}\"\r\n\r\n   Set oHttp = CreateObject(\"Msxml2.ServerXMLHTTP\")\r\n   oHttp.Open \"POST\", API_URL, False\r\n   oHttp.setRequestHeader \"Content-type\", \"application\/json\"\r\n   oHttp.setRequestHeader \"X-API-TOKEN\", \"IRET6aFOkplLDPvBY3NJR-X3FfZmBvncxL79\"\r\n   oHttp.Send strJson\r\n\r\nsHTML = oHttp.ResponseText\r\nMsgBox sHTML  \r\nend function\r\n\r\nSub Vazia()\r\nEnd Sub<\/pre>\n
2.<\/strong> Ap\u00f3s a solicita\u00e7\u00e3o de envio da mensagem, a seguinte resposta ser\u00e1 exibida:<\/p>\n
\"\"<\/a><\/p>\n
Utilizando o WhatsApp com o Elipse E3\/Power via driver VBScript<\/strong><\/h2>\n
1.<\/strong> Por quest\u00f5es de performance, podemos implementar o envio das mensagens utilizando o driver VBScript com a estrutura JSON, acrescentando as linhas abaixo:<\/p>\n
\"\"<\/a><\/p>\n
DIM strMessage, strNumber, sHTML \r\n\r\nSub OnWrite_Number(r, v)\r\nstrNumber = v.Value\r\nEnd Sub\r\n\r\nSub OnRead_Number(r, v)\r\n v.Value = strNumber \r\nEnd Sub\r\n\r\nSub OnWrite_Message(r, v)\r\nstrMessage  = v.Value\r\nEnd Sub\r\n\r\nSub OnRead_Message(r, v)\r\n v.Value = strMessage  \r\nEnd Sub\r\n\r\nSub OnRead_Response(r, v)\r\nv.Value = sHTML \r\nEnd Sub\r\n\r\nSub OnWrite_Send(r, v)\r\n API_URL =\"https:\/\/api.zenvia.com\/v2\/channels\/whatsapp\/messages\"\r\n strJson = \"{\"\"from\"\": \"\"abundant-judo\"\",\"\"to\"\": \"\"\" & strNumber & \"\"\",\"\"contents\"\": [{\"\"type\"\": \"\"text\"\",\"\"text\"\":\"\"\" & strMessage & \"\"\"}]}\"   \r\n   Set oHttp = CreateObject(\"Msxml2.ServerXMLHTTP\")\r\n   oHttp.Open \"POST\", API_URL, False\r\n   oHttp.setRequestHeader \"Content-type\", \"application\/json\"\r\n   oHttp.setRequestHeader \"X-API-TOKEN\", \"IRET6aFOkplLDPvBY3NJR-X3FfZmBvncxL79\"\r\n   oHttp.Send strJson\r\n\r\n  sHTML = oHttp.ResponseText\r\nEnd Sub\r\n\r\n<\/pre>\n
2.<\/strong> Ent\u00e3o, crie quatro tags no Driver e configure-os atrav\u00e9s da coluna Item (propriedade ParamItem<\/em>):<\/p>\n
\"\"<\/a><\/p>\n
 <\/p>\n
Em conclus\u00e3o, voc\u00ea encontrar\u00e1 no anexo deste artigo uma aplica\u00e7\u00e3o exemplo que foi desenvolvida no Elipse E3 v6.5.161<\/strong>.<\/p>\n
\"\"<\/a><\/p>\n
Artigos Relacionados<\/h3>\n
\n