Classic ASP / MongoDB Atlas / Add Entries to Project IP Access List
Back to Collection Items
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http")
set http = Server.CreateObject("Chilkat.Http")
http.DigestAuth = 1
http.Login = "username"
http.Password = "password"
' Use this online tool to generate code from sample JSON: Generate Code to Create JSON
' The following JSON is sent in the request body.
' [
' {
' "ipAddress": "192.0.2.15",
' "comment": "IP address for Application Server A"
' },
' {
' "cidrBlock": "203.0.113.0/24",
' "comment": "CIDR block for Application Server B - D"
' }
' ]
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonArray")
set jarr = Server.CreateObject("Chilkat.JsonArray")
success = jarr.AddObjectAt(-1)
' jsonObj_1 is a Chilkat.JsonObject
Set jsonObj_1 = jarr.ObjectAt(jarr.Size - 1)
success = jsonObj_1.UpdateString("ipAddress","192.0.2.15")
success = jsonObj_1.UpdateString("comment","IP address for Application Server A")
success = jarr.AddObjectAt(-1)
' jsonObj_1 is a Chilkat.JsonObject
Set jsonObj_1 = jarr.ObjectAt(jarr.Size - 1)
success = jsonObj_1.UpdateString("cidrBlock","203.0.113.0/24")
success = jsonObj_1.UpdateString("comment","CIDR block for Application Server B - D")
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder")
set sbRequestBody = Server.CreateObject("Chilkat.StringBuilder")
success = jarr.EmitSb(sbRequestBody)
' resp is a Chilkat.HttpResponse
Set resp = http.PTextSb("POST","https://domain.com/api/atlas/{{version}}/groups/{{ProjectID}}/accessList/",sbRequestBody,"utf-8","application/json",0,0)
If (http.LastMethodSuccess = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>"
Response.End
End If
Response.Write "<pre>" & Server.HTMLEncode( resp.StatusCode) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( resp.BodyStr) & "</pre>"
%>
</body>
</html>
Curl Command
curl -X POST
--digest -u 'username:password'
-d '[
{
"ipAddress" : "192.0.2.15",
"comment" : "IP address for Application Server A"
},
{
"cidrBlock" : "203.0.113.0/24",
"comment" : "CIDR block for Application Server B - D"
}
]'
https://domain.com/api/atlas/{{version}}/groups/{{ProjectID}}/accessList/
Postman Collection Item JSON
{
"name": "Add Entries to Project IP Access List",
"request": {
"method": "POST",
"header": [
],
"body": {
"mode": "raw",
"raw": " [\n {\n \"ipAddress\" : \"192.0.2.15\",\n \"comment\" : \"IP address for Application Server A\"\n },\n {\n \"cidrBlock\" : \"203.0.113.0/24\",\n \"comment\" : \"CIDR block for Application Server B - D\"\n }\n ]",
"options": {
"raw": {
"language": "json"
}
}
},
"url": {
"raw": "{{base_url}}/api/atlas/{{version}}/groups/{{ProjectID}}/accessList/",
"host": [
"{{base_url}}"
],
"path": [
"api",
"atlas",
"{{version}}",
"groups",
"{{ProjectID}}",
"accessList",
""
]
},
"description": "https://docs.atlas.mongodb.com/reference/api/ip-access-list/add-entries-to-access-list/\n\nCreate the access list entry"
},
"response": [
]
}
