WorkbookBase.PasswordEncryptionProvider Eigenschaft
Definition
Wichtig
Einige Informationen beziehen sich auf Vorabversionen, die vor dem Release ggf. grundlegend überarbeitet werden. Microsoft übernimmt hinsichtlich der hier bereitgestellten Informationen keine Gewährleistungen, seien sie ausdrücklich oder konkludent.
Ruft den Namen des Anbieters des Verschlüsselungsalgorithmus ab, den Microsoft Office Excel zum Verschlüsseln der Kennwörter für die Arbeitsmappe verwendet.
public string PasswordEncryptionProvider { get; }
Eigenschaftswert
Der Name des Anbieters des Verschlüsselungsalgorithmus, den Excel zum Verschlüsseln der Kennwörter für die Arbeitsmappe verwendet.
Beispiele
Im folgenden Codebeispiel wird der Wert der- HasPassword Eigenschaft überprüft, um zu bestimmen, ob die Arbeitsmappe Kenn Wort geschützt ist. Wenn die Arbeitsmappe nicht Kenn Wort geschützt ist, wird im Beispiel die Password -Eigenschaft auf ein Kennwort festgelegt, das von der Benutzereingabe abgerufen wurde. Anschließend wird die- SetPasswordEncryptionOptions Methode aufgerufen, um den Verschlüsselungsalgorithmus festzulegen, die Schlüssellänge festzulegen, den Namen des Verschlüsselungs Anbieters festzulegen und die Verschlüsselung der Dateieigenschaften zu aktivieren. Im Beispiel werden dann die Werte der PasswordEncryptionProvider Eigenschaften, PasswordEncryptionAlgorithm , PasswordEncryptionKeyLength und PasswordEncryptionFileProperties in Arbeitsblatt angezeigt Sheet1 . In diesem Beispiel wird davon ausgegangen, dass die Methode GetPasswordFromUserInput an anderer Stelle definiert ist
Dieses Beispiel gilt für eine Anpassung auf Dokument Ebene.
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();
}
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