servizi esterni tramite REST

International Italiano
21

cos pu funzionare ma se ti cambiano la sequenza delle informazioni sul JSON tu sei fregato…

provo a spiegarlo meglio meglio

i json sono fatti per scambiare informazioni senza una regola fissa per la loro sequenza.
come hai fatto tu il campo “nome” dev’essere sempre il primo elemento e via via tutti gli altri.
Se la sequenza cambia non funziona pi…

Nel mio esempio di prima la sequenza pu anche essere sempre diversa.

Il tuo caso io lo gestirei con un case…
In questo modo vai sempre a riempire il textfield giusto indipendentemente dalla sequenza con cui stato fatto il JSON

/////
dim stringa, nome_campo, valore_campo as String

if elenco.Count >0 then
for i as integer = 0 to elenco.Count-1

///MsgBox elenco.Child(i).ToString

datipers = elenco.Child(i)
if datipers.Count > 0 then
  for x as integer = 0 to datipers.Count-1
    //// stringa = datipers.Name(x)+" - "+datipers.Value(datipers.Name(x))
    
    nome_campo = datipers.Name(x)
    valore_campo = datipers.Value(stringa_campo)
    
    /// MsgBox stringa
    
    Select Case nome_campo
      
    Case "Nome"
      txtnome.text = valore_campo
      
    Case "Via"
      txtvia.text = valore_campo
      
    Case "Citt"
      txtcitta.text = valore_campo
      
    Case "Tel"
      txttel.text = valore_campo
      
    End Select
    
    
  next
  
end if

next
end if

22

Massimiliano has the head in a software erp …
I think was now really rincoglionited !

23

Massimiliano non ti preoccupare, non so da te ma da me fa veramente caldo.

Enzo sei un grande, non avevo pensato a questo visto che mi hanno chiesto di creare la stringa di ricezione cosi loro sanno esattamente cosa inviarmi, per se non ci sono regole come mi dici meglio utilizzare il secondo codice, al quale ho dovuto apportare un piccola modifica per farlo funzionare
ho sostituito valore_campo = datipers.Value(stringa_campo)
con valore_campo = datipers.Value(datipers.Name(x))
l’item stringa-campo non stato dichiarato.
il tutto dovrebbe partire per i primi di settembre (4-11), a fine agosto avr un incontro con chi gestir il servizio, cosa dovr chiedergli in particolare? password, indirizzo e cos’altro? la stringa di richiesta dovrebbero darmela loro o devo crearla io?

24

Esattamente di cosa si tratta Mario ?

25

ops… si
ho scritto il codice in fretta e senza provarlo…
volevo scrivere
valore_campo = datipers.Value(nome_campo)

cmq come hai fatto va bene.

Ogni WS fatto in modo diverso, non sempre vengono richieste le credenziali.
Saranno loro che ti forniranno le info per utilizzarlo.