Скачать: CL | DM;

Как корректно открыть Excel, взять оттуда значение ячейки и ...   Найти похожие ветки 

← →
Weare   (2004-09-13 12:17) [0]

День добрый, уважаемые мастера. Подскажите плиз.
Как корректно открыть файл Excel"я (передать в него пароль), взять оттуда значение ячейки и закрыть его. Я тут пробую, но у меня не получается пароль передать, и после закрытия программы остается зависший процесс

---

← →
3APA3A ©   (2004-09-13 12:56) [1]

Вот описание этой процедуры

 WorkBooks.Open(FileName, UpdateLinks, ReadOnly, Format, Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMru, Local, CorruptLoad, OpenConflictDocument);
 
 А работает это так.
program CoolProgram;
uses ComObj;
var Excel : OLEVariant;
begin
 Excel := ComObj.CreateOleObject("Excel.Application");
 Excel.WorkBooks.Open("c:\1.xls", EmptyParam, EmptyParam, EmptyParam, "MyHyperPassword", EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam);
 ShowMessage(Excel.ActiveWorkBook.Sheets[1].Cells[1, 1]);
 Excel.Quit;
 Excel := Null;
end.

---

← →
Rule ©   (2004-09-13 14:10) [2]

http://www.kornjakov.ru/stat.htm
вот ещё для общего развития и углубленного изучения данной темы

---

← →
Weare   (2004-09-13 14:15) [3]

Спасибо, попробовал.
Ругается на строчку:

>  Excel.WorkBooks.Open("c:\1.xls", EmptyParam, EmptyParam,
> EmptyParam, "MyHyperPassword", EmptyParam, EmptyParam, EmptyParam,
> EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
> EmptyParam, EmptyParam);

- Недопустимое число параметров
Чего это ОНО?

---

← →
Rule ©   (2004-09-13 15:15) [4]

Это оно ругается на то что надо убрать один EmptyParam

---

← →
Weare   (2004-09-13 18:07) [5]

>to Rule ©   (13.09.04 15:15) [4]

спасибо, я вообще убрал все параметры после пароля - ВСЕ РАБОТАЕТ!

---

← →
Rule ©   (2004-09-14 08:57) [6]

Weare   (13.09.04 18:07) [5]
Так у вас батенька дальнее связываение, а тут предполагалось ближнее ...

---

← →
Weare   (2004-09-14 11:07) [7]

> Rule ©   (14.09.04 08:57) [6]
> Weare   (13.09.04 18:07) [5]
> Так у вас батенька дальнее связываение, а тут предполагалось
> ближнее ...

Извини, за такие вопросы, но что ты имел ввиду?

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.967 c