Тема: из *.тхт в бд Paradox
Показать сообщение отдельно
  #2  
Старый 06.11.2009, 17:42
Аватар для Yurk@
Yurk@ Yurk@ вне форума
Специалист
  
Регистрация: 07.09.2007
Адрес: Украина, г. Днепропетровск
Сообщения: 892
Версия Delphi: 7 + ОгнеПтица
Репутация: выкл
По умолчанию
Код:
Query.Close;
Query.SQL.Text:='INSERT INTO mTable (blField) VALUES (:bData)';
Query.ParamByName('bData').LoadFromFile('1.txt',ftBlob);
Query.ExecSQL;
__________________
Поживу - увижу, Доживу - узнаю, Выживу - учту.
[P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
Ответить с цитированием