Italian Exit da un errore ma tutto funziona...

[gigi0ne]

Buonaseraaaa

Sempre io a rompere..
qualcuno sa dirmi perche' quando metto exit l'editor mi dice

User_Page - 272: Object reference not set to an instance of an object.

e la cosa bella e' che compila e funziona correttamente..

Grazie ciao

                 For index=0 To CollectionsList.Size-1
                        If ReturnID(index).title = m.Get("title") Then
                            ReturnID(index).IUrl = z1.Get("url")
                            Exit
                        End If
                    Next

 

[LucaMs]

User_Page - 272: Object reference not set to an instance of an object.

e la riga 272 qual'è?

P.S. Già, dev'essere nella B4XPages.b4xlib.

Comunque, con quelle pochissime informazioni, impossibile saperlo.

 

[gigi0ne]

e la riga 272 qual'è?

P.S. Già, dev'essere nella B4XPages.b4xlib.

Comunque, con quelle pochissime informazioni, impossibile saperlo.

Pardon e' la riga 4

quando inserisco l'exit mi da quell'errore.. ma il bello e' che funziona tutto senza problemi..
Tra parentesi e' giusto uscire cosi da un loop?

ciao GrZIE

 

[LucaMs]

Tra parentesi e' giusto uscire cosi da un loop?

Assolutamente sì.

User_Page? E' il nome di una delle B4XPage del tuo progetto?

 

[gigi0ne]

yes... Brutto nome per una pagina vero?

 

[LucaMs]

yes... Brutto nome per una pagina vero?

No, lo chiedevo per cercare di capire se l'errore segnalato riguardasse codice nella B4XPages.b4xlib, ma poi ho controllato e in questa non esiste quella variabile.

 

[gigi0ne]

No, lo chiedevo per cercare di capire se l'errore segnalato riguardasse codice nella B4XPages.b4xlib, ma poi ho controllato e in questa non esiste quella variabile.

Risolto cosi (tra parentesi era una vecchia domanda tua a Erel)

               ...
                    For index=0 To CollectionsList.Size-1
                        Aci =  ReturnID(index)
                        If Aci.title = m.Get("title") Then
                            Aci.IUrl = z1.Get("url")
                            Exit
                        End If
                    Next
                    ...
                    Sub ReturnID( id As Int) As AppCollectionItem
                        Return CollectionsList.Get(id)
                    End Sub

Intanto che ci sei

Risolvimi per favore questo problema (o e' meglio che apro un altro thread?):

Ho 2 pagine con 2 webview, una visualizza i prodotti e la seconda il carrello e sono perfettamente sincronizzati.
Cioe' se inserisco un prodotto nel carrello dalla prima inestra poi me lo trovo nella seconda.

La domanda viene ora... io devo prelevare il carrello e se chiamo la pagina con le routine che posto sotto
in effetti mi ritorna il carrello (in res, senza nessun errore).... peccato che sia vuoto..

PErche le due webview sono sincronizzate e questa chiamata no?
Potrei anche prelevarla direttamente da webview, ma non ho trovato da nessuna parte come inserire in una stringa o meglio list
(mi ritorna un insieme json) il contenuto testo della pagina di webview

Sub ExecuteRemoteQuery(Query As String, JobName As String)
    Dim job As HttpJob
    job.Initialize(JobName, Me)
    job.PostString("https://www.mydomain.it/cart.json", "")
End Sub

Sub JobDone(Job As HttpJob)
    ProgressDialogHide
    If Job.Success Then
        Dim res As String
        res = Job.GetString
        Log("Response from server: " & res)
        Dim parser As JSONParser
        parser.Initialize(res)
        Select Job.JobName
            Case "GETCART"
                Log("GetCart" & res)
              
        End Select
    Else
        Log(Job.ErrorMessage)
        ToastMessageShow("Error: " & Job.ErrorMessage, True)
    End If
    Job.Release
End Sub

Grazie

 

[LucaMs]

Risolvimi per favore questo problema

Temo che tu mi abbia scambiato per mago Merlino (o, come minimo, per Erel)

Cosa posso sapere io di quel sito? Un tubero

 

[gigi0ne]

Temo che tu mi abbia scambiato per mago Merlino (o, come minimo, per Erel)

Cosa posso sapere io di quel sito? Un tubero

Provo a postare in inglese maccheronico..



Non sai come leggere l'html da una webview? non ho trovato nulla..
Grazie

 

[LucaMs]

Non sai come leggere l'html da una webview? non ho trovato nulla..

Per quanto ho capito, non ti serve leggere l'html ma ricevere quella JSON "piena".

Se proprio vuoi fare in quel modo...
https://www.b4x.com/android/forum/t...mple-html-parser-implemented-with-b4x.118590/

 

[gigi0ne]

Per quanto ho capito, non ti serve leggere l'html ma ricevere quella JSON "piena".

Se proprio vuoi fare in quel modo...
https://www.b4x.com/android/forum/t...mple-html-parser-implemented-with-b4x.118590/

Visto, ma comunque non mi spiega come scaricare la pagina da dare in pasto al HtmParser.
L'esempio lo legge da un file.

Giuro che ti faccio una donazione appena il mio capo mi paga...

 

[LucaMs]

Visto, ma comunque non mi spiega come scaricare la pagina da dare in pasto al HtmParser.
L'esempio lo legge da un file.

Giuro che ti faccio una donazione appena il mio capo mi paga...

Dai un'occhiata a questo:
https://www.b4x.com/android/forum/threads/parseing-web-pages-the-dom.128869/

 

[LucaMs]

Mio vecchio sorgente.

    Dim HtmlPage As String = ""
    Dim JobFailed As Boolean

    Wait For (modInternet.Download(Me, "https://www.sito.com/")) JobDone (j As HttpJob)

    If j.Success Then
        HtmlPage = j.GetString
    Else
        JobFailed = True
    End If
    j.Release

Public Sub Download (Callback As Object, link As String) As HttpJob
    Dim j As HttpJob
    j.Initialize("", Callback)
    j.Download(link)
End Sub