public class CSApplication : CSBase

Public Class CSApplication
	Inherits CSBase

using System;
using System.Runtime.Remoting;
using ContentStudio;
namespace RemConfig
{
    class Program
    {
        static void Main(string[] args)
        {
            try
            {
                //Configure the Remoting client channels by using the configuration file
                RemotingConfiguration.Configure("RemConfig.exe.config", true);
                //Get a list of all registered sites in content studio
                CSApplication csApp = new CSApplication();
                using (System.Xml.XmlReader xrd = System.Xml.XmlReader.Create(csApp.SiteListStream(true)))
                {
                    Console.WriteLine("Id\tName\t");
                    while (xrd.Read())
                    {
                        if (xrd.NodeType != System.Xml.XmlNodeType.Element)
                            continue;
                        if (xrd.Name == "cs_site")
                        {
                            Console.Write(xrd.GetAttribute("connectionid"));
                            Console.Write("\t");
                            Console.Write(xrd.GetAttribute("sitename"));
                            Console.WriteLine();
                        }
                    }
                    xrd.Close();
                }
            }
            catch (RemotingException rex)
            {
                Console.WriteLine("ERROR: There is a problem with your remoting configuration!");
                Console.WriteLine(rex.Message);
            }
            catch (Exception ex)
            {
                Console.WriteLine("ERROR: There was problem with the call!");
                Console.WriteLine(ex.Message);
            }
            Console.Read();
        }
    }
}

Imports System.Runtime.Remoting
Imports ContentStudio

Class Program
   Shared Sub Main(args() As String)
       Try
           'Configure the Remoting client channels by using the configuration file
           RemotingConfiguration.Configure("RemConfig.exe.config", true)
           'Get a list of all registered sites in Content Studio
           CSApplication csApp = New CSApplication()
           Using xrd As System.Xml.XmlReader = System.Xml.XmlReader.Create(csApp.SiteListStream(True))
               Console.WriteLine("Id" & vbTab & "Name")
               While xrd.Read()
                   If (xrd.NodeType = System.Xml.XmlNodeType.Element)
                       If xrd.Name = "cs_site"
                           Console.Write(xrd.GetAttribute("connectionid"))
                           Console.Write(vbTab)
                           Console.Write(xrd.GetAttribute("sitename"))
                           Console.WriteLine()
                       End If
                   End If
               End While
               xrd.Close()
           End Using
       Catch rex As RemotingException
           Console.WriteLine("ERROR: There is a problem with your remoting configuration!")
           Console.WriteLine(rex.Message)
       Catch ex As Exception
           Console.WriteLine("ERROR: There was problem with the call!")
           Console.WriteLine(ex.Message)
       End Try
       Console.Read()
   End Sub
End Class