Skip to content

Latest commit

 

History

History
80 lines (62 loc) · 1.81 KB

File metadata and controls

80 lines (62 loc) · 1.81 KB
pid 1068
author Andy Stumph
title New-ADSubnet
date 2009-04-30 01:39:17 -0700
format posh
parent 0

New-ADSubnet

This script will create a new subnet in AD Sites and Services given the subnet, site name and location.

param ($Subnet, $SiteName, $Location, [switch]$Help)

function Help
{
""
Write-Host "Usage: .\New-ADSubnet.ps1 -Help" -foregroundcolor Yellow
Write-Host "Usage: .\New-ADSubnet.ps1 <Subnet> <SiteName> <Location>" -foregroundcolor Yellow
Write-Host "Ex: .\New-ADSubnet.ps1 10.150.0.0/16 Default-First-Site-Name USA/KY/Louisville" -foregroundcolor Yellow
""
Break
}

if ($Help) {Help}
if ($Subnet -eq $Null) {Write-Host "Please provide a Subnet!" -fore Red; Help}
if ($Location -eq $Null) {Write-Host "Please provide a Location!" -fore Red; Help}
if ($SiteName -eq $Null) {Write-Host "Please provide a Site Name!" -fore Red; Help}

if ($SiteName -like "CN=*")
{
	$SiteNameRDN = $SiteName
}
else
{
	$SiteNameRDN = "CN=$($SiteName)"
}

$Description = $Subnet

$RootDSE = [ADSI]"LDAP://RootDSE"
$ConfigurationNC = $RootDSE.configurationNamingContext

$SubnetRDN = "CN=$($Subnet)"
$Description = $Subnet

$SiteDN = "$($SiteNameRDN),CN=Sites,$($ConfigurationNC)"
$SubnetsContainer = [ADSI]"LDAP://CN=Subnets,CN=Sites,$($ConfigurationNC)"

$NewSubnet = $SubnetsContainer.Create("subnet",$SubnetRDN)

$NewSubnet.Put("siteObject", $SiteDN)
$NewSubnet.Put("description", $Description)
$NewSubnet.Put("location", $Location)

trap {Continue}
$NewSubnet.SetInfo()

if (!$?)
{
""
Write-Host "An Error has Occured! Please Validate Your Input." -foregroundcolor Red
Write-Host "Error Message:" -foregroundcolor Red
$Error[0].Exception
""
}
else
{
""
Write-Host "Subnet Created Successfully." -foregroundcolor Green
""
}