Главная страница
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.043 c
8-80048
kopcap
2003-09-21 18:01
2004.02.25
Помогите с OpenGL , неработает команда glTranslate()


14-80125
EAlexander
2004-02-02 17:22
2004.02.25
IE


3-79579
venus
2004-01-29 11:45
2004.02.25
Сортировка записей в БД


6-80065
L0N6
2003-12-17 17:35
2004.02.25
Быстрая передача данных по сети


1-79873
Марат
2004-02-10 12:42
2004.02.25
Текстовый файл из DOS