مشاركة عبر


WorkbookBase.PasswordEncryptionProvider الخاصية

الحصول على اسم موفر خوارزمية التشفير الذي يستخدمه Excel Microsoft المكتب عند تشفير كلمات المرور للمصنف.

مساحة الاسم:  Microsoft.Office.Tools.Excel
التجميع:  Microsoft.Office.Tools.Excel.v4.0.Utilities (في Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

بناء الجملة

'إقرار
Public ReadOnly Property PasswordEncryptionProvider As String
    Get
public string PasswordEncryptionProvider { get; }

قيمة الخاصية

النوع: System.String
اسم الموفر خوارزمية التشفير الذي يستخدمه Excel عند تشفير كلمات المرور للمصنف.

أمثلة

مثال التعليمة البرمجية التالية بفحص القيمة HasPasswordخاصية لتحديد ما إذا كان مصنف هو محمي بكلمة مرور. إذا ليس مصنف محمي بكلمة مرور، ثم يعين المثال Passwordخاصية على كلمة مرور تم الحصول عليها من إدخال مستخدم، ومن ثم استدعاء SetPasswordEncryptionOptionsالأسلوب لتعيين خوارزمية التشفير، قم بتعيين الطول المفتاح وتعيين اسم موفر التشفير وتمكين ملف خاصية التشفير. مثال ثم يقوم بعرض قيم PasswordEncryptionProvider، PasswordEncryptionAlgorithm، PasswordEncryptionKeyLength، و PasswordEncryptionFilePropertiesالخصائص في ورقة عمل Sheet1. Th هو فرض التي أسلوب GetPasswordFromUserInputهو المعرفة في أي مكان آخر.

Th هو المثال هو لتخصيص المستوى مستند.

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();
}

أمن NET Framework.

راجع أيضًَا

المرجع

WorkbookBase الفئة

WorkbookBase الأعضاء

Microsoft.Office.Tools.Excel مساحة الاسم