lcDoc = "D:\MyDocs\MyDocument.doc" oWord = GETOBJECT( lcDoc ) IF VARTYPE( oWord ) = 'O' oWord.Application.Visible = .T. ENDIF