როგორ შევამოწმოთ დანართები კონკრეტულ გამავალ წერილებში Outlook VBA-ით

ზოგჯერ შეიძლება დაგავიწყდეთ საჭირო დანართების დამატება კონკრეტულ ელფოსტაზე, როგორიცაა ელფოსტა თქვენი ყოველკვირეული სამუშაოების შესახებ. ეს სტატია გასწავლით ამომხტარი გაფრთხილების გააქტიურებას, რათა თავიდან აიცილოთ კონკრეტული წერილების გაგზავნა დანართების გარეშე.

Outlook 2010-ისა და წინა ვერსიებისგან განსხვავებით, Outlook 2013-ს აქვს მშობლიური მხარდაჭერა, რომელიც შეგახსენებთ, როდესაც არ გაქვთ მიმაგრებული ფაილები გამავალ წერილებში. თქვენ შეგიძლიათ ჩართოთ ეს ფუნქცია Outlook Options-ში, როგორიცაა შემდეგი ეკრანის სურათი:

თუ ჩართული გაქვთ ავტომატური გაფრთხილება დაკარგული დანართების შესახებ, ელფოსტის გაგზავნისას ყოველ ჯერზე გამოჩნდება გაფრთხილება. თუმცა, უმეტეს შემთხვევაში, ფაილების მიმაგრება ნამდვილად არ გჭირდებათ. ასეთ შემთხვევებში, გაფრთხილება შემაწუხებელი იქნება. აქ ჩვენ გეტყვით, თუ როგორ ჩართოთ ავტომატური გაფრთხილება, როდესაც კონკრეტულ გამავალ ელფოსტაში დანართები არ არის Outlook VBA-ს საშუალებით.

ავტომატური შემოწმება დანართებისთვის კონკრეტულ გამავალ ელფოსტაში

1. თავიდანვე გაუშვით Outlook და გადადით "დეველოპერი" ჩანართზე.
2. დააჭირეთ ღილაკს "Visual Basic" ჯგუფში "კოდი".
3. შემდეგ ახალ ამომხტარ ფანჯარაში „Microsoft Visual Basic აპლიკაციებისთვის“, თქვენ ორჯერ უნდა დააწკაპუნოთ „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" და დააჭირეთ "მაკრო პარამეტრები" ღილაკს "დეველოპერი" ჩანართში. "ნდობის ცენტრის" დიალოგში, თქვენ უნდა აირჩიოთ მხოლოდ ციფრულად ხელმოწერილი მაკროების ჩართვა. დაიმახსოვრეთ ბოლოს დააწკაპუნეთ "OK".
8. საბოლოოდ შეგიძლიათ სცადოთ. შექმენით ახალი შეტყობინება კონკრეტული მიმღების და თემით, მაგრამ დანართების გარეშე. როდესაც დააჭირეთ ღილაკს "გაგზავნა", თქვენ მიიღებთ ამომხტარ გაფრთხილებას, რომელიც ნაჩვენებია შემდეგ სურათზე:

შეინახეთ თქვენი Outlook მონაცემები დაცული

ვინაიდან ეს Outlook მიდრეკილია კორუფციისკენ, თქვენ უნდა ეცადოთ დაიცვათ თქვენი Outlook მონაცემები. საუკეთესო გზა არის თანმიმდევრული და განახლებული სარეზერვო ასლის შექმნა. აქედან გამომდინარე, თქვენ შეგიძლიათ მარტივად Outlook-ის დაზიანებული მონაცემების აღდგენა სარეზერვო ასლებიდან მაშინაც კი, თუ Outlook-ის მოულოდნელი ავარია განიცადა. გარდა ამისა, თუ სარეზერვო ასლი ვერ მოხერხდა, სამწუხაროდ, თქვენ სხვა არჩევანი არ გაქვთ გარდა გამოცდილი სარემონტო ხელსაწყოს დახმარებისა, როგორიცაა DataNumen Outlook Repair.

ავტორი შესავალი:

შირლი ჟანგი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის SQL db შეცდომის შეკეთება და Outlook სარემონტო პროგრამული პროდუქტები. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად