Как программно открыть файл с разбивкой на страницы? Как можно управлять опцией 'Maintain layers and pages' ?

@Yuric · Регистрация: 06.05.2010

Студворк — интернет-сервис помощи студентам

Привет всем!
Ситуация: в проекте подключаю объект CorelDRAW. Открываю файл с помощью

Visual Basic

1	Set docFile_Ps = objCorel.OpenDocument('C:My_File.ps')

В документе более 100 листов, но после открытия оказывается, что все объекты(Shapes) находятся на одном листе. То же самое происходит, если открывать файл 'My_File.ps' вручную из Corel'а при выключенном чекере 'Maintain layers and pages' диалога 'Открыть'.(При включенном всё отлично открывается)
ВОПРОС: Как программно открыть файл с разбивкой на страницы? Как можно управлять опцией 'Maintain layers and pages' ?
О себе: win2000pro
OfficeXP
CorelDraw 11
Помогите пожалуйста, совсем с ног сбился.
Благодарен заранее.

@Yuric · 09.01.2011, 15:23 **[ТС]**

Не хотелось надоедать, но вопрос по-прежнему ОЧЕНЬ актуален. Может быть кто-нибудь из уважаемых форумчан подскажет ссылки на ресурсы по VBA CorelDraw ?
Заранее благодарю.

@Yuric · 10.01.2011, 20:54 **[ТС]**

Неужели никто не поможет ?

@Yuric · 17.01.2011, 18:04 **[ТС]**

Привет всем.
Простите, не стал открывать новую тему, т.к. можно считать вопрос продолжением.
Файл открываю без разбивки на страницы:

Visual Basic

1	Set docFile_Ps = objCorel.OpenDocument('C:My_File.ps')

Но возникает другая проблема. При переборе объектов, на строке

Visual Basic

1	For Each objText In objFile_Ps.Pages(1).Shapes

несколько раз появляется сообщение

'MS Excel ждёт завершения операции OLE другим приложением'

послечего всё работает.

Как побороть ?
Заранее благодарен.

@Yuric · 17.01.2011, 18:06 **[ТС]**

Пардон, конечно же

Visual Basic

1	For Each objText In docFile_Ps.Pages(1).Shapes

@Yuric 1 / 1 / 0 Регистрация: 06.05.2010 Сообщений: 41
	09.01.2011, 15:23 [ТС]	2
	Не хотелось надоедать, но вопрос по-прежнему ОЧЕНЬ актуален. Может быть кто-нибудь из уважаемых форумчан подскажет ссылки на ресурсы по VBA CorelDraw ? Заранее благодарю. 0

@Yuric 1 / 1 / 0 Регистрация: 06.05.2010 Сообщений: 41
	10.01.2011, 20:54 [ТС]	3
	Неужели никто не поможет ? 0

	17.01.2011, 18:06

Опции темы