Inviare messaggi Telegram da VBA

di il
6 risposte

Inviare messaggi Telegram da VBA

Buongiorno a tutti

Mi sono appena iscritto e mi scuso se dovessi violare qualche regola.

Sto realizzando un DataBase in Access 2016 per la gestione di interventi tecnici ed ho la necessità di inviare messaggi 

di notifica ad un mio cliente con Telegram Web. Potrei fare il copia/incolla ma mi piacerebbe farlo tramite pulsante in modo 

automatico. Ho fatto qualche ricerca in rete ma quello che ho trovato non riesco ad adattarlo. 

Avrei bisogno di qualche suggerimento per me comprensibile (non sono molto esperto).

Grazie.

6 Risposte

  • Re: Inviare messaggi Telegram da VBA

    Ci dovresti far vedere quello che hai gia realizzato, per renderci conto dell approccio.

    Comunque solitamente si usano le api di telegram, e non sono semplici da usare. Occorre essere molto ferrati su telegram e su access .

  • Re: Inviare messaggi Telegram da VBA

    Anzitutto grazie.

    In effetti proprio perchè non è molto semplice, sto provando ad usare il codice trovato su un forum su Excel, ho immaginato 

    che potessi adattarlo. 

    Ho creato un token su telegram web e l'ho inserito nel codice ma ho diversi dubbi...

    Sub Telegram()

    Dim objHTTP As Object

    Dim strPostData As String

    Dim strChatId As String

    Dim strMessage As String

    Dim URL As String

    strChatId = -1001416222264#

        strMessage = "prova"

        strPostData = "chat_id=" & strChatId & "&text=" & strMessage

        Set objHTTP = CreateObject("MSXML2.XMLHTTP")

        URL = "https://api.telegram.org/bot1176474286:AAEyQwjlkL................./sendMessage?"

    objHTTP.Open "POST", URL, False

        objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"

        objHTTP.send (strPostData)

    End Sub

    1) strChatID deve essere l'identificativo del destinatario del messaggio?

    2) L'oggetto MSXML2.XMLHTTP è corretto?

    3) Credo che il bot di telegram vada configurato ma non so come e non credo che questo sia il forum giusto

    Riuscissi a risolvere almeno i primi 2 punti non sarebbe male.

    Grazie mille.

  • Re: Inviare messaggi Telegram da VBA

    Così non s8 capisce nulla, usa la formattazione del codice , vedi il regolamento

  • Re: Inviare messaggi Telegram da VBA

    Anzitutto grazie.
    In effetti proprio perchè non è molto semplice, sto provando ad usare il codice trovato su un forum su Excel, ho immaginato 
    che potessi adattarlo. 
    Ho creato un token su telegram web e l'ho inserito nel codice ma ho diversi dubbi...
    
    
    Sub Telegram()
    Dim objHTTP As Object
    Dim strPostData As String
    Dim strChatId As String
    Dim strMessage As String
    Dim URL As String
    
    	strChatId = -1001416222264#
        strMessage = "prova"
        strPostData = "chat_id=" & strChatId & "&text=" & strMessage
    
        Set objHTTP = CreateObject("MSXML2.XMLHTTP")
        URL = "https://api.telegram.org/bot1176474286:AAEyQwjlkL................./sendMessage?"
                
    	objHTTP.Open "POST", URL, False
        objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
        objHTTP.send (strPostData)
    
    End Sub
    
    1) strChatID deve essere l'identificativo del destinatario del messaggio?
    2) L'oggetto MSXML2.XMLHTTP è corretto?
    3) Credo che il bot di telegram vada configurato ma non so come e non credo che questo sia il forum giusto
    
    Riuscissi a risolvere almeno i primi 2 punti non sarebbe male.
    
    Grazie mille.
  • Re: Inviare messaggi Telegram da VBA

    Sub Telegram()
    Dim objHTTP As Object
    Dim strPostData As String
    Dim strChatId As String
    Dim strMessage As String
    Dim URL As String
    
    	strChatId = -1001416222264#
        strMessage = "prova"
        strPostData = "chat_id=" & strChatId & "&text=" & strMessage
    
        Set objHTTP = CreateObject("MSXML2.XMLHTTP")
        URL = "https://api.telegram.org/bot1176474286:AAEyQwjlkL................./sendMessage?"
                
    	objHTTP.Open "POST", URL, False
        objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
        objHTTP.send (strPostData)
    
    End Sub

    Scusate… non avevo idea di come sarebbe risultato…. quando l'ho incollato era formattato correttamente. Spero che così si possa leggere meglio.

  • Re: Inviare messaggi Telegram da VBA

    Telegram ha molti tipi di “bot” con diverse autorizzazioni e permessi. Devi creare il bot e poi attivarlo da telegram.

    Devi poi avere anche un posto fisico dove farlo girare e gestire. Che nel tuo caso sarebbe il tuo pc. 4 o 5 anni fa ne creai uno, ma dovetti studiare molto.non penso che scopiazzando del codice ci si riesca. 

Devi accedere o registrarti per scrivere nel forum
6 risposte