>This is because CREATEOBJECT() always creates a new instance of Word.
>What you need to do is use GETOBJECT() to grab a reference to an
>existing instance of Word. Unfortunately, the GETOBJECT() syntax can
>crash with error 1426 if there is no existing reference. This code should
>help get you started:

And, the VFP8 version:

LOCAL oerr as Exception
*** Use GetObject to grab a reference to an existing
*** instance of the server or create one if there is none
TRY
   oWord = GETOBJECT( , 'Word.Application' )
CATCH TO oErr
   IF oErr.ErrorNo = 1426
      oWord = CREATEOBJECT('Word.Application')
   ELSE
      THROW oErr
   ENDIF
ENDTRY

P.S. -- Hey, Michel, you need some new syntax coloring code. :-)