Document.SetPasswordEncryptionOptions 方法 (Word)
设置 Microsoft Word 用于通过密码加密文档的选项
语法
expression。 SetPasswordEncryptionOptions( _PasswordEncryptionProvider_ , _PasswordEncryptionAlgorithm_ , _PasswordEncryptionKeyLength_ , _PasswordEncryptionFileProperties_ )
expression 是必需的。 一个代表 Document 对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| PasswordEncryptionProvider | 必需 | String | 加密提供程序的名称。 |
| PasswordEncryptionAlgorithm | 必需 | String | 加密算法的名称。 Word 支持流式加密算法。 |
| PasswordEncryptionKeyLength | 必需 | Long | 加密密钥长度。 必须是从 40 开始的 8 的倍数。 |
| PasswordEncryptionFileProperties | 可选 | Variant | 真正 使 Word 能够加密文件属性。 默认值为 True 。 |
备注
为了增强安全性，请勿使用弱加密 (XOR) (也称为“OfficeXor”) 或“Office97/2000 兼容” (也称为“OfficeStandard”) 算法。
示例
如果使用的密码加密算法是“OfficeXor”或“OfficeStandard”，本示例将密码加密设置为更强的加密。
Sub PasswordSettings()
With ActiveDocument
If .PasswordEncryptionAlgorithm = "OfficeXor" Or _
.PasswordEncryptionAlgorithm = "OfficeStandard" Then
.SetPasswordEncryptionOptions _
PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _
PasswordEncryptionAlgorithm:="RC4", _
PasswordEncryptionKeyLength:=56, _
PasswordEncryptionFileProperties:=True
End If
End With
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。