Sub JobDone (Job As HttpJob)
Log("JobName = " & Job.JobName & ", Success = " & Job.Success)
If Job.Success = True Then
Select Job.JobName
Case "Job1"
GetCartStateParser.Initialize
InputStream = HttpUtils.GetInputStream(PostGetCartState)
If InputStream.BytesAvailable > 0 Then
GetCartStateParser.Parse(InputStream, "GetCartStateParse")
End If
Case "Job3"
'Activity.SetBackgroundImage(Job.GetBitmap)
End Select
Else
Log("Error: " & Job.ErrorMessage)
ToastMessageShow("Error: " & Job.ErrorMessage, True)
End If
Job.Release
End Sub