![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как получить список доступных MS SQL серверов [MSSQL]
Belov © (2002-05-06 17:14:00)собственно сабж
Belov (2002-05-07 10:12:00) [1]>Fay
Извини, виноваты мои кривые руки и незрячие глаза
>Reindeer Moss Eater
неэффективно
Reindeer Moss Eater (2002-05-07 10:06:00) [2]Проще посмотреть в реестре зарегистрированные в MSSQL клиенте сервера
Belov (2002-05-07 09:39:00) [3]>Fay
выдает ошибку Member not found;
Fay (2002-05-07 06:45:00) [4]Типа этого
var
dmo, sn : Variant;
i : Integer;
begin
Memo1.lines.Clear;
dmo := CreateOleObject("SQLDMO.Application");
sn := dmo.ListAvailableSQLServers;
for i := 1 to sn.Count do Memo1.Lines.Add(sn.Item(i));