Ascio DNS

Perl UpdateRecord

Updates the record of a zone.

Updates the record to a zone. Please provide at least an source and a target. If names are used, FQDNs (which includes the zone-name) are needed.
Possible record-type that can be created are: WebForward, SRV, CNAME, SOA, TXT, PTR, MX, A, AAAA, NS, MailForward. A record wit the type 'Record' are invalid.

The zone must exist, and the permissions must match.

All records at ascio have the long zone-format. Like www.ascio.com instead of www

Response UpdateRecord(UpdateRecord updateRecord)

Response codes

ResultCodeMessageValue
200OK
400Parameter value error - Null or invalid value
401Authorization failed
404Zone not found
416Validation failed

UpdateRecord Request

PropertyType
record

UpdateRecordResponse

Property
UpdateRecordResult

Perl example

use SOAP::Lite;
use Date::Format;
$proxy = "https://dnsservice.demo.ascio.com/DnsService.svc";
$namespace = "http://www.ascio.com/2007/01";
$soap = SOAP::Lite->on_action( sub { "http://groupnbt.com/2010/10/30/Dns/DnsService/IDnsService/UpdateRecord" } )->proxy($proxy);
$soap->autotype(0);
$method = SOAP::Data->name("UpdateRecord")->attr({xmlns => $namespace});

#WebForward
$record =  \SOAP::Data->value(
	SOAP::Data->name('Source','www.testing-ascio.com'),
	SOAP::Data->name('TTL',3600),
	SOAP::Data->name('Target','5.6.7.8')
);
@query = (
	SOAP::Data->name("record" => $record)
);

$result = $soap->call($method => @query);
unless ($result->fault) {
	$response = $result->valueof("//UpdateRecordResponse/UpdateRecordResult");
	print "ResultCode : $response->{'ResultCode'}\r\n";
	print "Message : $response->{'ResultMessage'}\r\n";
	if ($response->{"ResultCode"} == 200) {
		print "OK";
	}
}
else {
	print join ", ",
	$result->faultcode,
	$result->faultstring,
	$result->faultdetail;
}
WSDL AscioDns
https://dnsservice.demo.ascio.com/2010/10/30/DnsService.wsdl (OTE)
https://dnsservice.ascio.com/2010/10/30/DnsService.wsdl (Live)
Please configure the IP-Whitelisting in the portal/demo-portal.