Шаг 47 - OLE+VFP+Word

Теперь посмотрим, как можно работать с Word в VFP через OLE.

oleApp = CreateObject("Word.Basic")
oleApp.AppShow
oleApp.FileNew
oleApp.Insert("Первые Шаги")
oleApp.FileSaveAs("c:\temp.txt")

Как видите, все просто:

47_1.gif (13232 b)

Можно также запустить Word вот так:

oleApp = CreateObject("Word.Application")
oleApp.Visible = .t.
oleApp.Quit

Вот и все.


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