Программный файл: ...\Samples\Solution\OLE\Oleaut1.scx

На данном простейшем примере показано, как система Visual FoxPro выступает Контролером процесса Автоматизации (Automation controller). Здесь демонстрируется выборка требуемых данных из Таблиц Базы Данных Visual FoxPro, размещение выбранных данных в электронной таблице Microsoft Excel, построение Графиков в виде Диаграмм, отображение графиков в системе MS Word. Для использования рассмотренного примера рекомендуется использовать версии, не младше Excel 5.0, Word 6.0, и Базу Данных Testdata.dbc, которая размещено по адресу:  ...\Samples\Data.

В следующей строке программного Кода создается объектная ссылка на Электронную Таблицу Microsoft Excel.

  CopyCode imageКопировать Код
objXLsheet=createobject("Excel.Sheet")

В следующей строке Кода: добавляется Диаграммы в созданную Таблицу.

  CopyCode imageКопировать Код
objChart1 = objXLsheet.ChartObjects.Add(100, 100, 200, 200)

Далее: создается объектная ссылка на Приложение Microsoft Word.

  CopyCode imageКопировать Код
objWDdoc=createobject("word.basic")

oWordRef = GetObject('','word.basic')

См. также