Workbook.PasswordEncryptionKeyLength Свойство (2007 System)

Статья
11/16/2008

Обновлен: Ноябрь 2007

Получает длину ключа алгоритма, который используется Microsoft Office Excel при шифровании паролей для книги.

Пространство имен: Microsoft.Office.Tools.Excel
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)

Синтаксис

'Декларация
<BrowsableAttribute(False)> _
Public ReadOnly Property PasswordEncryptionKeyLength As Integer
'Применение
Dim instance As Workbook
Dim value As Integer

value = instance.PasswordEncryptionKeyLength

[BrowsableAttribute(false)]
public int PasswordEncryptionKeyLength { get; }

Значение свойства

Тип: System.Int32
Длина ключа алгоритма, который используется Microsoft Office Excel при шифровании паролей для книги.

Заметки

Используйте метод SetPasswordEncryptionOptions, чтобы указать необходимость шифрования Excel свойств файла для указанной книги, защищенной паролем.

Примеры

В следующем примере путем проверки значений свойства HasPassword программный код определяет, защищена ли книга паролем. Если рабочая книга не защищена паролем, в данном примере свойству Password присваивается введенный пользователем пароль, после чего вызывается метод SetPasswordEncryptionOptions, с помощью которого задается алгоритм шифрования, длина ключа, имя поставщика шифрования и разрешается шифрование свойств файла. Затем в примере отображаются значения свойств PasswordEncryptionProvider, PasswordEncryptionAlgorithm, PasswordEncryptionKeyLength и PasswordEncryptionFileProperties листа Sheet1. В этом примере предполагается, что метод GetPasswordFromUserInput определен в другом месте.

В этом примере демонстрируется настройка уровня документа.

Private Sub WorkbookPasswordOptions()
    If Not Me.HasPassword Then
        Me.Password = GetPasswordFromUserInput()
        Me.SetPasswordEncryptionOptions( _
            "Microsoft RSA SChannel Cryptographic Provider", _
            "RC4", 128, True)
    End If

    ' Display the password properties in Sheet1.
    Globals.Sheet1.Range("A1").Value2 = _
        "Password Encryption Provider:"
    Globals.Sheet1.Range("A2").Value2 = _
        "Password Encryption Algorithm:"
    Globals.Sheet1.Range("A3").Value2 = _
        "Password Encryption Key Length:"
    Globals.Sheet1.Range("A4").Value2 = _
        "Password Encryption File Properties:"
    Globals.Sheet1.Range("A1", "A4").Columns.AutoFit()

    Globals.Sheet1.Range("B1").Value2 = _
        Me.PasswordEncryptionProvider
    Globals.Sheet1.Range("B2").Value2 = _
        Me.PasswordEncryptionAlgorithm
    Globals.Sheet1.Range("B3").Value2 = _
        Me.PasswordEncryptionKeyLength
    Globals.Sheet1.Range("B4").Value2 = _
        Me.PasswordEncryptionFileProperties
    Globals.Sheet1.Range("B1", "B4").Columns.AutoFit()
End Sub

private void WorkbookPasswordOptions()
{
    if (!this.HasPassword)
    {
        this.Password = GetPasswordFromUserInput();
        this.SetPasswordEncryptionOptions(
            "Microsoft RSA SChannel Cryptographic Provider",
            "RC4", 128, true);
    }

    // Display the password properties in Sheet1.
    Globals.Sheet1.Range["A1", missing].Value2 =
        "Password Encryption Provider:";
    Globals.Sheet1.Range["A2", missing].Value2 =
        "Password Encryption Algorithm:";
    Globals.Sheet1.Range["A3", missing].Value2 =
        "Password Encryption Key Length:";
    Globals.Sheet1.Range["A4", missing].Value2 =
        "Password Encryption File Properties:";
    Globals.Sheet1.Range["A1", "A4"].Columns.AutoFit();

    Globals.Sheet1.Range["B1", missing].Value2 =
        this.PasswordEncryptionProvider;
    Globals.Sheet1.Range["B2", missing].Value2 =
        this.PasswordEncryptionAlgorithm;
    Globals.Sheet1.Range["B3", missing].Value2 =
        this.PasswordEncryptionKeyLength;
    Globals.Sheet1.Range["B4", missing].Value2 =
        this.PasswordEncryptionFileProperties;
    Globals.Sheet1.Range["B1", "B4"].Columns.AutoFit();
}

Разрешения

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.

См. также

Ссылки

Workbook Класс

Workbook - члены

Microsoft.Office.Tools.Excel - пространство имен

Поделиться через