如何从ACCESS里打开带密码的WORD文档

简

我在WORD里设计了个表格，因为不想让同事们误修改,所以我将该WORD文件加了密。现在我需要将ACCESS的数据采用OLE的方式输入该WORD表格中，所以我想请教，如何在ACCESS程序里编写ACCESS打开带密码的WORD文档呢？

在此先谢谢大家了。

简

没人回答,我自己顶顶看.

liwen

'创建Word对象
Set doc = CreateObject("word.application")
doc.Visible = True
'打开Word文件
doc.Documents.Open FileName:=CurrentProject.Path & "\测试.doc", ConfirmConversions:=False, ReadOnly:= _
        False, AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:= _
        "", Revert:=False, WritePasswordDocument:="", WritePasswordTemplate:=""