Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.25;
Скачать: CL | DM;

Вниз

Delphi+Access+Word(OLE)+Excel(OLE)   Найти похожие ветки 

 
VitGun ©   (2004-02-10 21:12) [0]

Вопрос такой.
Есть база данных Access в ней таблица "Таблица 1"
В таблице есть поле "Док1" is blob. Я успешно добавляю документ Word или Excel в таблицу - тут все ок. Но вот как мне его открыть из базы?

Кусок процедуры добавления:

Word:=CreateOLEObject("Word.Application");
Word.Documents.add(Edit1.Text,false);
Word.visible:=true;
Form1.ADOTable1.Edit;
Form1.ADOTable1.Insert;;
Form1.ADOTable1.Fields.Fields[1].AsVariant:=Word;

Открыть пытался так:

Word:=CreateOleObject("Word.Application");
Word.visible:=true;
Word.Documents:=ADOTAble1.Fields.Fields[1].AsVariant;

При попытке открытия, запускается Word и говорит "Член группы не найден"
Вопрос: Что я не доделал? Он чего-то хочет, а чего не пойму.
Плиз хелп!

Edit1 - содержит путь к добавляемому файлу.
Fields[1] - это blob-поле.
Word - переменная типа OleVariant, ссылка на OLE-сервер Word.


 
VitGun ©   (2004-02-11 05:46) [1]

Up...


 
AleksandrKu   (2004-02-11 07:22) [2]

где ругается на что именно?


 
REP ©   (2004-02-11 07:28) [3]

Form1.ADOTable1.Fields.Fields[1].AsVariant:=Word;
Word.Documents:=ADOTAble1.Fields.Fields[1].AsVariant;

Немного разные вещи, или я ошибаюсь?

Form1.ADOTable1.Edit;
Form1.ADOTable1.Insert;;
?????????



Страницы: 1 вся ветка

Текущий архив: 2004.02.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
1-79877
Leech
2004-02-10 12:03
2004.02.25
нужна структура наподобие массивов....


14-80169
Palladin
2004-01-31 21:31
2004.02.25
Критерии серьезности.


3-79585
coder
2004-01-28 20:28
2004.02.25
FireBird


1-79719
alextov
2004-02-12 16:25
2004.02.25
Не получается сделать форму шире экрана


4-80356
Evgeniy_K
2003-11-03 16:03
2004.02.25
Параметры шрифта при выводе через TextOut