Удаленное подключение к SQL Server

[Александр Андреев]

Мой вопрос про Transaction Log почему-то все дружно игнорируют , поэтому не дожидаясь ответа, спешу задать еще один вопрос:

Как узнать имена машин, на которых крутятся SQL серваки, в рамках локальной сети? То есть я хочу сдалать нечто похожее на окошко подключения к серверу, которое есть в Query Analyzer. Осталось дело за малым: заполнить комбобоксик SQL Server. В принципе конечно можно руками имя машины вводить, но всегда лучше, если есть список.

[alibek]

Есть смутная мысль пытаться просканить машины в сетке и попытаться подконнектится по определенному порту (для Oracle SQL это обычно порт 1521, для MSSQL не знаю). Если удастся -- добавить имя машины в список.

[Александр Андреев]

Как-то сложновато. Я надеялся, что в самом SQL Server'е зашита такая возможность. Ведь он сам-то как-то это делает. Поэтому, как мне кажется, надо просто знать что вызвать...

[Basical]

Можешь использовать SQLDMO что-то типа такого

Dim i As Integer
Dim oSQLServerDMOApp As SQLDMO.Application

Set oSQLServerDMOApp = New SQLDMO.Application

Dim namX As NameList
Set namX = oSQLServerDMOApp.ListAvailableSQLServers
For i = 1 To namX.Count
txtServer.AddItem namX.Item(i)
Next
txtServer.ListIndex = 0