Шаг 45 - OLE+VFP+Excel. Получаем имена открытых книг

В прошлом шаге мы рассмотрели, как запустить Excel из-под VFP. Но для обычного запуска приложения с параметрами можно было бы воспользоваться командой RUN и не углубляться в OLE:

run D:\BankOper\Debug\BankOper.exe 1

Наша же цель получить контроль над работой приложения. Итак, двинемся дальше. Будем мучить Excel :-)

Давайте получим имена открытых книг:

clear
oleApp = createobject("Excel.Application")
oleApp.Workbooks.Add
oleApp.Workbooks.Open("c:\temp.xls")
for each x in oleApp.Workbooks
	? x.Name
endfor
oleApp.Quit

Таким образом, мы запустили Excel, создали новую книгу и открыли уже существующую. Результат работы программы:

45_1.gif (2223 b)

О том, что можно сделать еще, в следующих Шагах.


Предыдущий Шаг | Следующий Шаг | Оглавление
Автор Клементьев В.А - 25.08.2002