If Job.JobName="order" Then
If Job.Success = True Then
Log(Job.GetString)
Else
Dim parser As JSONParser
parser.Initialize(job.getstring) ' I also tried job.errormessage here
Dim root As Map = parser.NextObject
Dim msg As String = root.Get("msg")
Dim code As Int = root.Get("code")
msgbox(msg,"Error")
End If
End If