Jei norite greitai rasti visus el. laiškus, kuriuos persiuntėte kitiems savo „Outlook“, galite perskaityti šį straipsnį. Čia mes pasidalinsime su jumis 2 veiksmingais būdais.
Kaip visi žinome, persiunčiamų el. laiškų piktogramoje yra mėlyna rodyklė dešinėn. Jį lengva atpažinti tarp daugybės el. laiškų. Kartais galbūt norėsite patikrinti visus persiųstus „Outlook“. Šiuo atveju patogumo dėlei turite juos išsiaiškinti ir surinkti toje pačioje vietoje. „Outlook“ nepateikia tiesioginių kriterijų, pagal kuriuos vartotojai galėtų ieškoti persiųstų el. laiškų. Tačiau jūs vis tiek galite tai lengvai pasiekti šiais 2 būdais.
1 būdas: ieškokite persiųstų el. laiškų viename aplanke
- Norėdami pradėti, atidarykite pašto aplanką, pvz., „Gautieji“.
- Tada pereikite prie skirtuko „View“ ir spustelėkite mygtuką „View Settings“.
- Tada iššokančiajame dialogo lange spustelėkite mygtuką „Filtruoti“.
- Vėliau naujame dialogo lange eikite į skirtuką „SQL“.
- Po to pažymėkite parinktį „Redaguoti šiuos kriterijus tiesiogiai. Visi kiti skirtukai bus nepasiekiami“ apačioje.
- Vėliau įdėkite žymeklį į aukščiau esantį laukelį ir nukopijuokite į jį šiuos kriterijus.
http://schemas.microsoft.com/mapi/proptag/0x10810003 = 104
- Galiausiai spustelėkite „Gerai“ seriją, kad išsaugotumėte peržiūros nustatymus.
- Grįžę į aplanką pamatysite, kad ten yra tik persiųsti el. laiškai, kaip parodyta paveikslėlyje toliau.
2 būdas: ieškokite persiųstų el. laiškų visuose aplankuose
- Dėl astart, paleiskite „Outlook VBA“ redaktorių naudodami „Alt + F11“.
- Tada į modulį įdėkite šį VBA kodą.
Sub GetEmailForwardedStatus()
Dim objPSTFolders As Outlook.Folders
Dim objFolder As Outlook.Folder
'Process all folders in your default Outlook file
Set objPSTFolders = Application.Session.GetDefaultFolder(olFolderInbox).Parent.Folders
For Each objFolder In objPSTFolders
If objFolder.DefaultItemType = olMailItem Then
Call ProcessFolders(objFolder)
End If
Next
End Sub
Sub ProcessFolders(ByVal objFolder As Outlook.Folder)
Dim i As Long
Dim objMail As Outlook.MailItem
Dim objForwardedProperty As Outlook.UserProperty
Dim strForwardedStatus As String
Dim objSubFolder As Outlook.Folder
'Get the forwarded status of all mails
For i = objFolder.Items.Count To 1 Step -1
If TypeOf objFolder.Items(i) Is MailItem Then
Set objMail = objFolder.Items(i)
Set objForwardedProperty = objMail.UserProperties.Find("Forwarded", True)
If objForwardedProperty Is Nothing Then
Set objForwardedProperty = objMail.UserProperties.Add("Forwarded", olText, True)
End If
strForwardedStatus = objMail.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x10810003")
If strForwardedStatus = 104 Then
objForwardedProperty.Value = "Yes"
Else
objForwardedProperty.Value = "No"
End If
objMail.Save
End If
Next
'Process subfolders recursively
If objFolder.Folders.Count > 0 Then
For Each objSubFolder In objFolder.Folders
If objSubFolder.DefaultItemType = olMailItem Then
Call ProcessFolders(objSubFolder)
End If
Next
End If
End Sub
- Tada spustelėkite pirmąją paprogramę ir paspauskite klavišą „F5“.
- Tada išeikite iš VBA redaktoriaus.
- Po to pašto aplankų sąraše dešiniuoju pelės mygtuku spustelėkite „Ieškoti aplankų“ ir pasirinkite „Naujas paieškos aplankas“.
- Iššokančiajame dialogo lange pasirinkite „Sukurti pasirinktinį paieškos aplanką“ ir spustelėkite mygtuką „Pasirinkti“.
- Tada dialogo lange „Custom Search Folder“ lauke „Vardas“ įveskite „Persiųsti el. laiškai“ ir spustelėkite mygtuką „Criteria“.
- Vėliau naujausiame dialogo lange perjunkite į skirtuką „Išplėstinė“ ir pridėkite šį filtrą.
- „Persiųsta“ > „yra (tiksliai)“ > „Taip“
- Galiausiai spustelėkite keletą „Gerai“, kad sukurtumėte tokį tinkintą paieškos aplanką.
- Sėkmingai jį sukūrus, šiame paieškos aplanke, čia buvo surinkti visi persiųsti el. laiškai numatytame „Outlook“ duomenų faile, kaip parodyta paveikslėlyje žemiau.
Pabėgkite nuo „Outlook“ duomenų praradimo
Kiekvienam įprastam „Outlook“ vartotojui „Outlook“ duomenų praradimas tikrai nepriimtinas. Todėl būtina atlikti kai kuriuos veiksmingus veiksmus, įskaitant reguliarias PST failų duomenų atsargines kopijas, išmokti naudotis gautųjų taisymo įrankiu, taip pat parengti patikimą ir galingą PST taisymas įrankis, pvz DataNumen Outlook Repair. Su šiais preparatais, net jei PST failas yra sugadintas, vis tiek galite juos lengvai atkurti.
Autoriaus įvadas:
Shirley Zhang yra duomenų atkūrimo ekspertė DataNumen, Inc., kuri yra pasaulyje duomenų atkūrimo technologijų lyderė, įskaitant sugadintas sql ir „Outlook“ taisymo programinės įrangos produktai. Norėdami gauti daugiau informacijos, apsilankykite WWW.datanumen.com







