كيفية القيام بما يلي: منع Outlook من عرض منطقة نموذج

مقالة
11/01/2010

ينطبق على
تنطبق المعلومات الموجودة في هذا الموضوع فقط على أنواع المشاريع وإصدارات Microsoft Office التالية: لمزيد من المعلومات، راجع الميزات المتوفرة بواسطة تطبيقات Office و نوع المشروع. نوع المشروع مشروعات على مستوى التطبيق إصدار Microsoft Office Outlook 2007 Outlook 2010

تنطبق المعلومات الموجودة في هذا الموضوع فقط على أنواع المشاريع وإصدارات Microsoft Office التالية: لمزيد من المعلومات، راجع الميزات المتوفرة بواسطة تطبيقات Office و نوع المشروع.

نوع المشروع

مشروعات على مستوى التطبيق

إصدار Microsoft Office

Outlook 2007
Outlook 2010

قد تكون هناك حالات حيث لا تريد Microsoft Office Outlook أن تعرض منطقة نموذج لعنصر معين. على سبيل المثال، إذا كان عنصر جهة الاتصال لا يحتوي على عنوان عمل، يمكنك منع منطقة نموذج تعرض موقع العمل في مخطط من الظهور.

لمنع Outlook من عرض منطقة نموذج

قم بفتح ملف التعليمات البرمجية لمنطقة النموذج الذي تريد تعديله.
قم بتوسيع منطقة التعليمات البرمجية مصنع منطقة النموذج.
قم بإضافة تعليمات برمجية إلى معالج الأحداث FormRegionInitializing الذي يقوم بتعيين الخاصية Cancel من الفئة FormRegionInitializingEventArgs إلى true.

في هذا المثال، إذا لم يتضمن عنصر جهة الاتصال عنواناً، يتم تعيين الخاصية Cancel إلى true، ولا تظهر منطقة النموذج.

مثال

Private Sub MapItFactory_FormRegionInitializing(ByVal sender As Object, ByVal e As Microsoft.Office.Tools.Outlook.FormRegionInitializingEventArgs) Handles Me.FormRegionInitializing

    Dim myItem As Outlook.ContactItem = CType(e.OutlookItem, Outlook.ContactItem)

    If Not (myItem Is Nothing) Then
        If Not (myItem.BusinessAddress Is Nothing) AndAlso myItem.BusinessAddress.Trim().Length > 0 Or (Not (myItem.HomeAddress Is Nothing) AndAlso myItem.HomeAddress.Trim().Length > 0) Or (Not (myItem.OtherAddress Is Nothing) AndAlso myItem.OtherAddress.Trim().Length > 0) Then
            Return
        End If
    End If

    e.Cancel = True

End Sub

private void MapItFactory_FormRegionInitializing(object sender,
    Microsoft.Office.Tools.Outlook.FormRegionInitializingEventArgs e)
{
    Outlook.ContactItem myItem = (Outlook.ContactItem)e.OutlookItem;

    if (myItem != null)
    {
        if ((myItem.BusinessAddress != null &&
                myItem.BusinessAddress.Trim().Length > 0) ||
            (myItem.HomeAddress != null && 
                myItem.HomeAddress.Trim().Length > 0) ||
            (myItem.OtherAddress != null && 
                myItem.OtherAddress.Trim().Length > 0))
        {
            return;
        }
    }

    e.Cancel = true;
}