Для управления сервером из VB используется технология SQL DMO. Для того, чтобы Вы могли программировать необходимо иметь набор DLL и библиотек типов. Установите SQL Server Client в полной конфигурации и все необходимое у Вас будет, для подробностей читайте "Шаг 7 - Установка клиента Microsoft SQL Server". Итак, подключаем библиотеку типов.

С этого момента у нас есть возможность управлять сервером. Мы можем получить теже самые возможности, что и Enterprise Manager, только мы можем сами создавать интерфейс и дополнительные возможности. Давайте посмотрим код соединения.

Private Sub Command1_Click()

Dim oSQLServer As New SQLOLE.SQLServer

Dim strHost As String

oSQLServer.Connect "Servers", "sa", "123"

strHost = oSQLServer.HostName

MsgBox strHost

oSQLServer.DisConnect

End Sub

Общие сведения о SQL DMO можно прочитать в "Шаг 113 - Что такое SQL DMO".