PureBasic / MongoDB Atlas / Create Access List Entries for One Organization API Key
Back to Collection Items
IncludeFile "CkStringBuilder.pb"
IncludeFile "CkHttp.pb"
IncludeFile "CkHttpResponse.pb"
Procedure ChilkatExample()
; This example assumes the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
http.i = CkHttp::ckCreate()
If http.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
success.i
CkHttp::setCkDigestAuth(http, 1)
CkHttp::setCkLogin(http, "username")
CkHttp::setCkPassword(http, "password")
sbRequestBody.i = CkStringBuilder::ckCreate()
If sbRequestBody.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkStringBuilder::ckAppend(sbRequestBody,"[" + Chr(10))
CkStringBuilder::ckAppend(sbRequestBody," {" + Chr(10))
CkStringBuilder::ckAppend(sbRequestBody," " + Chr(34) + "ipAddress" + Chr(34) + ": " + Chr(34) + "77.54.32.11\Chr(10))
CkStringBuilder::ckAppend(sbRequestBody," }" + Chr(10))
CkStringBuilder::ckAppend(sbRequestBody,"]")
resp.i = CkHttp::ckPTextSb(http,"POST","https://domain.com/api/atlas/{{version}}/orgs/{{ORG-ID}}/apiKeys/{{API-KEY-ID}}/accessList",sbRequestBody,"utf-8","application/text",0,0)
If CkHttp::ckLastMethodSuccess(http) = 0
Debug CkHttp::ckLastErrorText(http)
CkHttp::ckDispose(http)
CkStringBuilder::ckDispose(sbRequestBody)
ProcedureReturn
EndIf
Debug Str(CkHttpResponse::ckStatusCode(resp))
Debug CkHttpResponse::ckBodyStr(resp)
CkHttpResponse::ckDispose(resp)
CkHttp::ckDispose(http)
CkStringBuilder::ckDispose(sbRequestBody)
ProcedureReturn
EndProcedure
Curl Command
curl -X POST
--digest -u 'username:password'
-d '[
{
"ipAddress": "77.54.32.11"
}
]'
https://domain.com/api/atlas/{{version}}/orgs/{{ORG-ID}}/apiKeys/{{API-KEY-ID}}/accessList
Postman Collection Item JSON
{
"name": "Create Access List Entries for One Organization API Key",
"request": {
"method": "POST",
"header": [
],
"body": {
"mode": "raw",
"raw": "[\n {\n \"ipAddress\": \"77.54.32.11\"\n }\n]",
"options": {
"raw": {
"language": "json"
}
}
},
"url": {
"raw": "{{base_url}}/api/atlas/{{version}}/orgs/{{ORG-ID}}/apiKeys/{{API-KEY-ID}}/accessList",
"host": [
"{{base_url}}"
],
"path": [
"api",
"atlas",
"{{version}}",
"orgs",
"{{ORG-ID}}",
"apiKeys",
"{{API-KEY-ID}}",
"accessList"
]
},
"description": "https://docs.atlas.mongodb.com/reference/api/api-access-list/create-api-access-entries/"
},
"response": [
]
}