# NOT RUN {
# The following example creates a resource record set that routes Internet
# traffic to a resource with an IP address of 192.0.2.44.
svc$change_resource_record_sets(
ChangeBatch = list(
Changes = list(
list(
Action = "CREATE",
ResourceRecordSet = list(
Name = "example.com",
ResourceRecords = list(
list(
Value = "192.0.2.44"
)
),
TTL = 60L,
Type = "A"
)
)
),
Comment = "Web server for example.com"
),
HostedZoneId = "Z3M3LMPEXAMPLE"
)
# The following example creates two weighted resource record sets. The
# resource with a Weight of 100 will get 1/3rd of traffic (100/100+200),
# and the other resource will get the rest of the traffic for example.com.
svc$change_resource_record_sets(
ChangeBatch = list(
Changes = list(
list(
Action = "CREATE",
ResourceRecordSet = list(
HealthCheckId = "abcdef11-2222-3333-4444-555555fedcba",
Name = "example.com",
ResourceRecords = list(
list(
Value = "192.0.2.44"
)
),
SetIdentifier = "Seattle data center",
TTL = 60L,
Type = "A",
Weight = 100L
)
),
list(
Action = "CREATE",
ResourceRecordSet = list(
HealthCheckId = "abcdef66-7777-8888-9999-000000fedcba",
Name = "example.com",
ResourceRecords = list(
list(
Value = "192.0.2.45"
)
),
SetIdentifier = "Portland data center",
TTL = 60L,
Type = "A",
Weight = 200L
)
)
),
Comment = "Web servers for example.com"
),
HostedZoneId = "Z3M3LMPEXAMPLE"
)
# The following example creates an alias resource record set that routes
# traffic to a CloudFront distribution.
svc$change_resource_record_sets(
ChangeBatch = list(
Changes = list(
list(
Action = "CREATE",
ResourceRecordSet = list(
AliasTarget = list(
DNSName = "d123rk29d0stfj.cloudfront.net",
EvaluateTargetHealth = FALSE,
HostedZoneId = "Z2FDTNDATAQYW2"
),
Name = "example.com",
Type = "A"
)
)
),
Comment = "CloudFront distribution for example.com"
),
HostedZoneId = "Z3M3LMPEXAMPLE"
)
# The following example creates two weighted alias resource record sets
# that route traffic to ELB load balancers. The resource with a Weight of
# 100 will get 1/3rd of traffic (100/100+200), and the other resource will
# get the rest of the traffic for example.com.
svc$change_resource_record_sets(
ChangeBatch = list(
Changes = list(
list(
Action = "CREATE",
ResourceRecordSet = list(
AliasTarget = list(
DNSName = "example-com-123456789.us-east-2.elb.amazonaws.com ",
EvaluateTargetHealth = TRUE,
HostedZoneId = "Z3AADJGX6KTTL2"
),
Name = "example.com",
SetIdentifier = "Ohio region",
Type = "A",
Weight = 100L
)
),
list(
Action = "CREATE",
ResourceRecordSet = list(
AliasTarget = list(
DNSName = "example-com-987654321.us-west-2.elb.amazonaws.com ",
EvaluateTargetHealth = TRUE,
HostedZoneId = "Z1H1FL5HABSF5"
),
Name = "example.com",
SetIdentifier = "Oregon region",
Type = "A",
Weight = 200L
)
)
),
Comment = "ELB load balancers for example.com"
),
HostedZoneId = "Z3M3LMPEXAMPLE"
)
# The following example creates two latency resource record sets that
# route traffic to EC2 instances. Traffic for example.com is routed either
# to the Ohio region or the Oregon region, depending on the latency
# between the user and those regions.
svc$change_resource_record_sets(
ChangeBatch = list(
Changes = list(
list(
Action = "CREATE",
ResourceRecordSet = list(
HealthCheckId = "abcdef11-2222-3333-4444-555555fedcba",
Name = "example.com",
Region = "us-east-2",
ResourceRecords = list(
list(
Value = "192.0.2.44"
)
),
SetIdentifier = "Ohio region",
TTL = 60L,
Type = "A"
)
),
list(
Action = "CREATE",
ResourceRecordSet = list(
HealthCheckId = "abcdef66-7777-8888-9999-000000fedcba",
Name = "example.com",
Region = "us-west-2",
ResourceRecords = list(
list(
Value = "192.0.2.45"
)
),
SetIdentifier = "Oregon region",
TTL = 60L,
Type = "A"
)
)
),
Comment = "EC2 instances for example.com"
),
HostedZoneId = "Z3M3LMPEXAMPLE"
)
# The following example creates two latency alias resource record sets
# that route traffic for example.com to ELB load balancers. Requests are
# routed either to the Ohio region or the Oregon region, depending on the
# latency between the user and those regions.
svc$change_resource_record_sets(
ChangeBatch = list(
Changes = list(
list(
Action = "CREATE",
ResourceRecordSet = list(
AliasTarget = list(
DNSName = "example-com-123456789.us-east-2.elb.amazonaws.com ",
EvaluateTargetHealth = TRUE,
HostedZoneId = "Z3AADJGX6KTTL2"
),
Name = "example.com",
Region = "us-east-2",
SetIdentifier = "Ohio region",
Type = "A"
)
),
list(
Action = "CREATE",
ResourceRecordSet = list(
AliasTarget = list(
DNSName = "example-com-987654321.us-west-2.elb.amazonaws.com ",
EvaluateTargetHealth = TRUE,
HostedZoneId = "Z1H1FL5HABSF5"
),
Name = "example.com",
Region = "us-west-2",
SetIdentifier = "Oregon region",
Type = "A"
)
)
),
Comment = "ELB load balancers for example.com"
),
HostedZoneId = "Z3M3LMPEXAMPLE"
)
# The following example creates primary and secondary failover resource
# record sets that route traffic to EC2 instances. Traffic is generally
# routed to the primary resource, in the Ohio region. If that resource is
# unavailable, traffic is routed to the secondary resource, in the Oregon
# region.
svc$change_resource_record_sets(
ChangeBatch = list(
Changes = list(
list(
Action = "CREATE",
ResourceRecordSet = list(
Failover = "PRIMARY",
HealthCheckId = "abcdef11-2222-3333-4444-555555fedcba",
Name = "example.com",
ResourceRecords = list(
list(
Value = "192.0.2.44"
)
),
SetIdentifier = "Ohio region",
TTL = 60L,
Type = "A"
)
),
list(
Action = "CREATE",
ResourceRecordSet = list(
Failover = "SECONDARY",
HealthCheckId = "abcdef66-7777-8888-9999-000000fedcba",
Name = "example.com",
ResourceRecords = list(
list(
Value = "192.0.2.45"
)
),
SetIdentifier = "Oregon region",
TTL = 60L,
Type = "A"
)
)
),
Comment = "Failover configuration for example.com"
),
HostedZoneId = "Z3M3LMPEXAMPLE"
)
# The following example creates primary and secondary failover alias
# resource record sets that route traffic to ELB load balancers. Traffic
# is generally routed to the primary resource, in the Ohio region. If that
# resource is unavailable, traffic is routed to the secondary resource, in
# the Oregon region.
svc$change_resource_record_sets(
ChangeBatch = list(
Changes = list(
list(
Action = "CREATE",
ResourceRecordSet = list(
AliasTarget = list(
DNSName = "example-com-123456789.us-east-2.elb.amazonaws.com ",
EvaluateTargetHealth = TRUE,
HostedZoneId = "Z3AADJGX6KTTL2"
),
Failover = "PRIMARY",
Name = "example.com",
SetIdentifier = "Ohio region",
Type = "A"
)
),
list(
Action = "CREATE",
ResourceRecordSet = list(
AliasTarget = list(
DNSName = "example-com-987654321.us-west-2.elb.amazonaws.com ",
EvaluateTargetHealth = TRUE,
HostedZoneId = "Z1H1FL5HABSF5"
),
Failover = "SECONDARY",
Name = "example.com",
SetIdentifier = "Oregon region",
Type = "A"
)
)
),
Comment = "Failover alias configuration for example.com"
),
HostedZoneId = "Z3M3LMPEXAMPLE"
)
# The following example creates four geolocation resource record sets that
# use IPv4 addresses to route traffic to resources such as web servers
# running on EC2 instances. Traffic is routed to one of four IP addresses,
# for North America (NA), for South America (SA), for Europe (EU), and for
# all other locations (*).
svc$change_resource_record_sets(
ChangeBatch = list(
Changes = list(
list(
Action = "CREATE",
ResourceRecordSet = list(
GeoLocation = list(
ContinentCode = "NA"
),
Name = "example.com",
ResourceRecords = list(
list(
Value = "192.0.2.44"
)
),
SetIdentifier = "North America",
TTL = 60L,
Type = "A"
)
),
list(
Action = "CREATE",
ResourceRecordSet = list(
GeoLocation = list(
ContinentCode = "SA"
),
Name = "example.com",
ResourceRecords = list(
list(
Value = "192.0.2.45"
)
),
SetIdentifier = "South America",
TTL = 60L,
Type = "A"
)
),
list(
Action = "CREATE",
ResourceRecordSet = list(
GeoLocation = list(
ContinentCode = "EU"
),
Name = "example.com",
ResourceRecords = list(
list(
Value = "192.0.2.46"
)
),
SetIdentifier = "Europe",
TTL = 60L,
Type = "A"
)
),
list(
Action = "CREATE",
ResourceRecordSet = list(
GeoLocation = list(
CountryCode = "*"
),
Name = "example.com",
ResourceRecords = list(
list(
Value = "192.0.2.47"
)
),
SetIdentifier = "Other locations",
TTL = 60L,
Type = "A"
)
)
),
Comment = "Geolocation configuration for example.com"
),
HostedZoneId = "Z3M3LMPEXAMPLE"
)
# The following example creates four geolocation alias resource record
# sets that route traffic to ELB load balancers. Traffic is routed to one
# of four IP addresses, for North America (NA), for South America (SA),
# for Europe (EU), and for all other locations (*).
svc$change_resource_record_sets(
ChangeBatch = list(
Changes = list(
list(
Action = "CREATE",
ResourceRecordSet = list(
AliasTarget = list(
DNSName = "example-com-123456789.us-east-2.elb.amazonaws.com ",
EvaluateTargetHealth = TRUE,
HostedZoneId = "Z3AADJGX6KTTL2"
),
GeoLocation = list(
ContinentCode = "NA"
),
Name = "example.com",
SetIdentifier = "North America",
Type = "A"
)
),
list(
Action = "CREATE",
ResourceRecordSet = list(
AliasTarget = list(
DNSName = "example-com-234567890.sa-east-1.elb.amazonaws.com ",
EvaluateTargetHealth = TRUE,
HostedZoneId = "Z2P70J7HTTTPLU"
),
GeoLocation = list(
ContinentCode = "SA"
),
Name = "example.com",
SetIdentifier = "South America",
Type = "A"
)
),
list(
Action = "CREATE",
ResourceRecordSet = list(
AliasTarget = list(
DNSName = "example-com-234567890.eu-central-1.elb.amazonaws.com ",
EvaluateTargetHealth = TRUE,
HostedZoneId = "Z215JYRZR1TBD5"
),
GeoLocation = list(
ContinentCode = "EU"
),
Name = "example.com",
SetIdentifier = "Europe",
Type = "A"
)
),
list(
Action = "CREATE",
ResourceRecordSet = list(
AliasTarget = list(
DNSName = "example-com-234567890.ap-southeast-1.elb.amazonaws.com ",
EvaluateTargetHealth = TRUE,
HostedZoneId = "Z1LMS91P8CMLE5"
),
GeoLocation = list(
CountryCode = "*"
),
Name = "example.com",
SetIdentifier = "Other locations",
Type = "A"
)
)
),
Comment = "Geolocation alias configuration for example.com"
),
HostedZoneId = "Z3M3LMPEXAMPLE"
)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab