* Create a Word document object
loWord=CreateObject('Word.Application')
loDocument=loWord.Documents.Add
loWord.Visible=.f.


* Assign the text to the document and check spelling
loDocument.Content.Text='The long bridge faiiled in the middle. Then, Michel Fournier '+;
 'came in and sayd, who are you? Rorlf Bingo! They were winning the billa game.'

loDocument.Activate
activate window "debug output"

lnCount=loDocument.SpellingErrors.Count
IF lnCount>0
   loErrors=loDocument.SpellingErrors
   FOR EACH loError IN loErrors
       debugout seconds(), loError.Text
   ENDFOR
ENDIF

* Close the document and exit Word...
loDocument.Close(0)

loWord.Quit