<# Welcome to PowerDNS V1.0! This Script is prepared by Subhro Majumder. Modified by Lance Lingerfelt - LDLNET LLC. #>
<# The script has been prepared and tested in Powershell 4.0. So when you run this script, please make sure that the Powershell version is 4.0 or above. #>
<# Using this script , you can Look-Up, Create and Delete A,PTR and CNAME Records. You can also Look-Up, Create, and Remove DNS Zones.#>
<# This script is suitable for single record entry as well as bulk entry. For every operation there are two options, Single and Bulk.
For Bulk entry you need to create an input file in CSV format. Sample input files has been provided along with this script. #>
<# While Deleting records, you will get a confirmation box for each record, to ensure that you are going to delete the correct record. #>
<# While this script has been tested multiple times, I recommend that you test it in a test environment before using it in a production environment.#>
<# While every attempt has been made to make this script error free, I will not take any responsibilty for any consequence that would happen while running the script.#>
function Show-Menu
{
param (
[string]$Title = 'Welcome to the PowerDNS! This is a one stop solution for all DNS related work'
)
cls
Write-Host "===== $Title =====" -ForegroundColor Yellow
Write-Host " "
Write-Host "Using this script, you can Look-Up, Create and Delete A,PTR and CNAME Records. You can also Look-Up, Create, and Remove DNS Zones." -ForegroundColor Yellow
Write-Host " "
Write-Host "The script has been prepared and tested in Powershell 4.0. So when you run this script, please make sure that the Powershell version is 4.0 or above." -ForegroundColor Yellow
Write-Host " "
Write-Host "This script is suitable for single record entry as well as bulk entry. For every operation there are two options, Single and Bulk." -ForegroundColor Yellow
Write-Host " "
Write-Host "For Bulk entry you need to create an input file in CSV format. Sample input files has been provided along with this script." -ForegroundColor Yellow
Write-Host " "
Write-Host "While Deleting records/zones, you will get a confirmation box for each record/zone, to ensure that you are going to delete the correct record/zone." -ForegroundColor Yellow
Write-Host " "
Write-Host "While this script has been tested multiple times, I recommend that you test it in a test environment before using it in a production environment." -ForegroundColor Yellow
Write-Host " "
Write-Host "While every attempt has been made to make this script error free, I will not take any responsibilty for any consequence that would happen while running the script." -ForegroundColor Yellow
Write-Host " "
Write-Host "--------------MENU----------------" -ForegroundColor Yellow
Write-Host " "
Write-Host "1: Press 1 to Lookup DNS Records." -ForegroundColor DarkYellow
Write-Host " "
Write-Host "2: Press 2 to Create Host Records." -ForegroundColor Green
Write-Host " "
Write-Host "3: Press 3 to Create PTR Records." -ForegroundColor Green
Write-Host " "
Write-Host "4: Press 4 to Create CNAME Records." -ForegroundColor Green
Write-Host " "
Write-Host "5: Press 5 to Delete Host Records." -ForegroundColor Red
Write-Host " "
Write-Host "6: Press 6 to Delete PTR Records." -ForegroundColor Red
Write-Host " "
Write-Host "7: Press 7 to Delete CNAME Records." -ForegroundColor Red
Write-Host " "
Write-Host "8: Press 8 to Create DNS Primary Zones." -ForegroundColor DarkGreen
Write-Host " "
Write-Host "9: Press 9 to Create DNS Secondary Zones." -ForegroundColor DarkGreen
Write-Host " "
Write-Host "10: Press 10 to Create DNS Stub Zones." -ForegroundColor DarkGreen
Write-Host " "
Write-Host "11: Press 11 to Remove DNS Zones." -ForegroundColor Magenta
Write-Host " "
Write-Host "Q: Press 'Q' to quit this Program." -ForegroundColor Yellow
Write-Host "----------------------------------" -ForegroundColor Yellow
Write-Host " "
}
function Lookup-SingleDNS
{
cls
'You chose Single DNS Lookup'
$input = Read-Host "Please enter the value you want to look up"
Resolve-DNSName -Name "$input" -nohostsfile -type All | ft Name,Type,TTL,IPAddress,NameExchange,Preference,Namehost,Strings -autosize
" "
" "
}
function Lookup-BulkDNS
{
cls
'You chose Bulk DNS Lookup'
$inputfile = Read-Host "Please enter the location of the input file"
$output1= Read-Host "Please enter the location of the output file"
$records= Get-Content $inputfile
foreach ($record in $records)
{
$output=Resolve-DnsName -Name $record -NoHostsFile -Type ALL
$output | ft Name,Type,TTL,IPAddress,NameExchange,Preference,Namehost,Strings | Out-File -FilePath $output1 -Append -NoClobber
}
}
function Create-SingleHostEntry
{
Write-Host "Please Note: While creating the Host Record, corresponding PTR Record will also be created." -ForegroundColor Yellow
$dnsserver= Read-Host "Please enter the DNS Server Name where you want to create the Record"
$zone= Read-Host "Please enter the Zone Name"
$name= Read-Host "Please enter the Record value (Without FQDN )"
$IP= Read-Host "Please enter the IP Address"
Add-DnsServerResourceRecordA -ComputerName $dnsserver -Name $name -ZoneName $zone -IPv4Address $IP -TimeToLive 05:00:00 -CreatePtr -Confirm
}
function Create-BulkHostEntry
{
Write-Host "Please Note: While creating the Host Records, corresponding PTR Records will also be created." -ForegroundColor Yellow
$dnsserver= Read-Host "Please enter the DNS Server Name where you want to create the Record"
$zone= Read-Host "Please enter the Zone Name"
$inputfile = Read-Host "Please enter the location of the input file. Input file format is CSV. Include these headers: name,IP"
import-csv -Path $inputfile | foreach-object {Add-DnsServerResourceRecordA -computername $dnsserver -Name $_.name -ZoneName $zone -IPv4Address $_.IP -TimeToLive 05:00:00 -CreatePtr -Confirm}
}
function Create-SinglePTREntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name where you want to create the Record"
$zone= Read-Host "Please enter the Reverse Zone Name"
$FQDN= Read-Host "Please enter the record value (With FQDN )"
$IP= Read-Host "Please enter the Host octects of the IP Address.Please do not include Network octets."
Add-DnsServerResourceRecord -ComputerName $dnsserver -Name $IP -PTR -ZoneName $zone -PtrDomainName $FQDN -TimeToLive 05:00:00 -Confirm
}
function Create-BulkPTREntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name where you want to create the Record"
$zone= Read-Host "Please enter the Reverse Zone Name"
$inputfile = Read-Host "Please enter the location of the input file. Input file format is CSV. Include these headers: IP,FQDN"
Import-Csv -Path $inputfile| foreach-object { Add-DnsServerResourceRecord -ComputerName $dnsserver -Name $_.IP -PTR -ZoneName $zone -PtrDomainName $_.FQDN -TimeToLive 05:00:00 -Confirm}
}
function Create-SingleCNAMEEntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name where you want to create the Record"
$alias= Read-Host "Please enter the Alias Name"
$zonename= Read-Host "Please enter the Zone Name"
$FQDN= Read-Host "Please enter the FQDN for the alias"
Add-DnsServerResourceRecord -CName -ComputerName $dnsserver -Name $alias -HostNameAlias $FQDN -ZoneName $zonename -TimeToLive 05:00:00 -Confirm
}
function Create-BulkCNAMEEntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name where you want to create the Record"
$zonename= Read-Host "Please enter the Zone Name"
$inputfile = Read-Host "Please enter the location of the input file. Input file format is CSV: alias,FQDN."
Import-Csv -Path $inputfile| foreach-object { Add-DnsServerResourceRecord -CName -ComputerName $dnsserver -Name $_.alias -HostNameAlias $_.FQDN -ZoneName $zonename -TimeToLive 05:00:00 -Confirm }
}
function Delete-SingleHostEntry
{
Write-Host "There can be multiple Host Records (IPs) for a given Host Name. Only one Record for the matching IP address will be deleted" -ForegroundColor Yellow
Write-Host "For Example: In contoso.com zone there are two records test.contoso.com > 192.168.1.23 and test.contoso.com > 192.168.1.24. This action removes only one of the entries of test.contoso.com, matching the IP address." -ForegroundColor Yellow
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to delete the Record"
$zonename= Read-Host "Please enter the Zone Name"
$name= Read-Host "Please enter the Host Record Name (Without FQDN)"
$IP= Read-Host "Please enter the IP address of the Host Record which you want to delete"
Remove-DnsServerResourceRecord -computername $dnsserver -ZoneName $zonename -RRType "A" -Name $name -RecordData $IP -Confirm
}
function Delete-BulkHostEntry
{
Write-Host "There can be multiple Host Records (IPs) for a given Host Name. Only one Record for the matching IP address will be deleted" -ForegroundColor Yellow
Write-Host "For Example: In contoso.com zone there are two records test.contoso.com > 192.168.1.23 and test.contoso.com > 192.168.1.24. This action removes only one of the entries of host.contoso.com, matching the IP address." -ForegroundColor Yellow
Write-Host " "
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to delete the record"
$zonename= Read-Host "Please enter the Zone Name where the Record is located"
$inputfile = Read-Host "Please enter the location of the input file. Input file format is CSV.Please include these Headers: name,IP."
Import-Csv -Path $inputfile| foreach-object { Remove-DnsServerResourceRecord -computername $dnsserver -ZoneName $zonename -RRType "A" -Name $_.name -RecordData $_.IP -Confirm }
}
function Delete-SinglePTREntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to delete the record"
$zonename= Read-Host "Please enter the Reverse Zone Name"
$IP= Read-Host "Please enter the IP address of the PTR Record. Only the Host octet is required."
Remove-DnsServerResourceRecord -computername $dnsserver -ZoneName $zonename -RRType "PTR" -Name $IP -Confirm
}
function Delete-BulkPTREntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to delete the record"
$zonename= Read-Host "Please enter the Reverse Zone Name"
$inputfile = Read-Host "Please enter the location of the input file. Input file format is CSV.Include the Header: IP."
Import-Csv -Path $inputfile| foreach-object {Remove-DnsServerResourceRecord -computername $dnsserver -ZoneName $zonename -RRType "PTR" -Name $_.IP -Confirm}
}
function Delete-SingleCNAMEEntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to delete the record"
$zonename= Read-Host "Please enter the Zone Name where the Alias Record is located."
$name= Read-Host "Please enter the Alias Name (Without FQDN)"
Remove-DnsServerResourceRecord -computername $dnsserver -ZoneName $zonename -RRType "CNAME" -Name $name -Confirm
}
function Delete-BulkCNAMEEntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to delete the record"
$zonename= Read-Host "Please enter the Zone Name where the Alias Record is located."
$inputfile = Read-Host "Please enter the location of the input file. Input file format is CSV. Include the Header: aliasname."
Import-Csv -Path $inputfile | foreach-object {Remove-DnsServerResourceRecord -computername $dnsserver -ZoneName $zonename -RRType "CNAME" -Name $_.alias -Confirm}
}
function Add-PrimaryDNSZoneEntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to create the DNS zone"
$zonename= Read-Host "Please enter the Primary DNS Zone Name you want to create. (i.e. ldlnet.local)"
$replicationScope= Read-Host "Please enter the AD replication scope for the zone. (i.e. Forest, Domain, or Legacy)"
$dynamicupdate= Read-Host "Please specify how the Zone accepts dynamic updates. (i.e. None, Secure, NonSecureAndSecure)"
Add-DnsServerPrimaryZone -ComputerName $dnsserver -Name $zonename -ReplicationScope $replicationScope -DynamicUpdate $dynamicupdate -PassThru -Confirm:$true
}
function Add-PrimaryBulkDNSZoneEntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to create the DNS zones"
$replicationScope= Read-Host "Please enter the AD replication scope for the zone. (i.e. Forest, Domain, or Legacy)"
$dynamicupdate= Read-Host "Please specify how the Zone accepts dynamic updates. (i.e. None, Secure, NonSecureAndSecure)"
$inputfile = Read-Host "Please enter the full path of the input file. Input file format is CSV. Include the Header: zone."
Import-Csv -Path $inputfile | foreach-object {Add-DnsServerPrimaryZone -ComputerName $dnsserver -Name $_.zone -ReplicationScope $replicationScope -DynamicUpdate $dynamicupdate -PassThru -Confirm:$true}
}
function Add-SecondaryDNSZoneEntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to create the DNS zone"
$zonename= Read-Host "Please enter the Secondary DNS Zone Name you want to create. (i.e. ldlnet.local)"
$replicationScope= Read-Host "Please enter the AD replication scope for the zone. (i.e. Forest, Domain, or Legacy)"
$dynamicupdate= Read-Host "Please specify how the Zone accepts dynamic updates. (i.e. None, Secure, NonSecureAndSecure)"
Add-DnsServerSecondaryZone -ComputerName $dnsserver -Name $zonename -ReplicationScope $replicationScope -DynamicUpdate $dynamicupdate -PassThru -Confirm:$true
}
function Add-SecondaryBulkDNSZoneEntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to create the DNS zones"
$replicationScope= Read-Host "Please enter the AD replication scope for the zone. (i.e. Forest, Domain, or Legacy)"
$dynamicupdate= Read-Host "Please specify how the Zone accepts dynamic updates. (i.e. None, Secure, NonSecureAndSecure)"
$inputfile = Read-Host "Please enter the full path of the input file. Input file format is CSV. Include the Header: zone."
Import-Csv -Path $inputfile | foreach-object {Add-DnsServerSecondaryZone -ComputerName $dnsserver -Name $_.zone -ReplicationScope $replicationScope -DynamicUpdate $dynamicupdate -PassThru -Confirm:$true}
}
function Add-StubDNSZoneEntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to create the DNS zone"
$zonename= Read-Host "Please enter the Stub DNS Zone Name you want to create. (i.e. ldlnet.local)"
$replicationScope= Read-Host "Please enter the AD replication scope for the zone. (i.e. Forest, Domain, or Legacy)"
$ms= Read-Host "Please specify the ip of the server that holds the authoritative records for the zone. (i.e. 192.168.3.107)"
Add-DnsServerStubZone -ComputerName $dnsserver -Name $zonename -ReplicationScope $replicationScope -MasterServers $ms -PassThru -Confirm:$true
}
function Add-StubBulkDNSZoneEntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to create the DNS zones"
$replicationScope= Read-Host "Please enter the AD replication scope for the zone. (i.e. Forest, Domain, or Legacy)"
$ms= Read-Host "Please specify the ip of the server that holds the authoritative records for the zone. (i.e. 192.168.3.107)"
$inputfile = Read-Host "Please enter the full path of the input file. Input file format is CSV. Include the Header: zone."
Import-Csv -Path $inputfile | foreach-object {Add-DnsServerStubZone -ComputerName $dnsserver -Name $_.zone -ReplicationScope $replicationScope -MasterServers $ms -PassThru -Confirm:$true}
}
function Remove-DNSZoneEntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to remove the DNS zone"
$zonename= Read-Host "Please enter the Stub DNS Zone Name you want to remove. (i.e. ldlnet.local)"
Remove-DnsServerZone -ComputerName $dnsserver -Name $zonename -PassThru -Confirm:$true -Verbose
}
function Remove-BulkDNSZoneEntry
{
$dnsserver= Read-Host "Please enter the DNS Server Name from where you want to remove the DNS zones"
$inputfile = Read-Host "Please enter the full path of the input file. Input file format is CSV. Include the Header: zone."
Import-Csv -Path $inputfile | foreach-object {Remove-DnsServerZone -ComputerName $dnsserver -Name $_.zone -PassThru -Confirm:$true -Verbose}
}
do
{
Show-Menu
$input = Read-Host "Please make a selection"
switch ($input)
{
'1' {
cls
'You have selected option #1'
'Press 1 for Single DNS Lookup'
'Press 2 for Bulk DNS Lookup'
'Press Q to Return to the Main Menu'
$input1=Read-Host "Please make a selection"
switch ($input1)
{
1 { Lookup-SingleDNS }
2 { Lookup-BulkDNS }
Q { Show-Menu }
}
}
'2' {
cls
'You have selected option #2'
'Press 1 for Single Host Entry'
'Press 2 for Bulk Host Entries'
'Press Q to Return to the Main Menu'
$input1=Read-Host "Please make a selection"
switch ($input1)
{
1 { Create-SingleHostEntry }
2 { Create-BulkHostEntry }
Q { Show-Menu }
}
}
'3' {
cls
'You have selected option #3'
'Press 1 for Single PTR Record'
'Press 2 for Bulk PTR Records'
'Press Q to Return to the Main Menu'
$input1=Read-Host "Please make a selection"
switch ($input1)
{
1 { Create-SinglePTREntry }
2 { Create-BulkPTREntry }
Q { Show-Menu}
}
}
'4' {
cls
'You have selected option #4'
'Press 1 for Single CNAME Record'
'Press 2 for Bulk CNAME Records'
'Press Q to Return to the Main Menu'
$input1=Read-Host "Please make a selection"
switch ($input1)
{
1 { Create-SingleCNAMEEntry }
2 { Create-BulkCNAMEEntry }
Q { Show-Menu }
}
}
'5' {
cls
'You have selected option #5'
'Press 1 to Delete Single Host Record'
'Press 2 to Delete multiple Host Records '
'Press Q to Return to the Main Menu'
$input1=Read-Host "Please make a selection"
switch ($input1)
{
1 { Delete-SingleHostEntry }
2 { Delete-BulkHostEntry }
Q { Show-Menu }
}
}
'6' {
cls
'You have selected option #6'
'Press 1 to Delete Single PTR Record'
'Press 2 to Delete multiple PTR Records '
'Press Q to Return to the Main Menu'
$input1=Read-Host "Please make a selection"
switch ($input1)
{
1 { Delete-SinglePTREntry }
2 { Delete-BulkPTREntry }
Q { Show-Menu}
}
}
'7' {
cls
'You have selected option #7'
'Press 1 to Delete Single CNAME Record'
'Press 2 to Delete multiple CNAME Records '
'Press Q to Return to the Main Menu'
$input1=Read-Host "Please make a selection"
switch ($input1)
{
1 { Delete-SingleCNAMEEntry }
2 { Delete-BulkCNAMEEntry }
Q { Show-Menu }
}
}
'8' {
cls
'You have selected option #8'
'Press 1 to Create a Single Primary DNS Zone'
'Press 2 to Create multiple Primary DNS Zones'
'Press Q to Return to the Main Menu'
$input1=Read-Host "Please make a selection"
switch ($input1)
{
1 { Add-PrimaryDNSZoneEntry }
2 { Add-PrimaryBulkDNSZoneEntry }
Q { Show-Menu }
}
}
'9' {
cls
'You have selected option #9'
'Press 1 to Create a Single Secondary DNS Zone'
'Press 2 to Create multiple Secondary DNS Zones'
'Press Q to Return to the Main Menu'
$input1=Read-Host "Please make a selection"
switch ($input1)
{
1 { Add-SecondaryDNSZoneEntry }
2 { Add-SecondaryBulkDNSZoneEntry }
Q { Show-Menu }
}
}
'10' {
cls
'You have selected option #10'
'Press 1 to Create a Single Stub DNS Zone'
'Press 2 to Create multiple Stub DNS Zones'
'Press Q to Return to the Main Menu'
$input1=Read-Host "Please make a selection"
switch ($input1)
{
1 { Add-StubDNSZoneEntry }
2 { Add-StubBulkDNSZoneEntry }
Q { Show-Menu }
}
}
'11' {
cls
'You have selected option #11'
'Press 1 to Remove a Single DNS Zone'
'Press 2 to Remove multiple DNS Zones'
'Press Q to Return to the Main Menu'
$input1=Read-Host "Please make a selection"
switch ($input1)
{
1 { Remove-DNSZoneEntry }
2 { Remove-BulkDNSZoneEntry }
Q { Show-Menu }
}
}
'q' {
return
}
}
pause
}
until ($input -eq 'q')
to get to your settings. What was happening within the Settings is that I would choose a setting that calls on the control.exe file to open a Control Panel app. I would get the following error when attempting to do that function:
