WorkbookBase.PasswordEncryptionKeyLength – vlastnost

Článek
05/14/2013

Získá délku klíče algoritmus, který aplikace Microsoft Office Excel používá při šifrování hesel v sešitu.

Obor názvů: Microsoft.Office.Tools.Excel
Sestavení: Microsoft.Office.Tools.Excel.v4.0.Utilities (v Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Syntaxe

'Deklarace
Public ReadOnly Property PasswordEncryptionKeyLength As Integer

public int PasswordEncryptionKeyLength { get; }

Hodnota vlastnosti

Typ: System.Int32
Délka klíče algoritmus, který používá při šifrování hesel v sešitu aplikace Excel.

Poznámky

Použití SetPasswordEncryptionOptions metoda k určení, zda aplikace Excel zašifruje zadané sešitu zamknutém heslem ve vlastnostech souboru.

Příklady

Následující příklad kódu kontroluje hodnotu HasPassword vlastnost k určení, zda je sešit chráněn heslem.Pokud je sešit chráněn heslem, pak v příkladu nastaví Password na heslo získané od vstupu uživatele a pak zavolá SetPasswordEncryptionOptions metoda nastavení šifrovacího algoritmu, nastavit délku nastavit název zprostředkovatele šifrování a povolit šifrování souborů vlastnosti.V příkladu se potom zobrazí hodnoty PasswordEncryptionProvider, PasswordEncryptionAlgorithm, PasswordEncryptionKeyLength, a PasswordEncryptionFileProperties vlastnosti v listu Sheet1.Tento příklad předpokládá, že metoda GetPasswordFromUserInput je definován jinde.

V tomto příkladu je úroveň dokument přizpůsobení.

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"].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 =
        this.PasswordEncryptionProvider;
    Globals.Sheet1.Range["B2"].Value2 =
        this.PasswordEncryptionAlgorithm;
    Globals.Sheet1.Range["B3"].Value2 =
        this.PasswordEncryptionKeyLength;
    Globals.Sheet1.Range["B4"].Value2 =
        this.PasswordEncryptionFileProperties;
    Globals.Sheet1.Range["B1", "B4"].Columns.AutoFit();
}

Zabezpečení rozhraní .NET Framework

Plná důvěra přímému volajícímu. Částečně zabezpečený kód nemůže tento člen použít. Další informace naleznete v tématu Používání knihoven z částečně důvěryhodného kódu.

Viz také

Referenční dokumentace

WorkbookBase Třída

Microsoft.Office.Tools.Excel – obor názvů

Sdílet prostřednictvím