Android Question Read data from a url

[bixmatech]

Dear,
I want to read data from a text file in a url, how to do that?

 

[DonManfred]

How can a textfile be "inside" a url?

What exactly are you trying to archieve?

I guess you should use okhttputils2 and download the file, save it to sdcard and then read the file...

 

[bixmatech]

ok,
this is the link, when you access it through browser, it shows "value is 5".
I want to do a request from b4a to this link and get the returned value in a string to use it.

 

[DonManfred]

The correct answer to the solution is given in post #2

 

[DonManfred]

Dim j As HttpJob
j.Initialize("", Me)
j.Download("http://bixma.com/test_value.txt")
Wait For (j) JobDone(j As HttpJob)
If j.Success Then
   Log(j.GetString)
End If
j.Release

 

[bixmatech]

Wait is in red color, why and cant compile to test

 

[DonManfred]

Update B4A or create a httpjob in the old fashion using a JobDone-Sub

 

[bixmatech]

Perfect worked, but it seems that job woek in async mode, how to run it in sync mode?
I mean now when i run the app, the logs are:
Will check internet now
Internet: 0
value is 5

so it is executing the statement {If ConnexioInternet = "value is 5" Then} before that the function {CheckInternet} finished its job. which give swrong results, as the {CheckInternet} should finish to update the ConnexioInternet variable and then do the checking.

Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.
    Dim ConnexioInternet As String
    Dim no_intenet As String = "<center><h1>No Internet</h1></center>"
End Sub

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    'Activity.LoadLayout("Layout1")
   
    Dim myw As WebView
    myw.Initialize("myw")
    Activity.AddView(myw, 0, 0, 100%x, 100%y) 'Your options for size here
    Log("Will check internet now")
    CheckInternet
    If ConnexioInternet = "value is 5" Then
        Log("Internet: 1")
        myw.LoadUrl("http://www.stackoverflow.com")
    Else
        Log("Internet: 0")
        myw.LoadUrl($"no_internet"$)
    End If
End Sub

Sub CheckInternet
    Dim j As HttpJob
    j.Initialize("", Me)
    j.Download("http://bixma.com/test_value.txt")
    Wait For (j) JobDone(j As HttpJob)
    If j.Success Then
        ConnexioInternet = j.GetString
        Log(ConnexioInternet)
    End If
    j.Release
End Sub

 

[DonManfred]

how to run it in sync mode?

Update b4a and use the code i posted first....

 

[nwhitfield]

Move the

If ConnexioIternet

section to inside the

If j.success

so that you don't check it until you've set the value

 

[bixmatech]

Update b4a and use the code i posted first....

I only see 1 code posted by you which i've used

 

[bixmatech]

Move the

If ConnexioIternet

section to inside the

If j.success

so that you don't check it until you've set the value

this will make the checkinternet function rigid, so i cant use it the same in many different places

 

[DonManfred]

sorry. this is the code i mean. You need a new B4Afor this...

 

[bixmatech]

sorry. this is the code i mean. You need a new B4Afor this...

What do you mean by that i need new B4A for this?

 

[DonManfred]

UPDATE your B4A to be the newest Version!
Expect this my last answer in this thread.

 

[bixmatech]

I told you before that i did updated it , and now I am using latest version 7.30

 

[DonManfred]

Then the code should work as i posted it...

 

[bixmatech]

Dear, I told you it worked but async not sync, see my answer above, https://www.b4x.com/android/forum/threads/read-data-from-a-url.85118/#post-539194 ,

 

[DonManfred]

I told you before that i did updated it

WHERE DID you anwered this? Not in this thread. I re-read it. No statement from you that you have updated.

 

[DonManfred]

You can use the wait for to use the async method (which you can NOT CHANGE to sync) like it was sync.
Where is your problem?????