$domain = "contoso.com"
$dns_server = "servername"
$HostA = "testentry"
$ipAddress = "10.10.10.10"
$dnsZone = $domain
$fqdn_dnsServer=$dns_Server+"."+$domain
$fqdn_HostA = $HostA+"."+$domain
$class = 1
$ttl = 3600
$dnsAType = [wmiclass]"\\$fqdn_dnsServer\root\MicrosoftDNS:MicrosoftDNS_AType"
$dnsAType.CreateInstanceFromPropertyData($fqdn_dnsServer, $dnsZone, $fqdn_HostA, $class, $ttl, $IPAddress)