Spanish [RESUELTO] PARSEAR JSON desde WS

Discussion in 'Spanish Forum' started by trejocode, Jun 2, 2019.

  1. trejocode

    trejocode Member Licensed User

    Hola, estoy aprendiendo acerca de B4A con OkHTTPUtilis2, tengo un Web Service que me devuelve el siguiente Objeto:

    Code:
    {"users":[{"id_usuario":1,"usuario":"Sistemas","password":"12345678"},{"id_usuario":2,"usuario":"Desarrollo","password":"12345678"}]}
    Lo que quiero es parsearlo para posteriormente añadirlo a una Lista o insertarlo a SQLite

    Mi código:

    Code:
    HTTP.Initialize("", Me)
        HTTP.PostString(
    "http://192.168.100.13:8081/android/users""")
        
    Wait For (HTTP) JobDone(response As HttpJob)
        
    If response.Success Then
            
    Log(response.GetString)       
            
    Dim Parser As JSONParser
            Parser.Initialize(response.GetString)
            
    Dim Users As Map = Parser.NextObject
            
    For Each User As Map In Users
                
    Log(User.Get("usuario"))
            
    Next
        
    End If
        HTTP.Release
    Pero tengo el siguiente error y no se como solucionarlo

    Code:
    java.lang.RuntimeException: Object should first be initialized (Map).
    Ya intenté con: NextArray pero tampoco logro hacerlo funcional.

    ¿Me pudieran ayudar?
     
  2. Enrique Gonzalez R

    Enrique Gonzalez R Well-Known Member Licensed User

    Creo que seria así.

    Dim users as map = Parser.nextobject

    Dim l as list = users.get("users")

    For each user as map in l
    ...
     
    José J. Aguilar likes this.
  3. trejocode

    trejocode Member Licensed User

    Gracias compañero, que crack, funciona perfecto.
     
    Enrique Gonzalez R likes this.
Loading...
  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice