ساخت ربات تلگرام با بیسیک۴اندروید

ربات تلگرام یعنی یک برنامه که با API تلگرام حرف می‌زند — و B4A این کار را با همان وب‌سرویس انجام می‌دهد.

ارسال پیام

Sub SendMessage(ChatId As String, Text As String)
    Dim job As HttpJob
    job.Initialize("send", Me)
    job.Download("https://api.telegram.org/bot" & TOKEN & _
        "/sendMessage?chat_id=" & ChatId & "&text=" & Text)
End Sub

خواندن پیام‌های کاربر

با روش polling هر چند ثانیه getUpdates را صدا بزنید و آخرین update_id را نگه دارید:

Sub PollUpdates
    Dim job As HttpJob
    job.Initialize("poll", Me)
    job.Download("https://api.telegram.org/bot" & TOKEN & "/getUpdates?offset=" & LastOffset)
End Sub

امنیت

• TOKEN را هرگز داخل سورس منتشرشده نگذارید
• ورودی کاربر را قبل از استفاده پاک‌سازی کنید

سورس کامل ربات تلگرام در بخش محصولات فروشگاه موجود است.