B4X
Frame.io - Create a Folder

Create a folder asset as a child to the root_asset_id.
Chilkat B4X Downloads

B4X
Dim success As Boolean = False

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

Dim http As ChilkatHttp
http.Initialize("http")

'  Implements the following CURL command:

'  curl --request POST \
'  --url https://api.frame.io/v2/assets/<root_asset_id>/children \
'  --header 'authorization: Bearer <FRAME_IO_DEV_TOKEN>' \
'  --header 'content-type: application/json' \
'  --data '{"type":"folder", "name": "Folder at root"}'

'  Use the following online tool to generate HTTP code from a CURL command
'  Convert a cURL Command to HTTP Source Code

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

'  The following JSON is sent in the request body.

'  {
'    "type": "folder",
'    "name": "Folder at root"
'  }

Dim json As ChilkatJsonObject
json.Initialize
json.UpdateString("type", "folder")
json.UpdateString("name", "Folder at root")

http.SetRequestHeader("content-type", "application/json")
'  Adds the "Authorization: Bearer <FRAME_IO_DEV_TOKEN>" header.
http.AuthToken = "<FRAME_IO_DEV_TOKEN>"

'  Our root_asset_id = 4ecb383f-71a8-4233-b665-d8f75136f554
'  You'll need to modify the following line to use your root asset ID.

Dim resp As ChilkatHttpResponse
resp.Initialize
success = http.HttpJson("POST", "https://api.frame.io/v2/assets/4ecb383f-71a8-4233-b665-d8f75136f554/children", json, "application/json", resp)
If success = False Then
    Log(http.LastErrorText)
    Return
End If


Dim sbResponseBody As ChilkatStringBuilder
sbResponseBody.Initialize
resp.GetBodySb(sbResponseBody)
Dim jResp As ChilkatJsonObject
jResp.Initialize
jResp.LoadSb(sbResponseBody)
jResp.EmitCompact = False

Log("Response Body:")
Log(jResp.Emit)

Dim respStatusCode As Int = resp.StatusCode
Log("Response Status Code = " & respStatusCode)
If respStatusCode >= 400 Then
    Log("Response Header:")
    Log(resp.Header)
    Log("Failed.")
    Return
End If


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

'  {
'    "team_id": "95a5fbad-688d-46fc-aef1-2f011dd76c10",
'    "public_item_count": 0,
'    "properties": null,
'    "deleted_at": null,
'    "fps": null,
'    "rating": null,
'    "description": null,
'    "updated_at": "2020-08-18T03:31:59.699011Z",
'    "cover_asset_id": null,
'    "archive_scheduled_at": null,
'    "subtitle_tracks": null,
'    "index": -7.0,
'    "item_count": 0,
'    "account_id": "b1cd046b-a3bf-4ef8-81a6-0afd74ecc455",
'    "name": "FolderA",
'    "checksums": null,
'    "audio_tracks": null,
'    "duration": null,
'    "label": "none",
'    "is_session_watermarked": false,
'    "parent_id": "4ecb383f-71a8-4233-b665-d8f75136f554",
'    "versions": 0,
'    "project_id": "e76653c4-6cc0-4c47-936b-f7885b477dc0",
'    "resource_id": null,
'    "private": false,
'    "frames": 0,
'    "autoversion_id": null,
'    "type": "folder",
'    "uploaded_at": "2020-08-18T03:31:59.697174Z",
'    "creator_id": "34b4f98a-7cc9-4159-8f46-c7c3d837fc6f",
'    "user_permissions": {
'      "can_download": true,
'      "can_modify_template": false,
'      "can_public_share_presentation": true,
'      "can_public_share_review_link": true,
'      "can_share_downloadable_presentation": true,
'      "can_share_downloadable_review_link": true,
'      "can_share_unwatermarked_presentation": true,
'      "can_share_unwatermarked_review_link": true
'    },
'    "shared": false,
'    "is_360": false,
'    "_type": "folder",
'    "comment_count": 0,
'    "archived_at": null,
'    "filetype": null,
'    "id": "039845e8-bffe-4d6b-88d3-c780bae06342",
'    "hard_deleted_at": null,
'    "copy": false,
'    "is_hls_required": false,
'    "archive_status": null,
'    "inserted_at": "2020-08-18T03:31:59.699011Z",
'    "filesize": 0
'  }

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



Dim team_id As String = jResp.StringOf("team_id")
Dim public_item_count As Int = jResp.IntOf("public_item_count")
Dim properties As String = jResp.StringOf("properties")
Dim deleted_at As String = jResp.StringOf("deleted_at")
Dim fps As String = jResp.StringOf("fps")
Dim rating As String = jResp.StringOf("rating")
Dim description As String = jResp.StringOf("description")
Dim updated_at As String = jResp.StringOf("updated_at")
Dim cover_asset_id As String = jResp.StringOf("cover_asset_id")
Dim archive_scheduled_at As String = jResp.StringOf("archive_scheduled_at")
Dim subtitle_tracks As String = jResp.StringOf("subtitle_tracks")
Dim index As String = jResp.StringOf("index")
Dim item_count As Int = jResp.IntOf("item_count")
Dim account_id As String = jResp.StringOf("account_id")
Dim name As String = jResp.StringOf("name")
Dim checksums As String = jResp.StringOf("checksums")
Dim audio_tracks As String = jResp.StringOf("audio_tracks")
Dim duration As String = jResp.StringOf("duration")
Dim label As String = jResp.StringOf("label")
Dim is_session_watermarked As Boolean = jResp.BoolOf("is_session_watermarked")
Dim parent_id As String = jResp.StringOf("parent_id")
Dim versions As Int = jResp.IntOf("versions")
Dim project_id As String = jResp.StringOf("project_id")
Dim resource_id As String = jResp.StringOf("resource_id")
Dim v_private As Boolean = jResp.BoolOf("private")
Dim frames As Int = jResp.IntOf("frames")
Dim autoversion_id As String = jResp.StringOf("autoversion_id")
Dim v_type As String = jResp.StringOf("type")
Dim uploaded_at As String = jResp.StringOf("uploaded_at")
Dim creator_id As String = jResp.StringOf("creator_id")
Dim user_permissionsCan_download As Boolean = jResp.BoolOf("user_permissions.can_download")
Dim user_permissionsCan_modify_template As Boolean = jResp.BoolOf("user_permissions.can_modify_template")
Dim user_permissionsCan_public_share_presentation As Boolean = jResp.BoolOf("user_permissions.can_public_share_presentation")
Dim user_permissionsCan_public_share_review_link As Boolean = jResp.BoolOf("user_permissions.can_public_share_review_link")
Dim user_permissionsCan_share_downloadable_presentation As Boolean = jResp.BoolOf("user_permissions.can_share_downloadable_presentation")
Dim user_permissionsCan_share_downloadable_review_link As Boolean = jResp.BoolOf("user_permissions.can_share_downloadable_review_link")
Dim user_permissionsCan_share_unwatermarked_presentation As Boolean = jResp.BoolOf("user_permissions.can_share_unwatermarked_presentation")
Dim user_permissionsCan_share_unwatermarked_review_link As Boolean = jResp.BoolOf("user_permissions.can_share_unwatermarked_review_link")
Dim shared As Boolean = jResp.BoolOf("shared")
Dim is_360 As Boolean = jResp.BoolOf("is_360")
v_type = jResp.StringOf("_type")
Dim comment_count As Int = jResp.IntOf("comment_count")
Dim archived_at As String = jResp.StringOf("archived_at")
Dim filetype As String = jResp.StringOf("filetype")
Dim id As String = jResp.StringOf("id")
Dim hard_deleted_at As String = jResp.StringOf("hard_deleted_at")
Dim copy As Boolean = jResp.BoolOf("copy")
Dim is_hls_required As Boolean = jResp.BoolOf("is_hls_required")
Dim archive_status As String = jResp.StringOf("archive_status")
Dim inserted_at As String = jResp.StringOf("inserted_at")
Dim filesize As Int = jResp.IntOf("filesize")