MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    [Resolvido]API WhatsApp

    avatar
    Dougtha91
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 81
    Registrado : 19/05/2017

    [Resolvido]API WhatsApp Empty [Resolvido]API WhatsApp

    Mensagem  Dougtha91 em 5/9/2018, 16:19

    Pessoal,
    Estou com esta API ele funciona super bem, porém uma parte do código que citarei abaixo:

    Sub Enviar()

    Dim textEnviar, Contatcs As String

    'texto ao ser enviado, os espaços são substituidos por %20

    textEnviar = Replace("OLÁ, ISSO É UM TESTE", "", "%20")

    'insiro o nº de celular que deve ser composto por 55 que é o pais + DDD da cidade sem o zero + o nº celular sem traço

    Contatcs = "5511981782382"

    'abre o navegador e cria a mensagem

    Application.FollowHyperlink "https://api.whatsapp.com/send?phone=" & Contatcs & "&text=" & textEnviar


    A PARTIR DESTA PARTE NÃO FUNCIONA MAIS, PORQUE O API ABRE UMA TELA ONDE TENHO QUE CLICAR TAB DUAS VEZES E ENTER DUAS VEZES, SÓ QUE ESSE CÓDIGO NÃO FUNCIONA NA TELA DO API ELE EXECUTA A FUNÇÃO DENTRO DA TELA DO VBA SÓ.


    'pause de 3 segundos

    'Fazer (3)

    'tab e dois enter para enviar

    Call SendKeys("{TAB}", True)
    Call SendKeys("{TAB}", True)
    Call SendKeys("{ENTER}", True)
    Call SendKeys("{ENTER}", True)

    End Sub

    Vocês conseguem me ajudar?
    avatar
    Dougtha91
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 81
    Registrado : 19/05/2017

    [Resolvido]API WhatsApp Empty API WhatsApp

    Mensagem  Dougtha91 em 5/9/2018, 20:31

    Resolvido.
    avatar
    fazerbem
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 05/03/2017

    [Resolvido]API WhatsApp Empty Re: [Resolvido]API WhatsApp

    Mensagem  fazerbem em 13/3/2019, 16:27

    Ola como resolveu ai , pode nos passar a solucao ?


    Conteúdo patrocinado

    [Resolvido]API WhatsApp Empty Re: [Resolvido]API WhatsApp

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 15/7/2019, 19:35