مشاركة عبر

WorkbookBase.PasswordEncryptionFileProperties الخاصية

  • مقالة

الحصول على القيمة تشير إلى ما إذا كان Microsoft المكتب Excel بتشفير خصائص الملف للمصنف محمي بكلمة مرور معينة.

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

بناء الجملة

'إقرار
Public ReadOnly Property PasswordEncryptionFileProperties As Boolean
    Get

public bool PasswordEncryptionFileProperties { get; }

قيمة الخاصية

النوع: System.Boolean
trueإذا كان Excel بتشفير ملف خصائص المحددة محمية بكلمة مرور مصنف؛ وإلاfalse.

ملاحظات

استخدام SetPasswordEncryptionOptionsأسلوب إلى تحديد ما إذا كان 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 مساحة الاسم