Protect word 2007 doc from within lotusscript

HCL Domino Domino Forum
1

I used to protect word 2003 docs from within Lotusscript with following command

Set varWrdApp = CreateObject( “Word.Application” )

varWrdApp.Visible = True

varWrdApp.Documents.Open ( sTargetFile )

Call varWrdApp.ActiveDocument.Protect (wdAllowOnlyComments,“protectedpassword”)

It seems this does not work anymore in word 2007

I tried following solutions but none did the job

  1. Protect when opening

Call varWrdApp.Documents.Open ( sTargetFile , False , True )

  1. Protect after opening

varWrdApp.Documents.Open ( sTargetFile )

Call varWrdApp.ActiveDocument.Protect (wdAllowOnlyReading,False,“Protectpassword”,False,False)

or

varWrdApp.ActiveDocument.WritePassword = “ProtectPassword”

Did anyone succeed ?