Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Задает параметры, которые 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 и обратная связь.