Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 21.05.2010, 15:00   #1
_koshka
Новичок
Джуниор
 
Регистрация: 21.05.2010
Сообщений: 3
По умолчанию Подключение к базе

Уважаемые, подскажите пожалуйста!
У меня база на SQL, подключаю через компонент ADOConnection. Если в свойствах этого компонента указывать путь к базе, то она подключается и работает нормально (возможно добавление, удаление и редактирвоание данных). Но если прописывать путь программно, используя данные ini-файла, при добавлении записи в таблицу выдается сообщение "Недопустимая спецификация авторизации".
в файле Connection.ini хранится такая информация:
[Data]
ServerName = Название_сервера
Database = Название_базы
Приведу код:
procedure TForm2.Button1Click(Sender: TObject);
var
Ini: Tinifile;
Base, Server, TextString, login, password: string;
filename : string;
begin
filename := extractfilepath(paramstr(0))+'Conne ction.ini';
if not FileExists(filename) then raise Exception.Create('ini file not found!');
Ini:=TiniFile.Create(filename);
Base:=Ini.ReadString('Data','Databa se','');
Server:=Ini.ReadString('Data','Serv erName','');
Ini.Free;
TextString:= 'Provider=SQLOLEDB.1;Password="'+Ed it1.Text
+'";Persist Security Info=True;User ID="'+Edit2.Text+'";Initial Catalog='+Base+';Data Source='+Server;
ADOConnection2.ConnectionString:= TextString;
parol:=true;
close;
end;
строки Base:=Ini.ReadString('Data','Databa se','');
Server:=Ini.ReadString('Data','Serv erName','');
читаются... если смотреть пошагово, то он считывает название сервера и базы. А вотв строке TextString:= 'Provider=SQLOLEDB.1;Password="'+Ed it1.Text
+'";Persist Security Info=True;User ID="'+Edit2.Text+'";Initial Edit1.Text и Edit2.Text не заполняются.. ума не приложу, в чем ошибка....
Подскажите, пожалуйста?
_koshka вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сетевое подключение FlameRobin к базе FireBird 2.1 Timpi БД в Delphi 3 31.03.2011 13:53
Автоматическое подключение к базе Shevali БД в Delphi 2 05.05.2010 15:36
Подключение к локальной базе Anatoly_Ali Общие вопросы C/C++ 0 12.12.2009 17:50
Подключение к базе данных Accessa (C#) Raptor Помощь студентам 1 16.11.2009 02:46
подключение к базе ORACLE cowboy БД в Delphi 1 17.09.2009 16:48