Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как инсталяшку сдлать с бaзой Access? [D5]


vopros ©   (2002-04-26 12:13:00) 

Делаю в InstallShields. Тащу Bde,ODBC, прописываю Alias с путем
но ничего нt работает. Alias Прописывается в BDE, а в ODBC его нет..Когда ручками пропишеш все работает. Вообщем... как мне это сделать?


Nikolay M.   (2002-04-26 14:29:00) [1]

Я при первом запуске программы создавал его программно. Примерно так (в системном каталоге должна быть библиотека ODBCJT32.DLL):

reg.RootKey := HKEY_LOCAL_MACHINE;
reg.OpenKey ("SOFTWARE\ODBC\ODBCINST.INI\Microsoft Access Driver (*.mdb)", True);
reg.WriteString ("APILevel", "1");
reg.WriteString ("ConnectFunctions", "YYN");
reg.WriteString ("Driver", GetSystemDir + "\ODBCJT32.DLL");
reg.WriteString ("DriverODBCVer", "02.50");
reg.WriteString ("DSN", "База данных MS Access 97");
reg.WriteString ("FileExtns", "*.mdb");
reg.WriteString ("FileUsage", "2");
reg.WriteString ("Setup", accessdll_path);
reg.WriteString ("SQLLevel", "0");
reg.WriteString ("UID", "Admin");
reg.WriteInteger ("UsageCount", 3);
reg.CloseKey;
reg.OpenKey ("Software\ODBC\ODBCINST.INI\ODBC Drivers", True);
reg.WriteString ("Microsoft Access Driver (*.mdb)", "Installed");
reg.CloseKey;


Наверх

Титульная страница Поиск, карта сайта Написать письмо