Hello John. Thank you for answer to my question.
It a great help for me!
Application keyword must be added for Word97!
oWord97=createobject('word.document')
oWord97.Application.documents.open('c:\anyWord97.doc')
oWord97.Application.visible=.t.
=oWord97.Application.ActiveDocument.Select && Yes! It working.
cText=oWord97.Application.Selection.Text
cText=LEFT(cText,LEN(cText)-1) && Required
...
Without your answer I must to dry paddle.
Now I am on the horse!