1 Тема от MIKron

  • MIKron
  • Участник
  • Неактивен

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

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

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

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

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

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

2 Ответ от alexii

  • alexii
  • Разработчик
  • Неактивен

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

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

Const wdStatisticPages = 2

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

3 Ответ от MIKron

  • MIKron
  • Участник
  • Неактивен

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

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