$provider  = new-object Microsoft.VisualBasic.VBCodeProvider
$params    = new-object System.CodeDom.Compiler.CompilerParameters
$params.GenerateInMemory = $True
$refs = "System.dll", "Microsoft.VisualBasic.dll","c:\Program Files\Microsoft SQL Server\90\SDK\Assemblies\Microsoft.SqlServer.Smo.dll","c:\Program Files\Microsoft SQL Server\90\SDK\Assemblies\Microsoft.SqlServer.ConnectionInfo.dll"
$params.ReferencedAssemblies.AddRange($refs)
$txtCode = '
Class SMO
    function get_servers()
		Dim ret() as String
		Dim smoapp as new Microsoft.SqlServer.Management.Smo.SmoApplication
		Dim i as integer
		
		ReDim ret(smoapp.SqlServerRegistrations.RegisteredServers.Count)
		i=0
		for each registeredServer as Microsoft.SqlServer.Management.Smo.RegisteredServers.RegisteredServer  in smoapp.SqlServerRegistrations.RegisteredServers
				ret(i)=registeredServer.Name
				i=i+1
		Next registeredServer
		get_servers=ret
    End function
End Class
'
$results = $provider.CompileAssemblyFromSource($params, $txtCode)
$mAssembly = $results.CompiledAssembly
$i = $mAssembly.CreateInstance("SMO")
$r = $i.get_servers()
$r