Android Question [SOLVED]Put Smileys on text notifications

Public Sub notifica_firebase(TITOLO As String, testonotif As String, IMAGEURL As String, ToTopics As String)
    On Error GoTo NOINTERNET
    Dim sURL As String
    Dim PostData As String
    'sURL = "https://fcm.googleapis.com/fcm/send"
    sURL = "https://fcm.googleapis.com/v1/projects/notifiche-da-studio/messages:send"
    Dim objXMLHTTP As MSXML2.ServerXMLHTTP
    Set objXMLHTTP = New MSXML2.ServerXMLHTTP

    PostData = "{""message"":{" & _
      """token"":""" & ToTopics & """," & _
      """notification"":{" & _
        """body"":""" & testonotif & """," & _
        """title"":""" & TITOLO & """," & _
        """image"":""" & IMAGEURL & """" & _
      "}}}"

    With objXMLHTTP
       .Open "POST", sURL, False
       .SetRequestHeader "Content-Type", "application/json"
       .SetRequestHeader "Authorization", strHeaders
       .Send (PostData)
    End With
    Response = objXMLHTTP.ResponseText
         freeappo = FreeFile
         Open "c:\infostudio\notifica.txt" For Output As #freeappo
         Write #freeappo, objXMLHTTP.ResponseText
         Close #freeappo
    Exit Sub
NOINTERNET:
    DoCmd.Hourglass False
    MsgBox "CONTROLLARE LA CONNESSIONE AD INTERNET " & err.Description, vbCritical
End Sub