Форум: "Базы";
Поиск по всему сайту: 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
14-75663          Founder               2001-11-29 11:34  2002.01.24  
Алгоритм.


14-75670          Dimka Maslov          2001-11-30 15:54  2002.01.24  
No comments


1-75540           ctapik-net            2002-01-05 09:28  2002.01.24  
Создание нестандартного компонента


1-75616           Lotus                 2002-01-05 17:33  2002.01.24  
Нужно интерпретировать математические выражения


1-75552           Satrap                2001-12-28 13:19  2002.01.24  
Описание классов