Форум: "Базы";
Текущий архив: 2004.03.05;
Скачать: [xml.tar.bz2];
ВнизДоступные MS SQL сервера в сети Найти похожие ветки
← →
Санек (2004-02-09 13:10) [0]Как определить доступные MS SQL сервера в сети
← →
ZrenBy (2004-02-09 13:23) [1]var
dmo, sn: Variant;
i: Integer;
begin
ComboBox1.Items.Clear;
dmo:=CreateOleObject("SQLDMO.Application");
sn:=dmo.ListAvailableSQLServers;
if sn.Count <> 0 then begin
for i:=1 to sn.Count do ComboBox1.Items.Add(sn.Item(i));
end;
sn := UnAssigned;
dmo := UnAssigned;
end;
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2004.03.05;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c