Kaip automatiškai paprašyti skaitymo kvito siunčiant konkrečius el. laiškus programoje „Outlook“.

„Outlook“ sprendimai Rugsėjis 29, 2025

Siunčiant „Outlook“ el. laiškus, mums leidžiama prašyti, kad būtų patvirtintas skaitymas. Tačiau kažkas netgi nori, kad „Outlook“ galėtų automatiškai paprašyti skaitymo kvito, kai siunčia konkrečius el. laiškus. Šis straipsnis padės tai suprasti naudojant „Outlook VBA“.

Apskritai, jei norite paprašyti skaitymo kvito, turite du būdus. Vienas iš jų yra rankiniu būdu patikrinti parinktį „Prašyti perskaityti kvitą“ naujo pranešimo lange, kaip parodyta šioje ekrano kopijoje:

Kitas yra įgalinti "Visiems išsiųstiems pranešimams, prašyti perskaityti patvirtinimo" skirtuke "Paštas" "Outlook" parinktyse, kaip parodyta paveikslėlyje žemiau:

Tačiau daugelis vartotojų norėtų sukonfigūruoti „Outlook“, kad automatiškai prašytų skaitymo kvito tik tada, kai jie siunčia konkrečius el. laiškus, pvz., atsižvelgiant į laiško temą ar gavėjus ir pan. Čia pristatysime metodą, kaip tai pasiekti naudojant Outlook VBA.

Automatinis skaitymo kvitas užklausa siunčiant konkrečius el

Pačioje pradžioje paleiskite „Outlook“ ir perjunkite į skirtuką „Kūrėjas“.
Tada spustelėkite mygtuką „Visual Basic“, kuris atvers naują langą,
Lange „Visual Basic“ atidarykite „ThisOutlookSession“ projektą ir nukopijuokite šiuos VBA kodus į šį projektą.

Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    If Item.Class = olMail Then
       RequestReciept Item
    End If
End Sub

Sub RequestReciept(NewMail As MailItem)
    Dim Addr As String
    Dim Subj As String
 
    'Replace Addr & Subj with your own desired strings
    Addr = "example@mail.com"
    Subj = "test"
 
    'Specify the email recipients and subject
    If InStr(LCase(NewMail.To), Addr) > 0 And InStr(LCase(NewMail.Subject), Subj) Then
       NewMail.ReadReceiptRequested = True
    End If
End Sub

Po to turite pasirašyti šį kodą ir pakeisti makrokomandos nustatymus, kad įgalintumėte tik skaitmeniniu būdu pasirašytas makrokomandas.
Galų gale galite pabandyti įsitikinti, ar kodas gali veikti normaliai.

Pagrindiniame „Outlook“ lange spustelėkite mygtuką „Naujas el.
Tada galite rašyti el. laišką kaip įprasta, bet pasirinkite gavėjus ir užpildykite temą pagal savo kodus. Mano atveju, gavėjai turėtų įtraukti example@mail.com, o temoje turėtų būti „testas“.
Tada spustelėkite mygtuką „Siųsti“.
Išsiuntę laišką, galite dukart spustelėti, kad jį atidarytumėte. Jo lange eikite į skirtuką „Kūrėjas“ ir spustelėkite „Sukurti šią formą“.
Po to pereikite prie etiketės „(Visi laukai)“ ir pasirinkite „Visi pašto laukai“. Dabar galite slinkti žemyn, kol rasite lauką „Prašyta gauti kvito“. Galite patikrinti, ar kvitas reikalingas, ar ne.

Būkite atsargūs dėl nežinomų el

Šiais laikais kenkėjiški el. laiškai vis labiau plinta. Todėl labai svarbu, kad visi „Outlook“ naudotojai būtų budrūs dėl visų įtariamų el. Be to, taip pat siūloma paimti tvirtą Outlook žalos taisymo įrankis. Jis jums padės, kai būsite įstrigę beviltiškų „Outlook“ pažeidimų.

Autoriaus įvadas:

Shirley Zhang yra duomenų atkūrimo ekspertė DataNumen, Inc., kuri yra pasaulyje duomenų atkūrimo technologijų lyderė, įskaitant pataisyti SQL mdf failą ir „Outlook“ taisymo programinės įrangos produktai. Norėdami gauti daugiau informacijos, apsilankykite WWW.datanumen.com