_WordDocPrint
Печатает все или часть указанного документа.
#include <Word.au3>
_WordDocPrint(ByRef $o_object [, $b_Background = 0 [, $i_Copies = 1 [, $i_Orientation = -1 [, $b_Collate = 1 [, $s_Printer = "" [, $i_Range = 0 [, $i_From = "" [, $i_To = "" [, $s_Pages = "" [, $i_PageType = 0 [, $i_Item = 0]]]]]]]]]]])
Параметры
| $o_object | Переменная объекта документа Word.Application |
| $b_Background |
[необязательный] Указывает, продолжить ли выполнение скрипта пока печатается документ Microsoft Word. (См. Примечания) 0 = (по умолчанию) Ожидать выполнения печати документа 1 = Продолжить скрипт без ожидания |
| $i_Copies |
[необязательный] Число копий для печати. |
| $i_Orientation |
[необязательный] Устанавливает ориентацию страницы. -1 = (по умолчанию) Текущая ориентация документа 0 = Книжная 1 = Альбомная |
| $b_Collate |
[необязательный] Указывает, печатать ли все страницы документа перед печатью следующей копии. 0 = Не разбирать 1 = (по умолчанию) Разобрать по копиям |
| $s_Printer |
[необязательный] Задает имя принтера. (См. Примечания) |
| $i_Range |
[необязательный] Указывает диапазон страниц. 0 = (по умолчанию) Весь документ 1 = Выделенный фрагмент 2 = Текущую страницу 3 = Указанный диапазон (необходимо указать $i_From и $i_To) 4 = Указанный диапазон страниц (необходимо указать $s_Pages) |
| $i_From |
[необязательный] Начальный номер страницы при $i_Range равном 3. |
| $i_To |
[необязательный] Конечный номер страницы при $i_Range равном 3. |
| $s_Pages |
[необязательный] Номера и диапазон страниц для печати, разделенных запятыми, при $i_Range равном 4. Например, "2, 6-10" печатает страницу 2 и диапазон страниц с 6 по 10. |
| $i_PageType |
[необязательный] Тип страниц для печати. 0 = (по умолчанию) Все страницы диапазона 1 = Нечетные страницы 2 = Четные страницы |
| $i_Item |
[необязательный] Элементы для печати. 0 = (по умолчанию) Текущее содержание документа 1 = Сведения 2 = Комментарии и разметку 3 = Стили 4 = Данные автотекста 5 = Сочетания клавиш 6 = Конверт 7 = Текущее содержание документа, включая разметку |
Возвращаемое значение
| Успех: | Возвращает 1 |
| Ошибка: | Возвращает 0 и устанавливает @error = 1 |
| @error: | $_WordStatus_Success = Нет ошибок |
| $_WordStatus_GeneralError = Общая ошибка | |
| $_WordStatus_ComError = Com ошибка | |
| $_WordStatus_InvalidDataType = Неверный тип данных | |
| $_WordStatus_InvalidObjectType = Неверный тип объекта | |
| $_WordStatus_InvalidValue = Неверное значение | |
| @extended: | Содержит номер неисправного параметра |
Примечания
Установка $b_Background не приостанавливает выполнение скрипта, до завершения печати документа, это только приостановит Microsoft Word до завершения отправки документа на принтер. Если вы выполняете фоновую печать, то немедленно выполните _WordQuit() the document will not have time to print.Пример
; *******************************************************
; Пример 1 - Create a word window, open a document, set the text,
; print with defaults, and quit without saving changes.
; *******************************************************
#include <Word.au3>
$oWordApp = _WordCreate (@ScriptDir & "\Test.doc")
$oDoc = _WordDocGetCollection ($oWordApp, 0)
$oDoc.Range.Text = "This is some text to print."
_WordDocPrint ($oDoc)
_WordQuit ($oWordApp, 0)
; *******************************************************
; Пример 2 - Create a word window, open a document, set the text,
; print using landscape, and quit without saving changes.
; *******************************************************
#include <Word.au3>
$oWordApp = _WordCreate (@ScriptDir & "\Test.doc")
$oDoc = _WordDocGetCollection ($oWordApp, 0)
$oDoc.Range.Text = "This is some text to print."
_WordDocPrint ($oDoc, 0, 1, 1)
_WordQuit ($oWordApp, 0)
; *******************************************************
; Пример 3 - Create a word window, open a document, set the text,
; print to a printer named "My Printer", and quit without saving changes.
; *******************************************************
#include <Word.au3>
$oWordApp = _WordCreate (@ScriptDir & "\Test.doc")
$oDoc = _WordDocGetCollection ($oWordApp, 0)
$oDoc.Range.Text = "This is some text to print."
_WordDocPrint ($oDoc, 0, 1, 0, 1, "My Printer")
_WordQuit ($oWordApp, 0)