Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Знатоки, как определить, какая версия ADO стоит на машине юзера?

Layner © (2004-01-14 09:53:00)

Написал программу для SQLServer, да вот ещё проверка нужна для клиента, есть ли ADO, 2.6 или 2.7 или ниже. Если ключи реестра проверять, то какие? Если не ключами, то как. Заранее спасибо.

Layner (2004-01-14 16:34:00) [1]

Спасибо за 2 ответа, последний код очень хорошо подошел!!!

KSergey (2004-01-14 11:02:00) [2]

Уточнение небольшое по терминологии: версия не ADO, а MDAC. Ну либо ADO-драйвера для конкретного источника.
Ниже следут текст, который стырил не помню где.
-----------------------------------------
Как узнать версию MDAC, установленную на машине?

1. Для получения информации об установленной версии MDAC можно воспользоваться программой "Component Checker", которую можно скачать с сайта Microsoft
HOW TO: Check for MDAC Version
http://support.microsoft.com/default.aspx?scid=kb;en-us;301202
Однако, народ (qu-qu) наблюдал при многократных переустановках Soft"a, использующего средства доступа к данным, как Component Checker говорил, что версия ADO младше, чем стояла и использовалась на самом деле.
У Microsoft тоже есть информация о проблемах ComCheck.

2. Можно посмотреть в реестре параметры FullInstallVer and Version в ветке
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\DataAccess

3. jimmers: mdacver.vbs
Option Explicit
Dim cn
Set cn = CreateObject("ADODB.Connection")
WScript.Echo("MDAC version: " + cn.Version)
Set cn = Nothing

или Delphi

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

Kuusiniemi (2004-01-14 10:20:00) [3]

ADOConnection1.ConnectionObject.Version

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »