Метод Document.SetPasswordEncryptionOptions (Word)
Задает параметры, которые Microsoft Word использует для шифрования документов с помощью паролей.
Синтаксис
выражение. SetPasswordEncryptionOptions
( _PasswordEncryptionProvider_
, _PasswordEncryptionAlgorithm_
, _PasswordEncryptionKeyLength_
, _PasswordEncryptionFileProperties_
)
выражение (обязательно). Переменная, представляющая объект Document .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
PasswordEncryptionProvider | Обязательный | String | Имя поставщика шифрования. |
PasswordEncryptionAlgorithm | Обязательный | String | Имя алгоритма шифрования. Word поддерживает алгоритмы, зашифрованные потоком. |
PasswordEncryptionKeyLength | Обязательный | Long | Длина ключа шифрования. Должен быть кратным 8, начиная с 40. |
PasswordEncryptionFileProperties | Необязательный | Variant | Значение true для 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 и обратная связь.