Серый форум — VBS. Получить число страниц в документе MS Word (проблема)

Re: VBS. Получить число страниц в документе MS Word (проблема)

null@example.com (MIKron) — Sat, 30 Jun 2012 08:54:59 +0000

Спасибо большое.

Re: VBS. Получить число страниц в документе MS Word (проблема)

null@example.com (alexii) — Sat, 30 Jun 2012 08:23:07 +0000

В VBScript надо объявлять константу сторонней библиотеки ручками:

Const wdStatisticPages = 2

Либо использовать формат *.wsf: WSH: пишем сценарии в формате WSF, где посредством тэга сослаться на потребную библиотеку. А так получается (поскольку в скрипте Вы не используете «Option Explicit»), что любая не объявленная переменная в приведённом коде будет равна нулю. Отсюда и результат. Ибо «0» — это «wdStatisticWords».

VBS. Получить число страниц в документе MS Word (проблема)

null@example.com (MIKron) — Sat, 30 Jun 2012 05:51:15 +0000

Здравствуйте!

Есть следующий код:

   Set objWord = CreateObject("Word.Application")
   Set objDoc = objWord.Documents.Open("C:\Documents\имя_файла.docx")

   msgbox objDoc.ComputeStatistics(wdStatisticPages)
   objDoc.Close
   objWord.Quit

Проблема заключается в следующем: вне зависимости от параметра (wdStatisticWords, wdStatisticParagraphs и т.д.) всегда выводится число слов, а не страниц. Очень хочется это исправить, либо услышать, что я делаю не так.