Import/Export SQL Server 2000 Enterprise Manager Registered Servers

#Exports and Imports SQL Server 2000 Entperise Manager Server Registrations
#Author: Chad Miller cmille19@tampabay.rr.com
#Created: February 15 2008

$global:appl = New-Object -comobject "SQLDMO.Application"

#######################
function Export-RegisteredServers
{
param($file)

#Dumps current SQL Server Enterprise Manager Groups and servers to specific
$appl.ServerGroups | %{$group = $_.Name; $_.RegisteredServers | % {$group + " " + $_.Name}} >> $file

}


#######################
function Add-ServerGroup
{
param($groupname)


$ServerGroup = New-Object -comobject "SQLDMO.ServerGroup"
$ServerGroup.Name = $groupname
trap {$script:Exception = $_; continue} $appl.ServerGroups.Add($ServerGroup)
$ServerGroup = $appl.ServerGroups.Item($groupname)

return $ServerGroup

}

#######################
function Add-RegisteredServer
{
param($ServerGroup, $servername)

$RegisteredServer = New-Object -comobject "SQLDMO.RegisteredServer"
$RegisteredServer.Name = $servername
$RegisteredServer.UseTrustedConnection = 1
$RegisteredServer.PersistFlags = 1
trap {$script:Exception = $_; continue} $ServerGroup.RegisteredServers.Add($RegisteredServer)

}


#######################
function Import-RegisteredServers
{
param($file)


#Registers each group/server in enterprise manager based on file generated from write-registeredServers function

Get-Content $file |foreach {$groupname, $servername = $_.split();
$ServerGroup = Add-ServerGroup $groupname;
Add-RegisteredServer $ServerGroup $servername}

}