Outlook VBA көмегімен нақты шығыс хаттардағы тіркемелерді автоматты түрде қалай тексеруге болады

Кейде сіз белгілі бір электрондық поштаға қажет тіркемелерді қосуды ұмытып кетуіңіз мүмкін, мысалы, сіздің апта сайынғы жұмыстарыңыз туралы есеп беруге арналған электрондық пошта хабарлары. Бұл мақала сізге арнайы электрондық хаттарды тіркемелерсіз жіберуге жол бермеу үшін қалқымалы ескертуді белсендіруге үйретеді.

Outlook 2010 және оның алдыңғы нұсқаларынан айырмашылығы, Outlook 2013 бағдарламасында шығыс хаттарға файлдар қосылмаған кезде еске салатын жергілікті қолдау бар. Бұл мүмкіндікті Outlook опцияларында келесі скриншот сияқты қосуға болады:

Тіркемелердің жоқтығы туралы автоматты ескертуді қосқан кезде, электрондық пошта жіберген сайын ескерту пайда болады. Бірақ көп жағдайда файлдарды тіркеудің қажеті жоқ. Мұндай жағдайларда ескерту тітіркендіргіш болады. Мұнда біз сізге Outlook VBA арқылы белгілі бір шығыс электрондық пошталарында тіркемелер болмаған кезде автоматты ескертуді қалай қосу керектігін айтамыз.

Нақты шығыс хаттардағы тіркемелерді автоматты түрде тексеру

1. Бастапқыда Outlook бағдарламасын іске қосып, «Әзірлеуші» қойындысына ауысыңыз.
2. «Код» тобындағы «Visual Basic» батырмасын басыңыз.
3. Содан кейін «Microsoft Visual Basic for Applications» жаңа қалқымалы терезесінде оны ашу үшін «ThisOutlookSession» жобасын екі рет басу керек.
4. Содан кейін келесі кодтарды «ThisOutlookSession» жобасына көшіру керек.

Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim strMsg As String
    Dim intAns As Integer
 
    If Item.Class <> olMail Then
       Exit Sub
    End If
 
    'Specify the Email Recipient and Subject
    If InStr(LCase(Item.To), "test") > 0 And InStr(LCase(Item.Subject), "worklog") > 0 Then
       If Item.Attachments.Count = 0 Then
          strMsg = "Do you want to send the email without attachments?"
          intAns = MsgBox(strMsg, vbYesNo + vbDefaultButton2 + vbExclamation, "Check for Missing Attachments")
          If intAns = vbNo Then
             Cancel = True
          End If
       End If
    End If
End Sub

5. Әрі қарай құралдар тақтасындағы сақтау белгішесін басыңыз.
6. Осыдан кейін сіз осы кодқа қол қоюға кірісуіңіз керек.

• Алдымен сіз сандық сертификат жасауыңыз керек. MS Office бағдарламасы кіріктірілген утилитамен бірге келеді – «VBA жобаларына арналған сандық сертификат». Оны «Бастау мәзірінде» «vba» деп іздеу арқылы таба аласыз.
• Осыдан кейін кодқа қол қою үшін «визуалды негізгі» терезеге оралыңыз.

7. Осыдан кейін «Visual Basic» -тен шығып, «Әзірлеуші» қойындысының астындағы «Макропараметрлер» батырмасын басыңыз. «Сенім орталығы» диалогтық терезесінде тек сандық қолтаңбалы макростарды қосу үшін таңдау керек. Соңғы рет «ОК» батырмасын басуды ұмытпаңыз.
8. Соңында сіз көріңіз. Белгілі бір алушы мен тақырыбы бар, бірақ тіркемесіз жаңа хабарлама жасаңыз. «Жіберу» батырмасын басқан кезде сіз келесі суретте көрсетілген қалқымалы ескерту аласыз:

Outlook деректерін қорғалған күйде ұстаңыз

Outlook бүлінуге бейім болғандықтан, сіз Outlook деректерін қорғауға күш салуыңыз керек. Ең жақсы әдіс - дәйекті және заманауи сақтық көшірме жасау. Демек, сіз оңай жасай аласыз бүлінген Outlook деректерін қалпына келтіру сақтық көшірмелерден, тіпті күтпеген Outlook апатына ұшыраса да. Сонымен қатар, егер сақтық көшірме сәтсіздікке ұшыраса, тәжірибелі жөндеу құралы сияқты көмекке жүгінуден басқа таңдауыңыз жоқ DataNumen Outlook Repair.

Автордың кіріспесі:

Ширли Чжан - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. SQL db қатесін жөндеу және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com