Скачать: CL | DM;

Как определить версию ADO на компьютере клиента?   Найти похожие ветки 

← →
Brestmarket.com   (2002-09-18 16:37) [0]

Прошу готовые участки кода при реализации с реестром, ADOConnection или другие рабочие варианты. Отблагодарю как смогу - ответьте пожалуйста на мыло!

---

← →
Андрей Прокофьев   (2002-09-18 16:41) [1]

ADOConnection1.Version

Жду благодарностей ;)

---

← →
Brestmarket.com   (2002-09-18 16:46) [2]

МОгу кинуть какой компонент - если надо - большая коллекция. Есть мыло 10 млн. ящиков всего мира и т.д. Но вообще надо полная рабочая реализация ! У меня такой код почему -то вызывает исключительную ситуацию!

---

← →
Андрей Прокофьев   (2002-09-18 16:48) [3]

Какой ТАКОЙ код?
Может, у тебя ADOConnection = nil или плохая ссылка

---

← →
sniknik ©   (2002-09-18 17:27) [4]

function ADO_and_Jet40:String;
var con:TADOConnection;
begin
try
con:=TADOConnection.Create(nil);
con.LoginPrompt:=False;
con.ConnectionString:="Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=Text;Data Source=.\";
con.Open;
Result:=con.Version;
con.Free;
except
on E:Exception do Result:=E.Message;
end;
end;

---

← →
Андрей Прокофьев   (2002-09-18 17:46) [5]

Зачем Open-то делать

function ADO_and_All : String;
var
con : TADOConnection;
begin
try
AC := TADOConnection.Create(nil);
Result := AC.Version;
AC.Free;
except
on E:Exception do Result:= "";
end;
end;

---

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

Скачать: CL | DM;



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