Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(VB.NET UWP/WinRT) Frame.io - Create a FolderCreate a folder asset as a child to the root_asset_id. For more information, see https://docs.frame.io/docs/root-asset-ids
' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim http As New Chilkat.Http Dim success As Boolean ' 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 New Chilkat.JsonObject 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 Chilkat.HttpResponse = Await http.PostJson3Async("https://api.frame.io/v2/assets/4ecb383f-71a8-4233-b665-d8f75136f554/children","application/json",json) If (http.LastMethodSuccess = False) Then Debug.WriteLine(http.LastErrorText) Exit Sub End If Dim sbResponseBody As New Chilkat.StringBuilder resp.GetBodySb(sbResponseBody) Dim jResp As New Chilkat.JsonObject jResp.LoadSb(sbResponseBody) jResp.EmitCompact = False Debug.WriteLine("Response Body:") Debug.WriteLine(jResp.Emit()) Dim respStatusCode As Integer = resp.StatusCode Debug.WriteLine("Response Status Code = " & respStatusCode) If (respStatusCode >= 400) Then Debug.WriteLine("Response Header:") Debug.WriteLine(resp.Header) Debug.WriteLine("Failed.") Exit Sub 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 Integer = 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 Integer = 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 Integer = 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 Integer = 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 Integer = 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 Integer = jResp.IntOf("filesize") |
© 2000-2022 Chilkat Software, Inc. All Rights Reserved.