Perl Requires Chilkat v11.0.0+

Outlook -- Create a Mail Folder

See more Outlook Examples

Creates a new mail folder as a child of an existing mail folder. Perl

use chilkat();

$success = 0;

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

$http = chilkat::CkHttp->new();

#  Use your previously obtained access token here:
$http->put_AuthToken("MICROSOFT_GRAPH_ACCESS_TOKEN");

#  This example will create a new mail folder as a child of /Inbox/abc

#  Get the existing folder ID from the folder map created by this example 
$htFolderMap = chilkat::CkHashtable->new();
$sbMap = chilkat::CkStringBuilder->new();
$sbMap->LoadFile("qa_data/outlook/folderMap.xml","utf-8");
$htFolderMap->AddFromXmlSb($sbMap);

$existingFolderId = $htFolderMap->lookupStr("/Inbox/abc");
if ($htFolderMap->get_LastMethodSuccess() != 1) {
    print "Folder ID not found" . "\r\n";
    exit;
}

#  Create a JSON request body with this content:
#  
#  	{
#  	  "displayName": "displayName-value",
#  	}

#  This example will create /Inbox/abc/subFolderC
$jsonRequestBody = chilkat::CkJsonObject->new();
$jsonRequestBody->UpdateString("displayName","subFolderC");

$http->SetUrlVar("folder_id",$existingFolderId);

#  Create the folder "subFolderC" at the specified location.
$resp = chilkat::CkHttpResponse->new();
$success = $http->HttpJson("POST","https://graph.microsoft.com/v1.0/me/mailFolders/{$folder_id}/childFolders",$jsonRequestBody,"application/json",$resp);
if ($success == 0) {
    print $http->lastErrorText() . "\r\n";
    exit;
}

#  A 201 response indicates success.
if ($http->get_LastStatus() == 201) {
    print "Folder created." . "\r\n";
}
else {
    print "Response status code = " . $resp->get_StatusCode() . "\r\n";
    print "Error: Folder not created." . "\r\n";
}

#  Show the response in both cases..
$jsonResponse = chilkat::CkJsonObject->new();
$jsonResponse->put_EmitCompact(0);
$jsonResponse->Load($resp->bodyStr());
print $jsonResponse->emit() . "\r\n";

#  A sample successful JSON response looks like this:

#  	{
#  	  "@odata.context": "https://graph.microsoft.com/v1.0/$metadata#users('me')/mailFolders('AQMkADAwATM0MDAAMS1iNTcwLWI2NTEtMDACLTAwCgAuAAADsVyfxjDU406Ic4X7ill8xAEA5_vF7TKKdE6bGCRqXyl2PQAAAL8huv8AAAA%3D')/childFolders/$entity",
#  	  "id": "AQMkADAwATM0MDAAMS1iNTcwLWI2NTEtMDACLTAwCgAuAAADsVyfxjDU406Ic4X7ill8xAEA5_vF7TKKdE6bGCRqXyl2PQAAAM6JqMIAAAA=",
#  	  "displayName": "subFolderC",
#  	  "parentFolderId": "AQMkADAwATM0MDAAMS1iNTcwLWI2NTEtMDACLTAwCgAuAAADsVyfxjDU406Ic4X7ill8xAEA5_vF7TKKdE6bGCRqXyl2PQAAAL8huv8AAAA=",
#  	  "childFolderCount": 0,
#  	  "unreadItemCount": 0,
#  	  "totalItemCount": 0
#  	}