Chilkat Online Tools

VBScript / Core Services API / UpdateSubnet

Back to Collection Items

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set outFile = fso.CreateTextFile("output.txt", True)

' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

set http = CreateObject("Chilkat_9_5_0.Http")

' Use this online tool to generate code from sample JSON: Generate Code to Create JSON

' The following JSON is sent in the request body.

' {
'   "definedTags": {},
'   "dhcpOptionsId": "quis n",
'   "displayName": "mollit nulla id",
'   "freeformTags": {},
'   "ipv6CidrBlock": "dolo",
'   "routeTableId": "aliquip elit et velit consec",
'   "securityListIds": [
'     "et cupidatat qui dolor",
'     "non Lorem dolor dolore"
'   ]
' }

set json = CreateObject("Chilkat_9_5_0.JsonObject")
success = json.UpdateNewObject("definedTags")
success = json.UpdateString("dhcpOptionsId","quis n")
success = json.UpdateString("displayName","mollit nulla id")
success = json.UpdateNewObject("freeformTags")
success = json.UpdateString("ipv6CidrBlock","dolo")
success = json.UpdateString("routeTableId","aliquip elit et velit consec")
success = json.UpdateString("securityListIds[0]","et cupidatat qui dolor")
success = json.UpdateString("securityListIds[1]","non Lorem dolor dolore")

http.SetRequestHeader "Content-Type","application/json"
http.SetRequestHeader "x-content-sha256","{{content_sha256}}"
http.SetRequestHeader "Authorization","{{signature}}"
http.SetRequestHeader "Date","{{date}}"
http.SetRequestHeader "if-match","officia sed"

set sbRequestBody = CreateObject("Chilkat_9_5_0.StringBuilder")
success = json.EmitSb(sbRequestBody)

' resp is a Chilkat_9_5_0.HttpResponse
Set resp = http.PTextSb("PUT","https://iaas.{{region}}.oraclecloud.com/20160918/subnets/:subnetId",sbRequestBody,"utf-8","application/json",0,0)
If (http.LastMethodSuccess = 0) Then
    outFile.WriteLine(http.LastErrorText)
    WScript.Quit
End If

set sbResponseBody = CreateObject("Chilkat_9_5_0.StringBuilder")
success = resp.GetBodySb(sbResponseBody)

set jResp = CreateObject("Chilkat_9_5_0.JsonObject")
success = jResp.LoadSb(sbResponseBody)
jResp.EmitCompact = 0

outFile.WriteLine("Response Body:")
outFile.WriteLine(jResp.Emit())

respStatusCode = resp.StatusCode
outFile.WriteLine("Response Status Code = " & respStatusCode)
If (respStatusCode >= 400) Then
    outFile.WriteLine("Response Header:")
    outFile.WriteLine(resp.Header)
    outFile.WriteLine("Failed.")

    WScript.Quit
End If

' Sample JSON response:
' (Sample code for parsing the JSON response is shown below)

' {
'   "vcnId": "enim non eu cillum",
'   "id": "eu incididunt tempor",
'   "compartmentId": "deserunt eu et v",
'   "cidrBlock": "minim",
'   "routeTableId": "veniam dolor voluptate m",
'   "virtualRouterIp": "dolore dolor ven",
'   "virtualRouterMac": "pariatur",
'   "lifecycleState": "AVAILABLE",
'   "availabilityDomain": "Lorem pariatur do",
'   "definedTags": {},
'   "dhcpOptionsId": "aute",
'   "displayName": "Duis ad eu sunt",
'   "dnsLabel": "eiusmod",
'   "freeformTags": {},
'   "ipv6CidrBlock": "adipisicing reprehende",
'   "ipv6PublicCidrBlock": "sed Lorem",
'   "ipv6VirtualRouterIp": "in ex cupidatat",
'   "prohibitPublicIpOnVnic": false,
'   "securityListIds": [
'     "dolore in enim",
'     "anim Lorem"
'   ],
'   "subnetDomainName": "labore cupidatat commodo",
'   "timeCreated": "1995-01-31T14:27:19.328Z"
' }

' Sample code for parsing the JSON response...
' Use this online tool to generate parsing code from sample JSON: Generate JSON Parsing Code

vcnId = jResp.StringOf("vcnId")
id = jResp.StringOf("id")
compartmentId = jResp.StringOf("compartmentId")
cidrBlock = jResp.StringOf("cidrBlock")
routeTableId = jResp.StringOf("routeTableId")
virtualRouterIp = jResp.StringOf("virtualRouterIp")
virtualRouterMac = jResp.StringOf("virtualRouterMac")
lifecycleState = jResp.StringOf("lifecycleState")
availabilityDomain = jResp.StringOf("availabilityDomain")
dhcpOptionsId = jResp.StringOf("dhcpOptionsId")
displayName = jResp.StringOf("displayName")
dnsLabel = jResp.StringOf("dnsLabel")
ipv6CidrBlock = jResp.StringOf("ipv6CidrBlock")
ipv6PublicCidrBlock = jResp.StringOf("ipv6PublicCidrBlock")
ipv6VirtualRouterIp = jResp.StringOf("ipv6VirtualRouterIp")
prohibitPublicIpOnVnic = jResp.BoolOf("prohibitPublicIpOnVnic")
subnetDomainName = jResp.StringOf("subnetDomainName")
timeCreated = jResp.StringOf("timeCreated")
i = 0
count_i = jResp.SizeOfArray("securityListIds")
Do While i < count_i
    jResp.I = i
    strVal = jResp.StringOf("securityListIds[i]")
    i = i + 1
Loop

outFile.Close

Curl Command

curl -X PUT
	-H "if-match: officia sed"
	-H "Content-Type: application/json"
	-H "Date: {{date}}"
	-H "Authorization: {{signature}}"
	-H "x-content-sha256: {{content_sha256}}"
	-d '{
    "definedTags": {},
    "dhcpOptionsId": "quis n",
    "displayName": "mollit nulla id",
    "freeformTags": {},
    "ipv6CidrBlock": "dolo",
    "routeTableId": "aliquip elit et velit consec",
    "securityListIds": [
        "et cupidatat qui dolor",
        "non Lorem dolor dolore"
    ]
}'
https://iaas.{{region}}.oraclecloud.com/20160918/subnets/:subnetId

Postman Collection Item JSON

{
  "name": "UpdateSubnet",
  "request": {
    "method": "PUT",
    "header": [
      {
        "description": "For optimistic concurrency control. In the PUT or DELETE call for a resource, set the `if-match`\nparameter to the value of the etag from a previous GET or POST response for that resource. The resource\nwill be updated or deleted only if the etag you provide matches the resource's current etag value.\n",
        "key": "if-match",
        "value": "officia sed"
      },
      {
        "key": "Content-Type",
        "value": "application/json"
      },
      {
        "key": "Date",
        "value": "{{date}}",
        "description": "(Required) Current Date",
        "type": "text"
      },
      {
        "key": "Authorization",
        "value": "{{signature}}",
        "description": "(Required) Signature Authentication on Authorization header",
        "type": "text"
      },
      {
        "key": "x-content-sha256",
        "value": "{{content_sha256}}",
        "description": "(Required) Content sha256 for POST, PUT and PATCH operations",
        "type": "text"
      }
    ],
    "body": {
      "mode": "raw",
      "raw": "{\n    \"definedTags\": {},\n    \"dhcpOptionsId\": \"quis n\",\n    \"displayName\": \"mollit nulla id\",\n    \"freeformTags\": {},\n    \"ipv6CidrBlock\": \"dolo\",\n    \"routeTableId\": \"aliquip elit et velit consec\",\n    \"securityListIds\": [\n        \"et cupidatat qui dolor\",\n        \"non Lorem dolor dolore\"\n    ]\n}"
    },
    "url": {
      "raw": "{{baseUrl}}/subnets/:subnetId",
      "host": [
        "{{baseUrl}}"
      ],
      "path": [
        "subnets",
        ":subnetId"
      ],
      "variable": [
        {
          "key": "subnetId",
          "value": "amet ut",
          "description": "(Required) The [OCID](/Content/General/Concepts/identifiers.htm) of the subnet."
        }
      ]
    },
    "description": "Updates the specified subnet.\n"
  },
  "response": [
    {
      "name": "The subnet was updated.",
      "originalRequest": {
        "method": "PUT",
        "header": [
          {
            "description": "For optimistic concurrency control. In the PUT or DELETE call for a resource, set the `if-match`\nparameter to the value of the etag from a previous GET or POST response for that resource. The resource\nwill be updated or deleted only if the etag you provide matches the resource's current etag value.\n",
            "key": "if-match",
            "value": "officia sed"
          }
        ],
        "body": {
          "mode": "raw",
          "raw": "{\n    \"definedTags\": {},\n    \"dhcpOptionsId\": \"adipisicing Excepteur\",\n    \"displayName\": \"reprehenderit consectetur in\",\n    \"freeformTags\": {},\n    \"ipv6CidrBlock\": \"do\",\n    \"routeTableId\": \"commodo mollit aliqua dolor\",\n    \"securityListIds\": [\n        \"est laboris labore consequat\",\n        \"Duis pariatur irure commodo consectetur\"\n    ]\n}"
        },
        "url": {
          "raw": "{{baseUrl}}/subnets/:subnetId",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "subnets",
            ":subnetId"
          ],
          "variable": [
            {
              "key": "subnetId"
            }
          ]
        }
      },
      "status": "OK",
      "code": 200,
      "_postman_previewlanguage": "json",
      "header": [
        {
          "key": "etag",
          "value": "officia sed",
          "description": "For optimistic concurrency control. See `if-match`.\n"
        },
        {
          "key": "opc-request-id",
          "value": "officia sed",
          "description": "Unique Oracle-assigned identifier for the request. If you need to contact\nOracle about a particular request, please provide the request ID.\n"
        },
        {
          "key": "Content-Type",
          "value": "application/json"
        }
      ],
      "cookie": [
      ],
      "body": "{\n \"vcnId\": \"enim non eu cillum\",\n \"id\": \"eu incididunt tempor\",\n \"compartmentId\": \"deserunt eu et v\",\n \"cidrBlock\": \"minim\",\n \"routeTableId\": \"veniam dolor voluptate m\",\n \"virtualRouterIp\": \"dolore dolor ven\",\n \"virtualRouterMac\": \"pariatur\",\n \"lifecycleState\": \"AVAILABLE\",\n \"availabilityDomain\": \"Lorem pariatur do\",\n \"definedTags\": {},\n \"dhcpOptionsId\": \"aute\",\n \"displayName\": \"Duis ad eu sunt\",\n \"dnsLabel\": \"eiusmod\",\n \"freeformTags\": {},\n \"ipv6CidrBlock\": \"adipisicing reprehende\",\n \"ipv6PublicCidrBlock\": \"sed Lorem\",\n \"ipv6VirtualRouterIp\": \"in ex cupidatat\",\n \"prohibitPublicIpOnVnic\": false,\n \"securityListIds\": [\n  \"dolore in enim\",\n  \"anim Lorem\"\n ],\n \"subnetDomainName\": \"labore cupidatat commodo\",\n \"timeCreated\": \"1995-01-31T14:27:19.328Z\"\n}"
    },
    {
      "name": "Bad Request",
      "originalRequest": {
        "method": "PUT",
        "header": [
          {
            "description": "For optimistic concurrency control. In the PUT or DELETE call for a resource, set the `if-match`\nparameter to the value of the etag from a previous GET or POST response for that resource. The resource\nwill be updated or deleted only if the etag you provide matches the resource's current etag value.\n",
            "key": "if-match",
            "value": "officia sed"
          }
        ],
        "body": {
          "mode": "raw",
          "raw": "{\n    \"definedTags\": {},\n    \"dhcpOptionsId\": \"adipisicing Excepteur\",\n    \"displayName\": \"reprehenderit consectetur in\",\n    \"freeformTags\": {},\n    \"ipv6CidrBlock\": \"do\",\n    \"routeTableId\": \"commodo mollit aliqua dolor\",\n    \"securityListIds\": [\n        \"est laboris labore consequat\",\n        \"Duis pariatur irure commodo consectetur\"\n    ]\n}"
        },
        "url": {
          "raw": "{{baseUrl}}/subnets/:subnetId",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "subnets",
            ":subnetId"
          ],
          "variable": [
            {
              "key": "subnetId"
            }
          ]
        }
      },
      "status": "Bad Request",
      "code": 400,
      "_postman_previewlanguage": "json",
      "header": [
        {
          "key": "opc-request-id",
          "value": "officia sed",
          "description": "Unique Oracle-assigned identifier for the request. If you need to contact\nOracle about a particular request, please provide the request ID.\n"
        },
        {
          "key": "Content-Type",
          "value": "application/json"
        }
      ],
      "cookie": [
      ],
      "body": "{\n \"code\": \"et exercitation Excepteur\",\n \"message\": \"irure sit\"\n}"
    },
    {
      "name": "Unauthorized",
      "originalRequest": {
        "method": "PUT",
        "header": [
          {
            "description": "For optimistic concurrency control. In the PUT or DELETE call for a resource, set the `if-match`\nparameter to the value of the etag from a previous GET or POST response for that resource. The resource\nwill be updated or deleted only if the etag you provide matches the resource's current etag value.\n",
            "key": "if-match",
            "value": "officia sed"
          }
        ],
        "body": {
          "mode": "raw",
          "raw": "{\n    \"definedTags\": {},\n    \"dhcpOptionsId\": \"adipisicing Excepteur\",\n    \"displayName\": \"reprehenderit consectetur in\",\n    \"freeformTags\": {},\n    \"ipv6CidrBlock\": \"do\",\n    \"routeTableId\": \"commodo mollit aliqua dolor\",\n    \"securityListIds\": [\n        \"est laboris labore consequat\",\n        \"Duis pariatur irure commodo consectetur\"\n    ]\n}"
        },
        "url": {
          "raw": "{{baseUrl}}/subnets/:subnetId",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "subnets",
            ":subnetId"
          ],
          "variable": [
            {
              "key": "subnetId"
            }
          ]
        }
      },
      "status": "Unauthorized",
      "code": 401,
      "_postman_previewlanguage": "json",
      "header": [
        {
          "key": "opc-request-id",
          "value": "officia sed",
          "description": "Unique Oracle-assigned identifier for the request. If you need to contact\nOracle about a particular request, please provide the request ID.\n"
        },
        {
          "key": "Content-Type",
          "value": "application/json"
        }
      ],
      "cookie": [
      ],
      "body": "{\n \"code\": \"et exercitation Excepteur\",\n \"message\": \"irure sit\"\n}"
    },
    {
      "name": "Not Found",
      "originalRequest": {
        "method": "PUT",
        "header": [
          {
            "description": "For optimistic concurrency control. In the PUT or DELETE call for a resource, set the `if-match`\nparameter to the value of the etag from a previous GET or POST response for that resource. The resource\nwill be updated or deleted only if the etag you provide matches the resource's current etag value.\n",
            "key": "if-match",
            "value": "officia sed"
          }
        ],
        "body": {
          "mode": "raw",
          "raw": "{\n    \"definedTags\": {},\n    \"dhcpOptionsId\": \"adipisicing Excepteur\",\n    \"displayName\": \"reprehenderit consectetur in\",\n    \"freeformTags\": {},\n    \"ipv6CidrBlock\": \"do\",\n    \"routeTableId\": \"commodo mollit aliqua dolor\",\n    \"securityListIds\": [\n        \"est laboris labore consequat\",\n        \"Duis pariatur irure commodo consectetur\"\n    ]\n}"
        },
        "url": {
          "raw": "{{baseUrl}}/subnets/:subnetId",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "subnets",
            ":subnetId"
          ],
          "variable": [
            {
              "key": "subnetId"
            }
          ]
        }
      },
      "status": "Not Found",
      "code": 404,
      "_postman_previewlanguage": "json",
      "header": [
        {
          "key": "opc-request-id",
          "value": "officia sed",
          "description": "Unique Oracle-assigned identifier for the request. If you need to contact\nOracle about a particular request, please provide the request ID.\n"
        },
        {
          "key": "Content-Type",
          "value": "application/json"
        }
      ],
      "cookie": [
      ],
      "body": "{\n \"code\": \"et exercitation Excepteur\",\n \"message\": \"irure sit\"\n}"
    },
    {
      "name": "Conflict",
      "originalRequest": {
        "method": "PUT",
        "header": [
          {
            "description": "For optimistic concurrency control. In the PUT or DELETE call for a resource, set the `if-match`\nparameter to the value of the etag from a previous GET or POST response for that resource. The resource\nwill be updated or deleted only if the etag you provide matches the resource's current etag value.\n",
            "key": "if-match",
            "value": "officia sed"
          }
        ],
        "body": {
          "mode": "raw",
          "raw": "{\n    \"definedTags\": {},\n    \"dhcpOptionsId\": \"adipisicing Excepteur\",\n    \"displayName\": \"reprehenderit consectetur in\",\n    \"freeformTags\": {},\n    \"ipv6CidrBlock\": \"do\",\n    \"routeTableId\": \"commodo mollit aliqua dolor\",\n    \"securityListIds\": [\n        \"est laboris labore consequat\",\n        \"Duis pariatur irure commodo consectetur\"\n    ]\n}"
        },
        "url": {
          "raw": "{{baseUrl}}/subnets/:subnetId",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "subnets",
            ":subnetId"
          ],
          "variable": [
            {
              "key": "subnetId"
            }
          ]
        }
      },
      "status": "Conflict",
      "code": 409,
      "_postman_previewlanguage": "json",
      "header": [
        {
          "key": "opc-request-id",
          "value": "officia sed",
          "description": "Unique Oracle-assigned identifier for the request. If you need to contact\nOracle about a particular request, please provide the request ID.\n"
        },
        {
          "key": "Content-Type",
          "value": "application/json"
        }
      ],
      "cookie": [
      ],
      "body": "{\n \"code\": \"et exercitation Excepteur\",\n \"message\": \"irure sit\"\n}"
    },
    {
      "name": "Precondition Failed",
      "originalRequest": {
        "method": "PUT",
        "header": [
          {
            "description": "For optimistic concurrency control. In the PUT or DELETE call for a resource, set the `if-match`\nparameter to the value of the etag from a previous GET or POST response for that resource. The resource\nwill be updated or deleted only if the etag you provide matches the resource's current etag value.\n",
            "key": "if-match",
            "value": "officia sed"
          }
        ],
        "body": {
          "mode": "raw",
          "raw": "{\n    \"definedTags\": {},\n    \"dhcpOptionsId\": \"adipisicing Excepteur\",\n    \"displayName\": \"reprehenderit consectetur in\",\n    \"freeformTags\": {},\n    \"ipv6CidrBlock\": \"do\",\n    \"routeTableId\": \"commodo mollit aliqua dolor\",\n    \"securityListIds\": [\n        \"est laboris labore consequat\",\n        \"Duis pariatur irure commodo consectetur\"\n    ]\n}"
        },
        "url": {
          "raw": "{{baseUrl}}/subnets/:subnetId",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "subnets",
            ":subnetId"
          ],
          "variable": [
            {
              "key": "subnetId"
            }
          ]
        }
      },
      "status": "Precondition Failed",
      "code": 412,
      "_postman_previewlanguage": "json",
      "header": [
        {
          "key": "opc-request-id",
          "value": "officia sed",
          "description": "Unique Oracle-assigned identifier for the request. If you need to contact\nOracle about a particular request, please provide the request ID.\n"
        },
        {
          "key": "Content-Type",
          "value": "application/json"
        }
      ],
      "cookie": [
      ],
      "body": "{\n \"code\": \"et exercitation Excepteur\",\n \"message\": \"irure sit\"\n}"
    },
    {
      "name": "Internal Server Error",
      "originalRequest": {
        "method": "PUT",
        "header": [
          {
            "description": "For optimistic concurrency control. In the PUT or DELETE call for a resource, set the `if-match`\nparameter to the value of the etag from a previous GET or POST response for that resource. The resource\nwill be updated or deleted only if the etag you provide matches the resource's current etag value.\n",
            "key": "if-match",
            "value": "officia sed"
          }
        ],
        "body": {
          "mode": "raw",
          "raw": "{\n    \"definedTags\": {},\n    \"dhcpOptionsId\": \"adipisicing Excepteur\",\n    \"displayName\": \"reprehenderit consectetur in\",\n    \"freeformTags\": {},\n    \"ipv6CidrBlock\": \"do\",\n    \"routeTableId\": \"commodo mollit aliqua dolor\",\n    \"securityListIds\": [\n        \"est laboris labore consequat\",\n        \"Duis pariatur irure commodo consectetur\"\n    ]\n}"
        },
        "url": {
          "raw": "{{baseUrl}}/subnets/:subnetId",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "subnets",
            ":subnetId"
          ],
          "variable": [
            {
              "key": "subnetId"
            }
          ]
        }
      },
      "status": "Internal Server Error",
      "code": 500,
      "_postman_previewlanguage": "json",
      "header": [
        {
          "key": "opc-request-id",
          "value": "officia sed",
          "description": "Unique Oracle-assigned identifier for the request. If you need to contact\nOracle about a particular request, please provide the request ID.\n"
        },
        {
          "key": "Content-Type",
          "value": "application/json"
        }
      ],
      "cookie": [
      ],
      "body": "{\n \"code\": \"et exercitation Excepteur\",\n \"message\": \"irure sit\"\n}"
    },
    {
      "name": "An error has occurred.",
      "originalRequest": {
        "method": "PUT",
        "header": [
          {
            "description": "For optimistic concurrency control. In the PUT or DELETE call for a resource, set the `if-match`\nparameter to the value of the etag from a previous GET or POST response for that resource. The resource\nwill be updated or deleted only if the etag you provide matches the resource's current etag value.\n",
            "key": "if-match",
            "value": "officia sed"
          }
        ],
        "body": {
          "mode": "raw",
          "raw": "{\n    \"definedTags\": {},\n    \"dhcpOptionsId\": \"adipisicing Excepteur\",\n    \"displayName\": \"reprehenderit consectetur in\",\n    \"freeformTags\": {},\n    \"ipv6CidrBlock\": \"do\",\n    \"routeTableId\": \"commodo mollit aliqua dolor\",\n    \"securityListIds\": [\n        \"est laboris labore consequat\",\n        \"Duis pariatur irure commodo consectetur\"\n    ]\n}"
        },
        "url": {
          "raw": "{{baseUrl}}/subnets/:subnetId",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "subnets",
            ":subnetId"
          ],
          "variable": [
            {
              "key": "subnetId"
            }
          ]
        }
      },
      "status": "Internal Server Error",
      "code": 500,
      "_postman_previewlanguage": "json",
      "header": [
        {
          "key": "opc-request-id",
          "value": "officia sed",
          "description": "Unique Oracle-assigned identifier for the request. If you need to contact\nOracle about a particular request, please provide the request ID.\n"
        },
        {
          "key": "Content-Type",
          "value": "application/json"
        }
      ],
      "cookie": [
      ],
      "body": "{\n \"code\": \"et exercitation Excepteur\",\n \"message\": \"irure sit\"\n}"
    }
  ]
}