Android Question RSS reading?

ilan · Nov 3, 2021

hi,

i am trying to download the RSS from this link: rss

this is what i get:

<rss version="2.0"><channel><title>אזהרות והתראות מוקדמות</title><link>https://www.ims.gov.il/he/IMSWarnings</link><description>description</description><language>he</language><lastBuildDate>Tue, 02 Nov 2021 23:25:00 GMT</lastBuildDate><ttl>15</ttl><item><guid isPermaLink="false">Tue, 02 Nov 2021 19:34:00 GMT</guid><title>ים גבוה ומסוכן לרחצה עודכן ב-02/11 21:34</title><link>https://www.ims.gov.il/he/IMSWarnings</link><description><p style='padding-bottom:30px;'> עדכון: אזהרה חמורה על ים גבוה ומסוכן לרחצה בים התיכון מ-02/11 ב-22 עד 03/11 ב-10. מצב הים גלי עד גבה גלים. גובה הגל הסיגניפיקנטי ינוע מ- 120 עד 180 ס"מ, לא צפוי שינוי משמעותי. </p></description><pubDate>Tue, 02 Nov 2021 19:34:00 GMT</pubDate></item></channel></rss>

the problem is i get this because of the Hebrew letters.
how can i convert it back to hebrew?

i am using xml2map to convert the string to a map but the problem is that it is not readable.

this is the relevant code:

B4X:

Dim haifaUrl As String = "https://ims.gov.il/sites/default/files/ims_data/rss/alert/rssAlert_general_country_he.xml"
    Dim j As HttpJob
    j.Initialize("", Me)
    j.Download(haifaUrl)
    Wait For (j) JobDone(j As HttpJob)
    If j.Success Then
        Log(j.GetString2("ASCII"))       
    End If
    j.Release

i tried UTF8 and ASCII but i get the same.
i also tried to decode it as a Base64 string but no luck, any help would be very appreciated.

thanx.

TILogistic · Nov 3, 2021

test: xml2jon and xmlbuilder

B4X:

Public Sub TestAPIGetRSS

'    Dim BaseURL As String = "https://ims.gov.il/sites/default/files/ims_data/rss/alert/rssAlert_general_country_he.xml"
    Dim BaseURL As String = "http://www.ynet.co.il/Integration/StoryRss2.xml"
       
    Wait For (APIGetRSS(BaseURL)) Complete (Result As String)
    If Result.Length = 0 Then Return
   
    Dim xml As Xml2Map
    xml.Initialize
    Dim ParsedData As Map = xml.Parse(Result)
    TextArea1.Text = ParsedData.As(JSON).ToString
   
End Sub


Public Sub APIGetRSS(URL As String) As ResumableSub
    Dim ResultURL As String
    Dim j As HttpJob
    Try
        j.Initialize("", Me)
        j.Download(URL)
        Wait For (j) JobDone(j As HttpJob)
        If...

DonManfred · Nov 3, 2021

ilan said:
i also tried to decode it as a Base64 string

There is no base64 in the scnippet you posted.
The problem is that there are severyl html entities in th e result. Open the rss in a webbrowser and it will work i guess.

What about using it in another language. Like english?

B4X:

https://ims.gov.il/sites/default/files/ims_data/rss/alert/rssAlert_general_country_en.xml

Edit: You maybe can use jsoup (there is a library) to get the plain-text (html entities are converted).

ilan · Nov 3, 2021

DonManfred said:
The problem is that there are severyl html entities in th e result. Open the rss in a webbrowser and it will work i guess.

but i need to get some information from that string and not show it in a web browser.

DonManfred said:
What about using it in another language. Like english?

this is an option but then i need to translate everything to Hebrew and that can be very complicated.

DonManfred said:
Edit: You maybe can use jsoup (there is a library) to get the plain-text (html entities are converted).

thanx i will check!

ilan · Nov 3, 2021

ok after many tries i could not get the result i want. i was able to load the text to a webview and then read the webview content and parse it back to a map but it is too complicated and also did not give me the solution i want.

all i want is get the information from the rss as a string i can show in my app.

this is a news rss example: http://www.ynet.co.il/Integration/StoryRss2.xml

i just dont understand how to read from it text i can use.

TILogistic · Nov 3, 2021

In my case before parsing the xml with XML2MAP I use these tools that indicate the encode and the elements to read

Best XML Formatter and XML Beautifier

Online XML Formatter will format xml data, helps to validate, and works as XML Converter. Save and Share XML.

jsonformatter.org

Load URL:

I hope it helps.

TILogistic · Nov 3, 2021

test: xml2jon and xmlbuilder

B4X:

Public Sub TestAPIGetRSS

'    Dim BaseURL As String = "https://ims.gov.il/sites/default/files/ims_data/rss/alert/rssAlert_general_country_he.xml"
    Dim BaseURL As String = "http://www.ynet.co.il/Integration/StoryRss2.xml"
       
    Wait For (APIGetRSS(BaseURL)) Complete (Result As String)
    If Result.Length = 0 Then Return
   
    Dim xml As Xml2Map
    xml.Initialize
    Dim ParsedData As Map = xml.Parse(Result)
    TextArea1.Text = ParsedData.As(JSON).ToString
   
End Sub


Public Sub APIGetRSS(URL As String) As ResumableSub
    Dim ResultURL As String
    Dim j As HttpJob
    Try
        j.Initialize("", Me)
        j.Download(URL)
        Wait For (j) JobDone(j As HttpJob)
        If j.Success Then
            ResultURL = j.GetString
        End If
    Catch
        Log(LastException.Message)
    End Try
    j.Release
    Return ResultURL
End Sub

Json:

parse:

TILogistic · Nov 3, 2021

link:
"https://ims.gov.il/sites/default/files/ims_data/rss/alert/rssAlert_general_country_he.xml"

parse:

ilan · Nov 3, 2021

oparra said:

test: xml2jon and xmlbuilder

B4X:

Public Sub TestAPIGetRSS

'    Dim BaseURL As String = "https://ims.gov.il/sites/default/files/ims_data/rss/alert/rssAlert_general_country_he.xml"
    Dim BaseURL As String = "http://www.ynet.co.il/Integration/StoryRss2.xml"
      
    Wait For (APIGetRSS(BaseURL)) Complete (Result As String)
    If Result.Length = 0 Then Return
  
    Dim xml As Xml2Map
    xml.Initialize
    Dim ParsedData As Map = xml.Parse(Result)
    TextArea1.Text = ParsedData.As(JSON).ToString
  
End Sub


Public Sub APIGetRSS(URL As String) As ResumableSub
    Dim ResultURL As String
    Dim j As HttpJob
    Try
        j.Initialize("", Me)
        j.Download(URL)
        Wait For (j) JobDone(j As HttpJob)
        If j.Success Then
            ResultURL = j.GetString
        End If
    Catch
        Log(LastException.Message)
    End Try
    j.Release
    Return ResultURL
End Sub

Json:

View attachment 121154

parse:

View attachment 121155

Thank you so much!!! ? ? ? ?

now i have something i can work with.

TILogistic · Nov 3, 2021

for remove html tag:

see:

remove all htlm tags from a string

Hi all, is there a quick solution to "clean" a string removing all html tags to got a plain text without any tag (see example) ? Multibrand giovane con i migliori marchi come.... For this specific string the fastest solution is... 'str is the above string str.Replace($""$...

www.b4x.com

TILogistic · Nov 3, 2021

or use regex to filter HTML tags

I saw that you like to use regular expressions.

I hate RegEx

Ola https://ihateregex.io/ I think this is one of the areas in my coding world that I have not mastered. Rather cool: https://regexr.com/ https://extendsclass.com/regex-tester.html

www.b4x.com

??????

TILogistic · Nov 3, 2021

regex o jsoup:

see:

Regular expression to remove HTML tags from a string

Possible Duplicate: Regular expression to remove HTML tags Is there an expression which will get the value between two HTML tags? Given this: <td class="played">0</td> I am lookin...

stackoverflow.com

ilan · Nov 3, 2021

oparra said:
I saw that you like to use regular expressions.

i like Regex but don't really know how to use it. i will watch again the video i have posted there. i think it is a must for every developer. even if it is just the basic it can really help in a lot of projects.

Android Question RSS reading?

ilan

Expert

TILogistic

DonManfred

Expert

ilan

Expert

ilan

Expert

TILogistic

Expert

Best XML Formatter and XML Beautifier

TILogistic

Expert

TILogistic

Expert

ilan

Expert

TILogistic

Expert

remove all htlm tags from a string

TILogistic

Expert

I hate RegEx

TILogistic

Expert

Regular expression to remove HTML tags from a string

ilan

Expert

Similar Threads

Android Question RSS reading?

Expert

Expert

Expert

Expert

Expert

Expert

Expert

Expert

Expert

Expert

Expert

Expert

Similar Threads

Privacy & Transparency

Privacy & Transparency