>The threads you pointed to required changing the word documentation (by a least adding a password) which I prefer not to do. Thanks for your help.

Well, unfortunately this can not be a good solution:

oWord = createobject("Word.Application")

lcFile = getfile('DOC')
if empty(lcfile)
 return
endif
with oWord
 .Documents.Open(lcFile)
 *.Application.CommandBars("Standard").Controls("Save").Enabled = .F.
 .Application.CommandBars("File").Controls("Save As...").Enabled = .F.
 .visible = .t.
endwith

since we need to be able to restore it back before an attempt to close Word file.