Тема: проблема с полями в word'е при запуске из акад скрипта

Здравствуйте помогите решить трабл:
мой dvb'шный скрипт сначала работает с АКАД'ом, после чего запускает Word
и вставляет туда таблицы. (при этом необходимо изменять поля)
Почему-то постоянно через раз (те 1 раз запускается без ошибки, на 2 ошибка, 3 - все ок и тд) скрипт выдает ошибку в ворде на коде:
adoc.PageSetup.TopMargin = InchesToPoints(0.748)
adoc.PageSetup.BottomMargin = InchesToPoints(1)
adoc.PageSetup.RightMargin = InchesToPoints(0.5)
(причем до этого стоит строчка: adoc.PageSetup.Orientation = wdOrientLandscape - и с ней все Ок)
если эти строки закоментировать скрипт продолжает работу и все проходит без ошибок. Но надо изменять поля.... почему это может быть?

Re: проблема с полями в word'е при запуске из акад скрипта

у меня тоже вопрос чуть не по теме, много раз возникали проблемы про таблицы в ворде + ACAD, а почему не используете Excel, вроде тоже не плохая табличка.

Re: проблема с полями в word'е при запуске из акад скрипта

> AnteC
Протестировал твою запись, первые раз 10 действительно,
как ты говорил, работала через раз, а потом вдруг
ни с того все нормально
adoc.PageSetup.Orientation = wdOrientLandscape
adoc.PageSetup.TopMargin = InchesToPoints(2) '(0.748)
adoc.PageSetup.BottomMargin = InchesToPoints(2) '(1)
adoc.PageSetup.RightMargin = InchesToPoints(2) '(0.5)
Может причина на пару строчек выше?
~'J'~

Re: проблема с полями в word'е при запуске из акад скрипта

прикол в том что при запуске через vbs (командой Run) ошибка вываливается через раз, но если запускать через "кнопку" (те lisp командой из акада) то не вываливается...
так что тему можно закрывать, хотя все равно интересно почему это происходит...

Re: проблема с полями в word'е при запуске из акад скрипта

ЗЫ word выбран т.к. необходимо не только таблицы вставлять но еще и текст...

Re: проблема с полями в word'е при запуске из акад скрипта

Как я понял adoc - это Word. А если вот так. Ведь код работает не в Word:

adoc.PageSetup.TopMargin = adoc.InchesToPoints(0.748)
adoc.PageSetup.BottomMargin = adoc.InchesToPoints(1)
adoc.PageSetup.RightMargin = adoc.InchesToPoints(0.5)

Так не надежней?