Creates a new bucket.
curl -X POST https://www.googleapis.com/storage/v1/b?project=MY_CLOUD_STORAGE_PROJECT \
--header "Authorization: Bearer CLOUD_STORAGE_TOKEN" \
--header "Content-Type: application/json" \
--data '{"name": "chilkat-test-bucket"}'
LOCAL loRest
LOCAL lnSuccess
LOCAL lnBTls
LOCAL lnPort
LOCAL lnBAutoReconnect
LOCAL loJson
LOCAL loSbRequestBody
LOCAL loSbResponseBody
LOCAL lnRespStatusCode
LOCAL loJsonResponse
LOCAL lcKind
LOCAL lcId
LOCAL lcSelfLink
LOCAL lcProjectNumber
LOCAL lcName
LOCAL lcTimeCreated
LOCAL lcUpdated
LOCAL lcMetageneration
LOCAL lcLocation
LOCAL lcStorageClass
LOCAL lcEtag
loRest = CreateObject('Chilkat_9_5_0.Rest')
* URL: https://www.googleapis.com/storage/v1/b?project=MY_CLOUD_STORAGE_PROJECT
lnBTls = 1
lnPort = 443
lnBAutoReconnect = 1
lnSuccess = loRest.Connect("www.googleapis.com",lnPort,lnBTls,lnBAutoReconnect)
IF (lnSuccess <> 1) THEN
? "ConnectFailReason: " + STR(loRest.ConnectFailReason)
? loRest.LastErrorText
RELEASE loRest
CANCEL
ENDIF
* See the Online Tool for Generating JSON Creation Code
loJson = CreateObject('Chilkat_9_5_0.JsonObject')
loJson.UpdateString("name","chilkat-test-bucket")
loRest.AddHeader("Authorization","Bearer CLOUD_STORAGE_TOKEN")
loRest.AddHeader("Content-Type","application/json")
loSbRequestBody = CreateObject('Chilkat_9_5_0.StringBuilder')
loJson.EmitSb(loSbRequestBody)
loSbResponseBody = CreateObject('Chilkat_9_5_0.StringBuilder')
lnSuccess = loRest.FullRequestSb("POST","/storage/v1/b?project=MY_CLOUD_STORAGE_PROJECT",loSbRequestBody,loSbResponseBody)
IF (lnSuccess <> 1) THEN
? loRest.LastErrorText
RELEASE loRest
RELEASE loJson
RELEASE loSbRequestBody
RELEASE loSbResponseBody
CANCEL
ENDIF
lnRespStatusCode = loRest.ResponseStatusCode
IF (lnRespStatusCode >= 400) THEN
? "Response Status Code = " + STR(lnRespStatusCode)
? "Response Header:"
? loRest.ResponseHeader
? "Response Body:"
? loSbResponseBody.GetAsString()
RELEASE loRest
RELEASE loJson
RELEASE loSbRequestBody
RELEASE loSbResponseBody
CANCEL
ENDIF
loJsonResponse = CreateObject('Chilkat_9_5_0.JsonObject')
loJsonResponse.LoadSb(loSbResponseBody)
* See the Online Tool for Generating JSON Parse Code
lcKind = loJsonResponse.StringOf("kind")
lcId = loJsonResponse.StringOf("id")
lcSelfLink = loJsonResponse.StringOf("selfLink")
lcProjectNumber = loJsonResponse.StringOf("projectNumber")
lcName = loJsonResponse.StringOf("name")
lcTimeCreated = loJsonResponse.StringOf("timeCreated")
lcUpdated = loJsonResponse.StringOf("updated")
lcMetageneration = loJsonResponse.StringOf("metageneration")
lcLocation = loJsonResponse.StringOf("location")
lcStorageClass = loJsonResponse.StringOf("storageClass")
lcEtag = loJsonResponse.StringOf("etag")
RELEASE loRest
RELEASE loJson
RELEASE loSbRequestBody
RELEASE loSbResponseBody
RELEASE loJsonResponse
{
"kind": "storage#bucket",
"id": "chilkat-test-bucket",
"selfLink": "https://www.googleapis.com/storage/v1/b/chilkat-test-bucket",
"projectNumber": "5332332985",
"name": "chilkat-test-bucket",
"timeCreated": "2018-10-23T11:52:52.464Z",
"updated": "2018-10-23T11:52:52.464Z",
"metageneration": "1",
"location": "US",
"storageClass": "STANDARD",
"etag": "CAE="
}