Как узнать установлен ли Jet и его версию, если установлен?

← →
Denis © (2005-08-29 10:08) [0]

Приветствую всех!
Как узнать установлен ли Jet на машине? Его версию, если таки установлен?
ОС: 98 и ХР.

← →
Slym © (2005-08-29 10:19) [1]

Лучший способ узнать существование чегото, обратится к нему.

← →
sniknik © (2005-08-29 11:37) [2]

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;

правда немного не то. выдает версию MDAC(ADO) и проверяет установлен ли Jet вообще, версия сейчас неактуальна. всегда 4.0.

А ларчик-то просто открывается...
Спасибо!

Как узнать установлен ли Jet и его версию, если установлен? Найти похожие ветки