Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.27;
Скачать: CL | DM;

Вниз

Как получить список доступных MS SQL серверов?   Найти похожие ветки 

 
bytebutcher ©   (2003-02-10 16:59) [0]

Как получить список доступных MS SQL серверов?


 
sniknik ©   (2003-02-10 17:03) [1]

в рамках одной сети и т.д. через ДМО в большинстве случаев хватает.

function TDMod.GetSQLServers(ServersItems: TStrings): boolean;
var NameList, Application: OleVariant;
i:Integer;
begin
result:= false;
try
try
Application:= CreateOleObject("SQLDMO.Application");
NameList:= Application.ListAvailableSQLServers;
For i:= 1 to NameList.Count do
ServersItems.Add(NameList.Item(i));
result:= true;
except
on E: Exception do DoIfError(E.Message);
end;
finally
NameList:=Unassigned;
Application:=Unassigned;
end;
end;



Страницы: 1 вся ветка

Текущий архив: 2003.02.27;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.011 c
1-87382
Process Killer
2003-02-17 18:31
2003.02.27
CGI


1-87543
Alexander_K
2003-02-17 10:30
2003.02.27
Работа с Excel через OLE


1-87523
Alexsey Orlov
2003-02-17 06:07
2003.02.27
Помогите как сделать подсветку синтаксиса ........


4-87760
pkm1
2003-01-12 18:16
2003.02.27
Папка


1-87487
Process Killer
2003-02-14 16:57
2003.02.27
Delphi and HTML