创建一个 Microsoft Office Word 对象
#include <Word.au3>
_WordCreate ( [ $s_FilePath = "" [, $b_tryAttach = 0 [, $b_visible = 1 [, $b_takeFocus = 1]]]] )
$s_FilePath | [可选参数] 文件路径,如果路径存在就打开,不存在就新建(参考注意) |
$b_tryAttach | [可选参数] 指定是否尝试附加到一个已经存在的word窗口 0 = (默认) 不尝试附加 1 = 尝试附加到一个已存在的word窗口. |
$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) |
; *******************************************************
; 示例 1 - 创建一个新的Microsoft Word文件并打开(创建成功则自动保存到相应路径)
; *******************************************************
;
#include <Word.au3>
Local $oWordApp = _WordCreate(@ScriptDir & "\Test.doc")
; *******************************************************
; 示例 2 - 尝试附加到一个已存在的word窗口
; 如果文件不存在,创建一个新的Microsoft Word文件并打开.
; *******************************************************
;尝试附加到一个已存在的word窗口
#include <Word.au3>
$oWordApp = _WordCreate(@ScriptDir & "\Test.doc", 1)
; 检查返回值 @extended 判断连接是否成功
If @extended Then
MsgBox(4096, "附加成功", "附加到现有的窗口")
Else
MsgBox(4096, "附加失败", "创建新窗口")
EndIf
; *******************************************************
; 示例 3 - 创建一个新Microsoft Word文件并打开
; *******************************************************
;
#include <Word.au3>
$oWordApp = _WordCreate()
; *******************************************************
; 示例 4 -创建一个新的Microsoft Word文件并打开(指定窗口为隐藏状态),
; 追加一些文本,然后保存更改退出.
; *******************************************************
;
#include <Word.au3>
$oWordApp = _WordCreate(@ScriptDir & "\Test.doc", 0, 0)
Local $oDoc = _WordDocGetCollection($oWordApp, 0)
$oDoc.Range.insertAfter ("这是追加的文本内容.")
_WordQuit ($oWordApp, -1)