German HTTPUtils2 ident

Matzele73

Member
Licensed User
Longtime User
Hallo zusammen,
ich versuche derzeit eine App zu erstellen, die von einem Server Daten mit Hilfe einer JSON-Struktur herunterlädt.
Hierzu muss ich mich anfangs zunächst mit Username und Passwort anmelden. Leider habe ich hier im Forum nichts zur Passwort-Abfrage gefunden.

Kann mir jemand ein einfaches Beispiel liefern?

Hier mein bisheriger Code:
B4X:
Sub Globals

    Dim cmdGetUserDate As String = "https://www..xxx.net/getuserdata.php"
   
    Dim UserName As String ="abc"
    Dim UserPW As String ="xxx"

End Sub

Sub JobDone (Job As String)
Dim s As String
If HttpUtils.IsSuccess(cmdGetUserDate) Then
  s = HttpUtils.GetString(cmdGetUserDate)
  Log(s)
End If
End Sub

Sub Activity_Create(FirstTime As Boolean)
    'parse the json file
HttpUtils.CallbackActivity = "Main" 'Current activity name.
HttpUtils.CallbackJobDoneSub = "JobDone"
HttpUtils.Download("Job1", cmdGetUserDate)

Vielen Dank im Voraus,
Matthias
 

coyote

Member
Licensed User
Longtime User
Hallo Matthias,

schaue dir diese Tutorial an. HttpUtils2

Die Parameterübergabe per GET oder POST funktioniert so:

B4X:
  'Send a GET request
  job1.Download2("http://www.b4x.com/print.php", _
      Array As String("first key", "first value :)", "second key", "value 2"))
  'Send a POST request
  job2.Initialize("Job2", Me)
  job2.PostString("http://www.b4x.com/print.php", "first key=first value&key2=value2")

In deinem Falls musst die die keys durch Username und PW ersetzen.

Gruß, Coyote
 
Cookies are required to use this site. You must accept them to continue using the site. Learn more…