Italian Exit da un errore ma tutto funziona...

gigi0ne

Member
Licensed User
Longtime User
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


WHY?????: 
                 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
 

gigi0ne

Member
Licensed User
Longtime User
LucaMs said:
e la riga 272 qual'è?

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

Comunque, con quelle pochissime informazioni, impossibile saperlo.
Click to expand...


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
 

gigi0ne

Member
Licensed User
Longtime User
LucaMs said:
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.
Click to expand...

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

Risolto: 
               ...
                    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

Altra domanda: 
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
 

gigi0ne

Member
Licensed User
Longtime User
LucaMs said:
Temo che tu mi abbia scambiato per mago Merlino (o, come minimo, per Erel) ?

Cosa posso sapere io di quel sito? Un tubero ? ?
Click to expand...


Provo a postare in inglese maccheronico..
??????


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

gigi0ne

Member
Licensed User
Longtime User

LucaMs

Expert
Licensed User
Longtime User
Mio vecchio sorgente.

B4X: 
    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

modInternet - modulo di codice: 
Public Sub Download (Callback As Object, link As String) As HttpJob
    Dim j As HttpJob
    j.Initialize("", Callback)
    j.Download(link)
End Sub
 
You must log in or register to reply here.

Similar Threads

  • Solved
Italian Da pagina 2 a pagina 1 e ritorno: come aggiornare?
Replies
9
Views
2K
Sagenut
Italian HELP TextWriter non funziona su android 14
2 3 4
Replies
64
Views
8K
LucaMs
Italian [B4XPages] Domande (sto passando tutto il progetto da B4A)
3 4 5
Replies
97
Views
17K
LucaMs
Italian B4I listview - tableview ma come funziona?
2
Replies
22
Views
5K
fifiddu70
Italian La prossima settimana, VACANZE... ma per ora vado avanti
83 84 85
Replies
2K
Views
260K
Lello1964
Menu
Log in
Register
Cookies are required to use this site. You must accept them to continue using the site. Learn more…