|
Chilkat • HOME • .NET Core C# • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi ActiveX • Delphi DLL • Go • Java • Lianja • Mono C# • Node.js • Objective-C • PHP ActiveX • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Classic ASP) GeoOp - Get all JobsGets all information about all jobs.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' This example also assumes an OAuth2 access token was previously fetched. ' and saved in a JSON file. ' First get our previously obtained access token. ' {"access_token":"e6dqdG....mzjpT04w==","token_type":"Bearer","expires_in":2592000,"owner_id":999236} ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject") set jsonToken = Server.CreateObject("Chilkat.JsonObject") success = jsonToken.LoadFile("qa_data/tokens/geoop.json") ' This example assumes we previously obtained an access token ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.OAuth2") set oauth2 = Server.CreateObject("Chilkat.OAuth2") oauth2.AccessToken = jsonToken.StringOf("access_token") ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Rest") set rest = Server.CreateObject("Chilkat.Rest") ' Connect to GeoOp and send the following GET request: ' GET /users HTTP/1.1 ' Host: api.geoop.com bAutoReconnect = 1 success = rest.Connect("api.geoop.com",443,1,bAutoReconnect) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( rest.LastErrorText) & "</pre>" Response.End End If ' Provide the authentication credentials (i.e. the access token) success = rest.SetAuthOAuth2(oauth2) ' Set the X-Version header. success = rest.AddHeader("X-Version","1.0") responseBody = rest.FullRequestNoBody("GET","/jobs") If (rest.LastMethodSuccess <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( rest.LastErrorText) & "</pre>" Response.End End If ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject") set json = Server.CreateObject("Chilkat.JsonObject") json.EmitCompact = 0 ' If the response status code did not indicate success, then see what happened.. If (rest.ResponseStatusCode <> 200) Then Response.Write "<pre>" & Server.HTMLEncode( "Request Header: ") & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( rest.LastRequestHeader) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "----") & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Response StatusCode = " & rest.ResponseStatusCode) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Response StatusLine: " & rest.ResponseStatusText) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Response Header:") & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( rest.ResponseHeader) & "</pre>" success = json.Load(responseBody) Response.Write "<pre>" & Server.HTMLEncode( json.Emit()) & "</pre>" Response.End End If success = json.Load(responseBody) ' Show the full JSON response.. (see below) Response.Write "<pre>" & Server.HTMLEncode( json.Emit()) & "</pre>" ' These will be used for parsing date/time strings.. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.CkDateTime") set dtime = Server.CreateObject("Chilkat.CkDateTime") bLocalTime = 1 ' Iterate over each job and get information.. numRecords = json.SizeOfArray("jobs") i = 0 Do While i < numRecords json.I = i Response.Write "<pre>" & Server.HTMLEncode( "job id: " & json.StringOf("jobs[i].id")) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "client id: " & json.StringOf("jobs[i].client.id")) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "account id: " & json.StringOf("jobs[i].account.id")) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "address line1: " & json.StringOf("jobs[i].address.line1")) & "</pre>" success = dtime.SetFromTimestamp(json.StringOf("jobs[i].startTime")) ' dt is a Chilkat.DtObj Set dt = dtime.GetDtObj(bLocalTime) Response.Write "<pre>" & Server.HTMLEncode( "created: " & dt.Month & "/" & dt.Day & "/" & dt.Year & " " _ & dt.Hour & ":" & dt.Minute) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "----") & "</pre>" i = i + 1 Loop ' A sample jobs listing response: ' ' { ' "result": "success", ' "jobs": [ ' { ' "id": 17580761, ' "reference": "1000", ' "startTime": "2016-10-26T02:10:00+00:00", ' "endTime": "2016-10-28T02:40:00+00:00", ' "priority": 2, ' "title": "[ Demo Job ]", ' "description": "", ' "jobNumber": null, ' "deleted": false, ' "type": "demo", ' "created": "2015-09-03T02:11:32+00:00", ' "modified": "2016-10-26T12:05:09+00:00", ' "client": { ' "id": 9555868 ' }, ' "billingClient": null, ' "status": { ' "id": 675900 ' }, ' "account": { ' "id": 39409 ' }, ' "address": { ' "line1": "21462 New York Avenue NW", ' "line2": null, ' "city": "Washington", ' "postcode": "20005", ' "latitude": 38.903959, ' "longitude": -77.02137 ' }, ' "metadata": { ' "visitsCount": 3, ' "assignedVisitsCount": 3, ' "unassignedVisitsCount": 0, ' "partsCount": 1, ' "chargesCount": 1, ' "timersCount": 0, ' "notesCount": 0, ' "parcelsCount": 0, ' "paymentsCount": 0, ' "documentsCount": 1 ' } ' }, ' { ' "id": 17639295, ' "reference": "1000", ' "startTime": "2016-10-31T12:00:00+00:00", ' "endTime": "2016-10-31T12:30:00+00:00", ' "priority": 2, ' "title": "Deliver Donuts", ' "description": "Deliver donuts to the cafe.", ' "jobNumber": "21122", ' "deleted": false, ' "type": "normal", ' "created": "2016-10-31T12:07:14+00:00", ' "modified": "2016-10-31T12:07:14+00:00", ' "client": { ' "id": 9555868 ' }, ' "billingClient": null, ' "status": { ' "id": 675900 ' }, ' "account": { ' "id": 39409 ' }, ' "address": { ' "line1": "1732 Pennsylvania Avenue NW", ' "line2": null, ' "city": "Washington", ' "postcode": "20006", ' "latitude": 38.8990534, ' "longitude": -77.0401866 ' }, ' "metadata": { ' "visitsCount": 1, ' "assignedVisitsCount": 0, ' "unassignedVisitsCount": 1, ' "partsCount": 0, ' "chargesCount": 0, ' "timersCount": 0, ' "notesCount": 0, ' "parcelsCount": 0, ' "paymentsCount": 0, ' "documentsCount": 0 ' } ' } ' ], ' "metadata": { ' "page": 1, ' "pagesCount": 1, ' "recordsPerPage": 20, ' "recordsCount": 2 ' } ' } ' %> </body> </html> |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.