Новости
Видео
Microsoft
Windows 10
Железо
Программы
Форум

Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » Delphi - [решено] Вставить и достать файл ворда в БД Access

Ответить
Настройки темы
Delphi - [решено] Вставить и достать файл ворда в БД Access

Новый участник


Сообщения: 16
Благодарности: 1

Профиль | Отправить PM | Цитировать

Имеется подключение к mdb файлу, в нем таблица с полем OLE. Нужно добавить в эту таблицу запись (желательно запросом), и в поле OLE поместить документ Word.
Пробовал что то типа:
Код: Выделить весь код
if OpenDialog1.Execute=True then
with ADOQuery1 do begin
close;
sql.Clear;
sql.Add('insert into lections values (:st)');
Parameters.ParamByName('st').LoadFromFile(dlgOpen1.FileName,ftBlob);
ExecSQL;
end;
После этого в поле БД двоичные данные, и как открыть их я не знаю.

Отправлено: 12:57, 31-03-2012

 

Новый участник


Сообщения: 16
Благодарности: 1

Профиль | Отправить PM | Цитировать

Нашел решение. Оказывается я правильно записываю, а читать нужно так:
Код: Выделить весь код
procedure TForm1.BitBtn7Click(Sender: TObject);
var
 Ptkwrd: TMemoryStream;
 Blob: TBlobStream;
begin
 Ptkwrd:=TMemoryStream.Create;
 TBlobField(Query1.FieldByName('TEKST')).SaveToStream(Ptkwrd);
 Ptkwrd.Position:=0;
 Ptkwrd.SaveToFile('temp.doc');
 ShellExecute(0,'open','temp.doc',nil,nil,SW_SHOWNORMAL);
 Ptkwrd.Free;
end;

Отправлено: 13:54, 31-03-2012 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Ветеран


Сообщения: 27449
Благодарности: 8087

Профиль | Отправить PM | Цитировать

game_Racer, всё правильно. Только это никак не сделает содержимое указанного поля «OLE'мным».

Отправлено: 14:47, 31-03-2012 | #3


Новый участник


Сообщения: 16
Благодарности: 1

Профиль | Отправить PM | Цитировать

Iska, Так мне по сути это и не нужно. К бд кроме как из моей проги доступа не будет.

Отправлено: 14:54, 31-03-2012 | #4


Ветеран


Сообщения: 27449
Благодарности: 8087

Профиль | Отправить PM | Цитировать

game_Racer, ясно. Смутило именно упоминание в контексте OLE вместо BLOB.

Отправлено: 16:41, 31-03-2012 | #5



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » Delphi - [решено] Вставить и достать файл ворда в БД Access

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
CMD/BAT - [решено] Вставить имя файла в текстовый файл (UTF-8 without BOM) Jahnhoy Скриптовые языки администрирования Windows 11 19-09-2011 17:39
CMD/BAT - вставить в файл текстC:\Temp\MyFont с помощью goto csusha Скриптовые языки администрирования Windows 0 20-09-2010 18:51
VBA - [решено] Как вставить данные в базу access на VB2008 ? Большой Кол Программирование и базы данных 1 22-04-2010 20:40
Разное - Вставить команду или bat-файл в VB IvanAnnyuk Программирование и базы данных 4 31-03-2010 04:10
Нужно файл cmd в автозагрузку под системной записью вставить dao_Andy Хочу все знать 4 13-04-2009 14:06


« Предыдущая тема | Следующая тема »


 
Переход