DonManfred, thank you for answering me. The lines of code to send a zip file would be:
Sub Process_Globals
Private Bot As SMMTeleBot
Private chat As Chat
End Sub
Sub SendTelegram()
Bot.Initialize("key bot", "BOT", 120, 120, 120)
Bot.getUpdatesList(0,20,60)
Bot.SendChatAction(chat.Id,"CHAT_ACTION_UPLOAD_DOCUMENT")
' What do I need now to send the file?
End sub
Sub BOT_updates(updates As List)
Dim mensaje As Message
If updates.IsInitialized Then
Try
For up = 0 To updates.Size - 1
Dim Update As Update = updates.Get(up)
mensaje = Update.message
Next
chat = mensaje.Chat
Catch
Log(LastException)
End Try
End If
End Sub
Thank you.