2 lihtsat meetodit ainult Outlooki meili tavalise või Interneti-päise printimiseks

Mõnikord on vaja printida ainult Outlooki e-kirja tavalist või internetipäist. Nüüd jagab see postitus teiega kahte kiiret ja lihtsat lähenemisviisi.

Eelmisest artiklist – “2 näpunäidet Outlooki meili ilma päise ja kasutajanimeta printimiseks“, saate õppida lihtsaid viise, kuidas printida ainult kirja sisu. Kuid mõnikord võite soovida lihtsalt printida meili tavalise või Interneti-päise, nimelt meili saatja, saajate ja muu teabe. Nii et edaspidi õpetame teile selle saamiseks kahte meetodit.

1. meetod: printige käsitsi

Interneti-päise printimine

  1. Esmalt topeltklõpsake e-kirja, et avada see sõnumiaknas.
  2. Seejärel minge menüüsse "Fail".
  3. Klõpsake vahekaardil „Teave” nuppu „Atribuudid”.Meili atribuudid
  4. Klõpsake aknas "Atribuudid" kasti "Interneti päised".
  5. Järgmisena vajutage kõigi valimiseks "Ctrl + A" ja täielike päiste kopeerimiseks "Ctrl + C".Kopeerige Interneti-päised
  6. Hiljem looge uus e-kiri ja vajutage päiste kehasse kleepimiseks klahvikombinatsiooni Ctrl + V.Kleebi Interneti-päised
  7. Lõpuks avage uue kirja printimiseks "Fail" > "Prindi".

Printige tavaline päis

  1. Alustuseks valige või avage lähtemeil.
  2. Seejärel klõpsake nuppu "Edasta".
  3. Hüpikaknas e-kirjade edasisaatmine valige ja eemaldage algse kirja keha, et jätta ainult päis, nagu järgmine ekraanipilt.Ainult päise jätmiseks eemaldage algne sõnumi sisu
  4. Lõpuks printige praegune edasisuunamiskiri nagu tavaliselt.

2. meetod: printige VBA-ga

Interneti-päise printimine

  1. Alustuseks avage või valige soovitud e-kiri.
  2. Seejärel käivitage Outlooki VBA redaktor, kasutades "Alt + F11".
  3. Järgmisena sisestage järgmine kood moodulisse.
Sub PrintFullHeaders()
    Dim objMail As Outlook.MailItem
    Dim objPropertyAccessor As Outlook.PropertyAccessor
    Dim strHeader As String
    Dim objTempMail As Outlook.MailItem
 
    Select Case Outlook.Application.ActiveWindow.Class
           Case olInspector
                Set objMail = ActiveInspector.CurrentItem
           Case olExplorer
                Set objMail = ActiveExplorer.Selection.Item(1)
    End Select
 
    'Get full headers
    Set objPropertyAccessor = objMail.PropertyAccessor
    strHeader = objPropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x007D001E")
 
    'Print headers in temp mail
    Set objTempMail = Outlook.Application.CreateItem(olMailItem)
    objTempMail.HTMLBody = "<HTML><BODY>" & strHeader & "</BODY></HTML>"
    objTempMail.PrintOut
End Sub

VBA kood – Interneti-päise printimine

  1. Lõpuks klõpsake tööriistaribal ikooni "Käivita".
  2. Kohe prinditakse välja meili Interneti-päis.Prinditud Interneti-päis

Printige tavaline päis

  1. Ikka VBA redaktoris, kopeerige allolev kood moodulisse.
Sub PrintShortHeaders()
    Dim objMail As Outlook.MailItem
    Dim objTempMail As Outlook.MailItem
 
    Select Case Outlook.Application.ActiveWindow.Class
           Case olInspector
                Set objMail = ActiveInspector.CurrentItem
           Case olExplorer
                Set objMail = ActiveExplorer.Selection.Item(1)
    End Select
 
    Set objTempMail = objMail.Copy
    'Remove the body, leave headers only
    objTempMail.Body = ""
    objTempMail.PrintOut
End Sub

VBA kood – prindi tavaline päis

  1. Pärast seda käivitage see makro.
  2. Kohe prinditakse e-kirja tavaline päis.Prinditud tavaline päis

Olge tundmatute kirjade eest

Päised võivad paljastada palju e-kirja kohta käivat teavet, sealhulgas IP-aadressid. Kui soovite tuvastada, kas e-kiri on kahtlane, tuleb päiseid kontrollida. Ausalt öeldes on soovitatav mitte usaldada tundmatute saatjate e-kirju, kuna enamik neist on rämpspost ja sisaldavad isegi pahatahtlikke makrosid. Nad võivad teie Outlooki faili hõlpsalt rünnata. Kui Outlooki fail on rikutud, peate tegema pingutusi, et proovida Outlooki parandamine. See on üsna sõlmeline, kui te ei kasuta professionaalset ja tugevat tööriista, näiteks DataNumen Outlook Repair.

Autori sissejuhatus:

Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas SQL Server korruptsioon ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.