Buongiorno a tutti.
Sto praticamente modificando un programma per utilizzare il cloud e devo usare i web service di cui so pochissimo (quasi niente).
Scopiazzando sul sito ho utilizzato questa routine per mandare una stringa JSON.
Dim j As HttpJob
j.Initialize("", Me)
j.PostString("http://" & Main.Lnk_DominioFTP & "/app.php/chiusuraChiamata/registra", StringaJSON)
Wait For (j) JobDone(j As HttpJob)
If j.Success Then
Log("JobName = " & j.JobName & ", Trasmissione dati = " & j.Success)
Else
Log("Error: " & j.ErrorMessage)
ToastMessageShow("Error: " & j.ErrorMessage, True)
End If
Chi gestisce la parte cloud su server linus Aruba mi dice:
"attenzione che se la chiamata ti torna il codice 200 “OK” non vuol dire che è andato tutto bene, vuol dire che la chiamata è riuscita poi devi controllare il body ritornato per verificare se ci sono errori."
e io non ho la più pallida idea di come ricevere il "body".
Qualcuno gentilmente riesce a darmi una dritta su come fare.
Grazie a tutti.
Sto praticamente modificando un programma per utilizzare il cloud e devo usare i web service di cui so pochissimo (quasi niente).
Scopiazzando sul sito ho utilizzato questa routine per mandare una stringa JSON.
Dim j As HttpJob
j.Initialize("", Me)
j.PostString("http://" & Main.Lnk_DominioFTP & "/app.php/chiusuraChiamata/registra", StringaJSON)
Wait For (j) JobDone(j As HttpJob)
If j.Success Then
Log("JobName = " & j.JobName & ", Trasmissione dati = " & j.Success)
Else
Log("Error: " & j.ErrorMessage)
ToastMessageShow("Error: " & j.ErrorMessage, True)
End If
Chi gestisce la parte cloud su server linus Aruba mi dice:
"attenzione che se la chiamata ti torna il codice 200 “OK” non vuol dire che è andato tutto bene, vuol dire che la chiamata è riuscita poi devi controllare il body ritornato per verificare se ci sono errori."
e io non ho la più pallida idea di come ricevere il "body".
Qualcuno gentilmente riesce a darmi una dritta su come fare.
Grazie a tutti.