Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Сменить путь в ADOConnection

Фуфик © (2009-10-20 14:27:00)
Снова здравствуйте
Пишет ламер. Отважусь задать тут ещё один вопрос. Подскажите как программно и правильно сменить путь к базе в ADOConnection. придумал корявый вариант но хотелась бы узнать как это делается мастерски.

sniknik (2009-10-20 17:02:00) [1]
> Вылетела ошибка:
ну так исправь ошибку!

а вообще, что у тебя там за солянка из кода... ошибка от ODBC, коннектишься к jet, строку показываешь к мсшейп...
что из коннектов верно?

кстати обращаю внимание на вопрос
> Сменитьпуть в ADOConnection
т.к. с твоей путаницей, ты можешь делать совсем не это.

Фуфик (2009-10-20 15:47:00) [2]

> sniknik © (20.10.09 15:32) [6]
> ADOConnection1.Properties['Data Source'].Value:= ExtractFilePath(ParamStr(0))+'base.
> mdb;

Вылетела ошибка:
[Microsoft][ Диспетчер драйвера ODBC] Слишком длинное имя источника данных.

sniknik (2009-10-20 15:32:00) [3]
ADOConnection1.Properties['Data Source'].Value:= ExtractFilePath(ParamStr(0))+'base.mdb;

clickmaker (2009-10-20 15:23:00) [4]
ADOConnection1.ConnectionString:=Format('Provider=MSDataShape.1;Persist Security Info=False;Data Source=%s;Data Provider=Microsoft.Jet.OLEDB.4.0', [A]);

Фуфик (2009-10-20 14:40:00) [5]

> DBConnection.ConnectionString:='Provider=Microsoft.Jet.OLEDB.
> 4.0; Data Source='+ExtractFilePath(ParamStr(0))+'base.mdb;
> Persist Security Info=False';Вот так вот... Возможно, Мастера
> раскритикуют.

Говоря о корявом варианте я так и сделал
ADOConnection1.ConnectionString:='Provider=MSDataShape.1;Persist Security Info=False;Data Source='+A+';Data Provider=Microsoft.Jet.OLEDB.4.0';
A путь к базе

Ну раз других вариантов нет то так и оставлю

saNat (2009-10-20 14:36:00) [6]
DBConnection.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0; Data Source='+ExtractFilePath(ParamStr(0))+'base.mdb;Persist Security Info=False';
Вот так вот... Возможно, Мастера раскритикуют.

Terminal Name (2009-10-20 14:35:00) [7]
ADOConnection1.ConnectionString:= ' ... ';

saNat (2009-10-20 14:34:00) [8]
Я задавал ConnectionString.

Наверх

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