Dim TrackState As String
TrackState = "00"
Dim req As DBRequestManager = CreateRequest
Dim cmd As DBCommand = CreateCommand ("update_tracking", Array As Object (TrackState, myDeviceID))
Dim j As HttpJob = CreateRequest.ExecuteBatch(Array(cmd), Null)
Wait For (req.ExecuteCommand(cmd,Null)) JobDone(j As HttpJob)
If j.Success Then
Log("Transaction Successful")
Else
Log("ERROR: " & j.ErrorMessage)
End If
j.Release