4j.documents4j-transformer-msoffice-word.1.0.3.source-code.word_assert.vbs Maven / Gradle / Ivy
' Configure error handling to jump to next line.
On Error Resume Next
' Try to get running MS Word instance.
Dim wordApplication
Set wordApplication = GetObject(, "Word.Application")
' Signal whether or not such an instance could not be found.
If Err <> 0 then
WScript.Quit -6
Else
WScript.Quit 3
End If