>Try this.
>
>
o=CREATEOBJECT("word.application")
>odoc = o.Documents.Add
>o.CommandBars.Item("File").Controls.Item("Save As...").Enabled =.f.
>o.CommandBars.Item("File").Controls.Item("Save").Enabled =.f.
>o.CommandBars.Item("File").Controls.Item("Print...").Enabled =.f.
>o.Visible =.t.>
It doesn't work for Office 2007. Not sure about 2003 or earlier, but I think not. I think you'll have to intercept the messages with bindevents.
John Harvey
Shelbynet.com
"I'm addicted to placebos. I could quit, but it wouldn't matter." Stephen Wright 
