Функция _WordCreate

 ↑  ←  Описание функции


_WordCreate

Создаёт объект Microsoft Office Word

#include <Word.au3>
_WordCreate([$s_FilePath = "" [, $b_tryAttach = 0 [, $b_visible = 1 [, $b_takeFocus = 1]]]])

Параметры

$s_FilePath [необязательный] Путь к файлу, который будет открыт при создании (См. Примечания)
$b_tryAttach [необязательный] Указывает, пытаться ли подключится к существующему окну
0 = (по умолчанию) Не пытаться подключится
1 = Пытаться подключится к существующему окну
$b_visible [необязательный] Указывает, будет ли отображаться окно
0 = Окно будет скрыто
1 = (по умолчанию) Окно будет отображаться
$b_takeFocus [необязательный] Указывает, перевести ли подключенное окно в фокус
0 = Не переносить окно в фокус
1 = (по умолчанию) Перевести окно в фокус

Возвращаемое значение

Успех:Возвращает переменную объекта, указывающую на объект Word.Application
Ошибка:Возвращает 0 и устанавливает @error
@error:$_WordStatus_Success = Нет ошибок
$_WordStatus_GeneralError = Общая ошибка
$_WordStatus_InvalidDataType = Неверный тип данных
$_WordStatus_InvalidObjectType = Неверный тип объекта
@extended:Устанавливает True (1) или False (0) в зависимости от успешности $f_tryAttach

Примечания

Файл будет создан, если он не существует.

См. также

_WordAttach, _WordQuit

Пример

; *******************************************************
; Пример 1 - Create a Microsoft Word window and open a document file
; *******************************************************

#include <Word.au3>
$oWordApp = _WordCreate (@ScriptDir & "\Test.doc")

; *******************************************************
; Пример 2 - Attempt to attach to an existing word window with the specified document open.
;               Create a new word window and open that document if one does not already exist.
; *******************************************************

#include <Word.au3>
$oWordApp = _WordCreate (@ScriptDir & "\Test.doc", 1)
; Check @extended return value to see if attach was successful
If @extended Then
    MsgBox(4096, "", "Attached to Existing Window")
Else
    MsgBox(4096, "", "Created New Window")
EndIf

; *******************************************************
; Пример 3 - Create a word window with a new blank document
; *******************************************************

#include <Word.au3>
$oWordApp = _WordCreate ()

; *******************************************************
; Пример 4 - Create an invisible word window, open a document,
;               append some text, and quit saving changes.
; *******************************************************

#include <Word.au3>
$oWordApp = _WordCreate (@ScriptDir & "\Test.doc", 0, 0)
$oDoc = _WordDocGetCollection ($oWordApp, 0)
$oDoc.Range.insertAfter ("This is some text to insert.")
_WordQuit ($oWordApp, -1)