IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

 
 Ответить  Открыть новую тему 
> ADOConnection, Как привязать к форме сохраниния файла
cooler
сообщение 15.05.2011 23:03
Сообщение #1


Бывалый
***

Группа: Пользователи
Сообщений: 178
Пол: Мужской

Репутация: -  0  +


Работа с БД access
Результаты расчётов записываются в неё
SaveDialog Пользователь в этом диалоге указывает имя базы и после этого создаём и подключаем базу
Подскажите, пожалуйста как привязать имя, которое указал пользователь к ADOConnection?
Сейчас в ConnectionString
Provider=Microsoft.Jet.OLEDB.4.0;Data source=CCategory.mdb;Moad=ReadWrite; Persist Security Info=False
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
IUnknown
сообщение 16.05.2011 1:15
Сообщение #2


a.k.a. volvo877
*****

Группа: Пользователи
Сообщений: 1 013
Пол: Мужской

Репутация: -  627  +


const
ConnStr =
'Provider=Microsoft.Jet.OLEDB.4.0;Data source=%s;' +
'Mode=ReadWrite; Persist Security Info=False';

procedure TForm1.Button1Click(Sender: TObject); // ну, или где там тебе надо
begin
if SaveDialog2.Execute then // пользователь указал имя ...
begin
ADOConnection2.Close;
ADOConnection2.ConnectionString := Format(ConnStr, [SaveDialog2.FileName]); // привязали
ADOConnection2.LoginPrompt:=false;
ADOConnection2.Open;
end;
end;
Заметил в константе %s, да? Вот туда и забросится введенное пользователем имя...
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 29.04.2024 10:28
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"