Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.01.24;
Скачать: CL | DM;

Вниз

Как прописать источник данных 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;



Страницы: 1 вся ветка

Текущий архив: 2002.01.24;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
1-75559
Vygantas
2001-12-29 00:22
2002.01.24
Как впихать форму в DLL и как потом ее от туда взять ??


7-75706
Ghost666
2001-10-10 23:03
2002.01.24
Как поменять резкость(чувствительность) крысы в Win 9x


1-75601
Delphimun
2002-01-07 15:45
2002.01.24
Как сделать определённое окно главным?


14-75673
Labert
2001-11-28 10:30
2002.01.24
Небольшое лингвистическое исследование


7-75700
3d[Power]
2001-10-11 20:39
2002.01.24
Трэкбар