Classic ASP
Classic ASP
Bluzone Get Project Details
See more Bluzone Examples
Get a project by its idChilkat Classic ASP Downloads
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
set http = Server.CreateObject("Chilkat.Http")
' Implements the following CURL command:
' curl -X GET \
' https://bluzone.io/portal/papis/v1/projects/YOUR_PROJECT_ID_HERE/ \
' -H 'bzid: YOUR_API_KEY_HERE'
http.SetRequestHeader "bzid","YOUR_API_KEY_HERE"
set sbResponseBody = Server.CreateObject("Chilkat.StringBuilder")
success = http.QuickGetSb("https://bluzone.io/portal/papis/v1/projects/YOUR_PROJECT_ID_HERE/",sbResponseBody)
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>"
Response.End
End If
set jResp = Server.CreateObject("Chilkat.JsonObject")
success = jResp.LoadSb(sbResponseBody)
jResp.EmitCompact = 0
Response.Write "<pre>" & Server.HTMLEncode( "Response Body:") & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( jResp.Emit()) & "</pre>"
respStatusCode = http.LastStatus
Response.Write "<pre>" & Server.HTMLEncode( "Response Status Code = " & respStatusCode) & "</pre>"
If (respStatusCode >= 400) Then
Response.Write "<pre>" & Server.HTMLEncode( "Response Header:") & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( http.LastHeader) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "Failed.") & "</pre>"
Response.End
End If
' Sample JSON response:
' {
' "projectId": 36845,
' "name": "My Project",
' "description": "Default Project for admin@chilkatsoft.com, created on Thu Jun 06 17:18:11 GMT 2019.",
' "status": null,
' "owner": {
' "username": "admin@chilkatsoft.com",
' "emailAddress": null
' },
' "defaultUuidValue": "1b4b243c-59aa-405f-90b5-0c434cac1345",
' "enableLocusMaps": false,
' "mapProviderType": "GOOGLE",
' "enableAdvancedPackets": false,
' "enabledPacketTypes": "sBv2",
' "enableDataUnload": false,
' "enableScanConsumer": false,
' "enablePolicyConsumer": false,
' "enableLocationConsumer": false,
' "enableEmail": true,
' "firmwareUpdateStrategy": "MANUAL",
' "deviceJobConcurrency": -1,
' "mapProviderApiKey": null,
' "wakeupUuid": null,
' "reportEmailList": [
' ],
' "reportTimezone": "Etc/GMT",
' "language": "en",
' "blufiHostnameNaming": "DEFAULT",
' "dateCreated": 1559841491000,
' "dateUpdated": 1559841491000,
' "enableStreamProducer": true,
' "enableMetricStorage": true
' }
' Sample code for parsing the JSON response...
' Use the following online tool to generate parsing code from sample JSON:
' Generate Parsing Code from JSON
projectId = jResp.IntOf("projectId")
name = jResp.StringOf("name")
description = jResp.StringOf("description")
status = jResp.StringOf("status")
ownerUsername = jResp.StringOf("owner.username")
ownerEmailAddress = jResp.StringOf("owner.emailAddress")
defaultUuidValue = jResp.StringOf("defaultUuidValue")
enableLocusMaps = jResp.BoolOf("enableLocusMaps")
mapProviderType = jResp.StringOf("mapProviderType")
enableAdvancedPackets = jResp.BoolOf("enableAdvancedPackets")
enabledPacketTypes = jResp.StringOf("enabledPacketTypes")
enableDataUnload = jResp.BoolOf("enableDataUnload")
enableScanConsumer = jResp.BoolOf("enableScanConsumer")
enablePolicyConsumer = jResp.BoolOf("enablePolicyConsumer")
enableLocationConsumer = jResp.BoolOf("enableLocationConsumer")
enableEmail = jResp.BoolOf("enableEmail")
firmwareUpdateStrategy = jResp.StringOf("firmwareUpdateStrategy")
deviceJobConcurrency = jResp.IntOf("deviceJobConcurrency")
mapProviderApiKey = jResp.StringOf("mapProviderApiKey")
wakeupUuid = jResp.StringOf("wakeupUuid")
reportTimezone = jResp.StringOf("reportTimezone")
language = jResp.StringOf("language")
blufiHostnameNaming = jResp.StringOf("blufiHostnameNaming")
dateCreated = jResp.IntOf("dateCreated")
dateUpdated = jResp.IntOf("dateUpdated")
enableStreamProducer = jResp.BoolOf("enableStreamProducer")
enableMetricStorage = jResp.BoolOf("enableMetricStorage")
i = 0
count_i = jResp.SizeOfArray("reportEmailList")
Do While i < count_i
jResp.I = i
i = i + 1
Loop
%>
</body>
</html>