Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.24;
Скачать: [xml.tar.bz2];




Вниз

Как прописать источник данных ODBC программно? 


Дмитрий Демиденков   (2001-12-18 10:39) [0]

Привет народ.
Как сабж сделать. У меня есть база данных Access 97. я прописываю ее так: /Настройки/Панель управления/Источники данных ODBC/ в разделе "Пользовательский DSN" выбираю добавить ввожу Alias выбираю базу данных и все... Этот Alias я могу использовать в TDatabase без проблем. B BDE Administrator я ничего не меняю он и так видит этот источник данных. Теперь мне нужно прописать все это автоматически программно. Как мне это сделать. Я нашел что этот Alias прописывается в реестре в ключах
HKEY_CURRENT_USER и HKEY_USERS, однако когда я программно прописываю это - не работает. Вернее, в ODBC и BDE Administrator мой Alias виден, но он не срабатывет. Когда я захожу в ODBC
и выбираю файл базы данных(который уже прописан точно так же) все работает. А програмно не получается. В чем дело, может еще где то надо прописать кроме реестра?
Вот!



Dick Gonsales   (2001-12-20 09:16) [1]

Вешаешь TDatabase
В нем DatabaseName пишешь alias по которому все твои TTable, TQuery будут обращаться к базе
В DriveName выбираешь MSAccess

Вешаешь OpenDialog откуда берешь имя файла базы.
Вызываешь примерно следующую функцию, где db_report TDatabase

function DBOpen(DBName:String):boolean;
begin
try
db_report.Params.Add("DATABASE NAME="+DBName);
db_report.Params.Add("USER NAME=");
db_report.Params.Add("PASSWORD=");
db_report.Connected:=True;
Result:=True;
except
ShowMessage("Не могу открыть базу "+DBName);
Result:=False;
end;
end;




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.24;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.021 c
3-75477           Mike_                 2001-12-19 16:55  2002.01.24  
Ячейки в DBGrid


14-75657          Serega__2             2001-11-29 10:40  2002.01.24  
Господа, а что с rxlib`ом случилось?


3-75468           dim-                  2001-12-18 09:15  2002.01.24  
Список индексов


14-75681          VID                   2001-11-25 22:41  2002.01.24  
У кого есть WIN XP? Опишите pls...


1-75609           Vovchik               2002-01-07 20:27  2002.01.24  
Цвет итемов в TListView