Jump to content
Fivewin Brasil

fladimir

Membros
  • Posts

    364
  • Joined

  • Last visited

  • Days Won

    12

Everything posted by fladimir

  1. Olá pessoal, Uns anos atrás, quem enviava e-mail pelos seus sistemas usando conta GMail teve q criar seu aplicativo na conta google onde era definida uma senha e ai sim atribuir essa senha (mais forte digamos) para continuar usando (não sei se tinha outra forma) Recebi um e-mail ontem (19/01) do google e pelo q entendi vai deixar de funcionar isso a partir de Setembro de 2024, só sendo possível via oAuth2. Compartilho print do e-mail abaixo e fiquei na dúvida se interpretei corretamente o e-mail recebido. Caso sim, teremos (quem usa GMail) pensar em como resolver isso, pq não entendo como implementar o Auth2 no meu sistema pra permitir o envio de e-mail, tipo a cada envio de e-mail terá q abrir uma janela tipo browser pro usuário conectar na conta google? Se for assim não vai ficar prático e talvez a solução seja via API.
  2. Exato com o pessoal do Xailer q o Kapiaba postou, ou manda um e-mail para jlalin@nuevocodigo.com esse cara é (ou era) da panela dos responsáveis pelo Xailer.
  3. Pergunta pra mim q respondo, qual a dúvida?
  4. Não precisa mais, mudei de linguagem, caso os moderadores queiram apagar acho bom pq é um tópico morto em uma seção morta. Sucesso a todos
  5. Se interpretar ao pé da letra, o Google fala q vai desativar se não estiver sendo usada ou seja, no meu caso ali esta ATIVADO, então não dá a impressão q vai continuar funcionando sem fazer nada? Pq eu já tive q trocar a senha q não era segura para uma segura em Fevereiro, deu uma trabalheira danada ter q atualizar os clientes q não conseguiam mandar e-mail de notas fiscais etc, ai fiz uma senha para os padrões do google aceitável e REATIVOU o acesso a app menos seguro, e mesmo com esse comunicado ai acima, a impressão q se tem é q eles vão cortar de todos q não usavam isso e não permitir mais e manter ativo para os q já usavam não seria?
  6. 1) não tem limite de mensagens 2) não use para mandar mensagens em massa se não enquadra como SPAM e perde a conta de Whatsapp no número vinculado 3) a API vc gera quantas instâncias precisar, ou seja, pra quantos números precisar, cada número ficará vinculado a uma porta do teu servidor onde vc instalar ela 4) Não tem nada a ver isso ai com a API, o chip não fica amarrado, vinculado a uma chipeira algo assim, não é uma tecnologia física, é totalmente software. Pode ser usado pra enviar quantas mensagens quiser, pra todos os alunos, só tem q cuidar pra não incorrer em SPAM ou seja, cria uma fila de envio com intervalos de envios aleatórios entre as mensagens é uma sugestão. Pra vc entender, imagine o Whatsapp WEB, conhece? é essa tecnologia encapsulada em uma instância, ou seja, cada instância q vc gera para um número gera um EXE rodando no Tray (processo do windows) q tem o Whatsapp WEB (a grosso modo falando) encapsulado onde vc vincula o número q quiser. Talvez assim fique mais fácil de entender.
  7. Te chamei no particular pra avaliarmos mais tarde se consigo auxiliar.
  8. Sim mas o esquema é automatizar processos, desse jeito depende de interação humana, se usar a API vc automatiza mais o processo.
  9. Vi somente agora, exatamente o q o Leonardo informou.
  10. Bom dia Sim eu uso, teve uma atualização recentemente, veja se a sua esta atualizada Qualquer coisa posso liberar um endpoint, token e porta pra vc testar, caso funcione saberá q é a versão da sua API
  11. O código é a classe q o pessoal do ACBr disponibiliza junto com a dll ja vem o exemplo completo não precisa mais nada eu uso ela
  12. Eu uso qual a dúvida?
  13. Se quiser algo q funcione (não posso dizer da q vc tentou se funciona ou não, não testei) mas a API q eu citei alguns posts atrás to usando aki e esta funcionando, imagem, PDF texto tudo blz.
  14. Sim, mas o custo é único e vc usa com todos os clientes de sua carteira e com linhas/nrs de whats independentes, ou seja, sai de graça
  15. Essa aki q mostrei no vídeo @oliveiros e aproveitando obrigado pro compartilhar o trecho do teu código q permitiu criar a classe acima É da WTSApi q falei, ai nos links q compartilhei tem os vídeos e contato do Hendell.
  16. Bacana... @giovanyvecchi e como fazemos para capturar as respostas?
  17. Fiz um classe em HARBOUR pra essa API e compartilhei no fórum do Toledo, vou compartilhar aki tb, caso alguém queira testar. ******************************************************************************** function Exemplo_API_Whats LOCAL oWhats := TWhatsappAPI_WTS():New() oWhats:Situacao() oWhats:NivelBateria() oWhats:NrConectado() oWhats:EnviarMsg('55DDDCelularDestino', 'Teste *mensagem*') oWhats:EnviarMsg('55DDDCelularDestino', NIL, 'd:\documento.pdf') ; Inkey(2) oWhats:EnviarMsg('55DDDCelularDestino', NIL, 'd:\imagem.png') ; Inkey(2) oWhats:End() Quit() ******************************************************************************** #DEFINE httpGet 1 #DEFINE httpPost 2 ******************************************************************************** CLASS TWhatsappAPI_WTS DATA sToken INIT 'Token qdo vc adquirir ou pede pro Hendell pra testes' DATA sEndPoint INIT 'URL do seu ENDPOINT fica na tua estrutura, ou pede um pra testes' DATA sRet INIT '' DATA hHash INIT hb_Hash() DATA nMetodo INIT 0 // 1 GET 2 POST METHOD ComunicaAPI() METHOD Situacao() METHOD Obter_QRCode() METHOD NrConectado() METHOD NivelBateria() METHOD EnviarMsg() METHOD MostraRetorno() INLINE PTAlert( 'Codigo..:;'+ PADC( hb_cStr(::hHash['codigo'],70) ) +';' +; 'Mensagem:;'+ PADC( UPPER(ALLTRIM(hb_UTF8ToStr(hb_cStr(::hHash['mensagem'])))),70) +';' +; 'Retorno.:;'+ PADC( hb_cStr(::hHash['retorno'],70) ), aOk, vcroxo) // METHOD WhatsAPI_SetarWebhook() // essa parte nao fiz ainda q é a parte pra ler o retorno das mensagens Method End() INLINE Self := Nil ENDCLASS ******************************************************************************* METHOD Situacao() Class TWhatsappAPI_WTS Mensag("Consultando situacao da API...") ::ComunicaAPI("/whatsapp/situacao", httpGet) If 'false' $ ::hHash['retorno'] MsgInfo( "Nao conectado. Obtenha QRCode", 'Atenção' ) Else MsgInfo( "Whatsapp ja esta conectado.", 'Atenção' ) EndIf Return ******************************************************************************* METHOD NivelBateria() Class TWhatsappAPI_WTS Mensag("Consultando nivel bateria") ::ComunicaAPI("/whatsapp/bateria", httpGet) ::MostraRetorno() ******************************************************************************* METHOD NrConectado() Class TWhatsappAPI_WTS Mensag("Consultando Nr Conectado API...") ::ComunicaAPI("/whatsapp/meunumero", httpGet) ::MostraRetorno() Return ******************************************************************************** METHOD EnviarMsg(sContato, sMsg, sFilename) Class TWhatsappAPI_WTS LOCAL sURL DEFAULT sMsg TO '' DEFAULT sFilename TO '' IF EMPTY(sFilename) .AND. EMPTY(sMsg) Alert('falta parametro') RETURN ENDIF IF EMPTY(sFilename) Mensag("Enviando mensagem de texto...") sURL := "/whatsapp/msg" ELSE Mensag("Enviando arquivo...") sURL := "/whatsapp/arquivo" ENDIF ::ComunicaAPI(sURL, httpPost, sContato, sMsg, sFilename) ::MostraRetorno() ******************************************************************************** Procedure Obter_QRCode() Class TWhatsappAPI_WTS Mensag("Obtendo QRCode...") ::ComunicaAPIWhats('/whatsapp/qrcode', httpGet) // ATEN€ÇO O RETORNO AKI RETORNADO O QRCODE EM Q VC TEM Q CARREGAR UM OBJETO GRAFICO ATRAVES DE UMA LIB GRAFICA FIVEWIN, XAILER, MINIGUI, HWGUI ETC // If 'obtido com sucesso' $ ::hHash['mensagem'] // AKI CARREGA O OBJETO GRAFICO NA LIB Q VC USAR ::hHash['retorno'], { 20,20,-20,-20 }, "QR-CODE" // Else // MsgInfo( "O Whatsapp esta reiniciando. Favor repetir a operação.", 'Atenção' ) // EndIf Return *------------------------------------------------------------------------------* METHOD ComunicaAPI(sURL, nMetodo, sContato, sMsg, sFilename) Class TWhatsappAPI_WTS LOCAL cMetodo, oWeb, sContent := '' TRY oWeb := CreateObject( 'MSXML2.ServerXMLHTTP.6.0' ) CATCH oWeb := CreateObject( 'MSXML2.XMLHTTP' ) END IF EMPTY(sContato) .AND. nMetodo = httpPost Alert("Falta telefone") RETURN NIL END sURL := ::sEndPoint + sURL cMetodo := IIF( nMetodo == httpGet, 'GET', 'POST') oWeb:Open( cMetodo, sUrl, .F.) // True = pra vir o ResponseBody oWeb:SetRequestHeader( 'token', ::sToken ) IF nMetodo = httpPost oWeb:setRequestHeader( "contato", sContato ) IF .NOT. EMPTY(sFilename) oWeb:setRequestHeader( "filename", SUBSTR(ALLTRIM( CharRem( "[<(-)>]*&@:", sFileName ) ),2)) oWeb:setRequestHeader( "caption", SUBSTR(ALLTRIM( CharRem( "[<(-)>]*&@:", sFileName ) ),2)) sContent = hb_MemoRead(sFileName) sContent = hb_base64encode(sContent) sContent = hb_StrToUTF8(sContent) sContent = ALLTRIM( CharRem( CRLF, sContent ) ) ELSE IF .NOT. EMPTY(sMsg) sContent = sMsg ENDIF END oWeb:setRequestHeader( "Content-Type", "text/plain; charset=UTF-8" ) END TRY IF EMPTY(sContent) oWeb:Send( ) ELSE oWeb:Send( sContent ) ENDIF ::sRet := oWeb:ResponseBody() hb_jsondecode( ::sRet, @::hHash ) CATCH ; END RETURN NIL
  18. Existe sem custo mensal nem limite de mensagens... segue https://documenter.getpostman.com/view/4545782/SWTHbveC?version=latest#intro Vc vincula o Whats do cliente na API e ele usa, logicamente respeitando as regras do Whats para SPAM etc, e consegue enviar arquivos etc. Fiz uns videos e compartilhei um exemplo de como integrar (mas em outra linguagem) porém como é via GET e POST da pra fazer tranquilo em Harbour/Fivewin. Não comprei a API mas tenho conhecidos q usam, ela esta ativa a 3 anos. No link abaixo vc encontra os vídeos, informações e o contato do criador da mesma (telefone dele) e tb manual de utilização. Ele liberou um ENDPOINT e Token pra uso e esta funcionando aki nos testes O bacana é q vc pode comprar a API e usar na tua carteira de clientes. A API estava com promoção até este final de semana, achei ela no fórum do ACBr a promoção era até dia 13/03 ai conversei com o Hendell criador e falei q não tinha conhecimento da mesma onde o mesmo estendeu a promoção até este final de semana. https://wxdev.com.br/forum/index.php?/forum/20-dicas-e-truques/
  19. Bom dia Eu uso e foi o melhor investimento q fiz. Comprei os 3 Desktop, Mobile e Web. Deu uma sobre vida pra minha empresa e sistemas Meu foco é mobile, mas tenho projetos em Desktop e Web (pra 2 via de boleto e clinica de terapia) No q puder auxiliar pra dirimir as dúvidas baseadas na minha experiência fique a vontade, te mandei meus contatos em privado Temos um fórum brasileiro q começou em Outubro/2019 ( pq as comunidades existentes são internacionais e resolvemos criar um a nível Brasil.) Tem tb grupos de Skype onde o pessoal coloca as dúvidas. Tem tb um canal no youtube com + de 2000 videos demonstrando a linguagem e ferramenta (Windev Amarildo Matos q tb tem um BLOG) Tem alguns conhecidos do fórum Toledo e Fivewin q migraram ou usam como complemento Mobile/Web como Luis Fernando, Dorneles, Janio, Eu, Paulo RS, Automono. Pode ser q tenha mais mas estes são os q conheço. O Gilmer não sei se chegou a ver algo a nível de Mobile, até onde sei ele estava nos grupos de skype, talvez ele possa compartilhar a opinião dele tb, caso ele tenha aderido tb. No mais fico a disposição. Grande abraço.
  20. E como fez com o WTS e Windows 10 ou Servers 2012, 2016, 2019?
  21. Uso go global para desenvolvimento valor denlicenca em torno de 600 primão ano depois 250 renovação anual mas para usar com os clientes não vejo vantagem devido o custo de licença apesar de ser um excelente produto
  22. O Terminal Services de uns tempos pra cá esta complicado devido forçar a migração para W10 e WServers mais atualizados. Agora na tua fala @alex2002 entendi q o Microtik faria o trabalho igual ao TS? Ou seja trafegar somente telas? Seria isso? Se for resolve pra mim tb. Tem algum material a respeito se for isso q eu entendi?
  23. Mesmo com o CAPTCHA consegue consultar via URL?
  24. Isso ai Jorge, a DEVCON vai além de uma linguagem, promove um networking fantástico e trata de vários assuntos, e tb é uma forma de sair da rotina e descontrair com os amigos, trocar experiências e ideias. Sendo em SP acredito q muito mais pessoas poderão participar. Grande abraço.
×
×
  • Create New...