(Tcl) Microsoft Teams - Delete a Team
Deletes a group.
When deleted, Microsoft 365 groups are moved to a temporary container and can be restored within 30 days. After that time, they are permanently deleted. For more information, see https://docs.microsoft.com/en-us/graph/api/group-delete?view=graph-rest-1.0
load ./chilkat.dll
# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.
set http [new_CkHttp]
# Adds the "Authorization: Bearer ACCESS_TOKEN" header.
CkHttp_put_AuthToken $http "ACCESS_TOKEN"
CkHttp_SetUrlVar $http "team_id" "bc6ef2f4-d51e-4362-9a17-11ad3382b8ad"
# resp is a CkHttpResponse
set resp [CkHttp_QuickRequest $http "DELETE" "https://graph.microsoft.com/v1.0/groups/{$team_id}"]
if {[CkHttp_get_LastMethodSuccess $http] == 0} then {
puts [CkHttp_lastErrorText $http]
delete_CkHttp $http
exit
}
# Success is a 204 response status code with an empty body.
puts "Response status code: [CkHttpResponse_get_StatusCode $resp]"
puts "Response body:"
puts [CkHttpResponse_bodyStr $resp]
delete_CkHttp $http
|