ارسال پوش نوتیفیکیشن با استفاده از b4j

[DexterFstone 387]

سلام به دوستان و اساتید

بنده جند وقت پیش توی سایت مرجع یک آموزش دیدم ک با استفاده از b4j میشد به اپ پوش نوتیفیکشن ارسال کرد ولی الان هرچی سرچ میزنم پیداش نمیکنم کسی از عزیزان لینک آموزش یا اطلاعی از نحوه پیادسازی چنین چیزی را دارند؟

[محمدرضا شاهپیری 5,491]

سلام و درود. از متد زیر ایده بگیرید

Private Sub SendBroadcastPushNotification(Topic As String, Title As String, Body As String)
    Dim Job As HttpJob
    Job.Initialize("fcm", Me)
    Dim m As Map = CreateMap("to": $"/topics/${Topic}"$)
    Dim data As Map = CreateMap("title": Title, "body": Body)

    If Topic.StartsWith("ios_") Then
        Dim iosalert As Map =  CreateMap("title": Title, "body": Body, "sound": "default")
        m.Put("notification", iosalert)
        m.Put("priority", 10)
    End If
   
    m.Put("data", data)
    Dim jg As JSONGenerator
    jg.Initialize(m)
    Job.PostString("https://fcm.googleapis.com/fcm/send", jg.ToString)
    Job.GetRequest.SetContentType("application/json;charset=UTF-8")
    Job.GetRequest.SetHeader("Authorization", "key=" & API_KEY)  
End Sub