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

Вниз

Доступные 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;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.01 c