Prieiga prie AIP etikečių „Outlook VBA“: išsamus vadovas

Prieiga prie AIP etikečių „Outlook VBA“: išsamus vadovas
Prieiga prie AIP etikečių „Outlook VBA“: išsamus vadovas
Raphael Thomas
2024 m. gegužės 3 d., penktadienis 20:48:21

Naršykite AIP etiketės tikrinimą programoje „Outlook“ per VBA

Šiuolaikinėje verslo aplinkoje galimybė programiškai pasiekti el. pašto ypatybes yra labai svarbi norint išlaikyti duomenų saugumą ir atitiktį. „Microsoft Outlook“, suporuota su „Visual Basic for Applications“ (VBA), leidžia atlikti platų pritaikymą ir automatizavimą. Ypatingas iššūkis iškyla, kai naudotojams reikia patikrinti „Azure Information Protection“ (AIP) etiketes, prisegtas prie gaunamų el. laiškų, kad būtų užtikrinta saugos politika arba suaktyvinamas konkrečias darbo eigas.

Tačiau „Outlook VBA“ iš esmės nepalaiko prieigos prie „SensitivityLabel“ ypatybės, kuri yra lengvai pasiekiama „Excel VBA“ ir naujesniame „JavaScript“ papildinio modelyje. Dėl šio apribojimo reikia alternatyvių metodų, leidžiančių gauti AIP etiketės informaciją tiesiogiai neanalizuojant el. laiškų antraščių, o tai gali būti sudėtinga ir gali sukelti klaidų.

komandą apibūdinimas
Application.ActiveExplorer.Selection.Item(1) Parenka pirmąjį elementą dabartiniame „Outlook“ pasirinkime. Paprastai naudojamas VBA darbui su šiuo metu pasirinktu el.
PropertyAccessor.GetProperty() Nuskaito konkrečią ypatybę iš „Outlook“ pašto elemento naudojant MAPI nuosavybės žymą. Naudojama čia norint pasiekti el. pašto antraštes.
Office.onReady() Inicijuoja funkciją, kai įkeliamas ir paruoštas „Office“ priedas, užtikrinant, kad pagrindinė programa būtų paruošta paleisti Office.js scenarijus.
loadCustomPropertiesAsync() Asinchroniškai įkelia pasirinktines ypatybes, susijusias su el. pašto elementu programoje „Outlook“, naudojant Office.js. Raktas norint pasiekti nestandartinius el. pašto duomenis, pvz., AIP etiketes prieduose.
console.log() Išveda informaciją į žiniatinklio konsolę, naudingą derinant „JavaScript“ programas. Čia jis registruoja gautą etiketę.
Chr(10) Grąžina simbolį, atitinkantį ASCII kodą 10, kuris yra eilutės tiekimo (LF) simbolis, naudojamas eilučių pertraukoms rasti el. laiškų antraštėse.

Išsami scenarijaus funkcionalumo analizė AIP etikečių gavimui

Pateikti scenarijai yra praktiškas sprendimas, kaip pasiekti „Azure Information Protection“ (AIP) etiketes el. laiškuose – funkcija, kuri nėra tiesiogiai pasiekiama per „Outlook VBA“, tačiau yra labai svarbi atitikties ir saugos priemonėms. Pirmasis scenarijus naudoja VBA programoje „Outlook“, kur jis išnaudoja Application.ActiveExplorer.Selection.Item komanda, kad pasirinktumėte šiuo metu vartotojo paryškintą el. Šis scenarijus naudoja PropertyAccessor.GetProperty metodas su iš anksto nustatyta MAPI ypatybės žyma, kad būtų gautos visos el. laiškų antraštės, kuriose gali būti saugoma slapta etiketės informacija.

Antrasis scenarijus pabrėžia Office.js sistemos naudojimą siekiant pagerinti funkcionalumą šiuolaikinėse Outlook aplinkose. Čia, Office.onReady funkcija užtikrina, kad scenarijus būtų vykdomas tik tada, kai „Office“ pagrindinė programa bus visiškai įkelta, todėl užtikrinamas suderinamumas ir patikimumas. Tada jame dirba loadCustomPropertiesAsync metodas, skirtas asinchroniškai gauti pasirinktines ypatybes, galbūt įskaitant AIP etiketes, pridėtas prie el. laiško. Šis metodas ypač naudingas aplinkoje, kur reikalingas patobulintas duomenų tvarkymas, nepažeidžiant sinchroninių skambučių naudotojo patirties.

Skriptų AIP etikečių gavimas programoje „Outlook“.

VBA naudojimas el. pašto metaduomenų išgavimui

Dim oMail As Outlook.MailItem
Dim oHeaders As Outlook.PropertyAccessor
Const PR_TRANSPORT_MESSAGE_HEADERS As String = "http://schemas.microsoft.com/mapi/proptag/0x007D001E"
Dim labelHeader As String
Dim headerValue As String

Sub RetrieveAIPLabel()
    Set oMail = Application.ActiveExplorer.Selection.Item(1)
    Set oHeaders = oMail.PropertyAccessor
    headerValue = oHeaders.GetProperty(PR_TRANSPORT_MESSAGE_HEADERS)
    labelHeader = ExtractLabel(headerValue)
    MsgBox "The AIP Label ID is: " & labelHeader
End Sub

Function ExtractLabel(headers As String) As String
    Dim startPos As Integer
    Dim endPos As Integer
    startPos = InStr(headers, "MSIP_Label_")
    If startPos > 0 Then
        headers = Mid(headers, startPos)
        endPos = InStr(headers, Chr(10)) 'Assuming line break marks the end
        ExtractLabel = Trim(Mid(headers, 1, endPos - 1))
    Else
        ExtractLabel = "No label found"
    End If
End Function

„JavaScript“ priedo kūrimas etikečių tikrinimui

„Office JS“ API naudojimas patobulintam el. pašto tvarkymui

Office.onReady((info) => {
    if (info.host === Office.HostType.Outlook) {
        retrieveLabel();
    }
});

function retrieveLabel() {
    Office.context.mailbox.item.loadCustomPropertiesAsync((result) => {
        if (result.status === Office.AsyncResultStatus.Succeeded) {
            var customProps = result.value;
            var label = customProps.get("MSIP_Label");
            if (label) {
                console.log("AIP Label: " + label);
            } else {
                console.log("No AIP Label found.");
            }
        } else {
            console.error("Failed to load custom properties: " + result.error.message);
        }
    });
}

Saugumo didinimas naudojant el. pašto metaduomenų analizę

El. pašto metaduomenys įmonės aplinkoje gali atlikti pagrindinį vaidmenį palaikant saugumą ir užtikrinant, kad būtų laikomasi taisyklių. Prieiga prie šių duomenų, ypač susijusių su slaptos informacijos etiketėmis, pvz., AIP, gali suteikti IT skyriams galimybę efektyviai automatizuoti ir pritaikyti saugos priemones. Ši prieiga yra labai svarbi siekiant užkirsti kelią duomenų nutekėjimui ir užtikrinti, kad neskelbtina informacija būtų tinkamai suskirstyta į kategorijas ir apsaugota per visą jos gyvavimo ciklą.

Aplinkose, kuriose naudojamos senos sistemos, pvz., Outlook VBA, norint pasiekti tokius metaduomenis reikia kūrybiškų sprendimų, nes trūksta tiesioginio naujesnių savybių palaikymo SensitivityLabel. Dėl šios spragos dažnai reikia naudoti papildomus programavimo ar trečiųjų šalių įrankius, kad būtų galima sujungti senesnių ir naujesnių technologijų funkcijas įmonės nustatymuose.

Dažnai užduodami klausimai apie el. pašto etikečių valdymą programoje „Outlook“.

  1. Kas yra AIP etiketė?
  2. Azure Information Protection (AIP) etiketės naudojamos dokumentams ir el. laiškams klasifikuoti ir apsaugoti pritaikant etiketes.
  3. Ar Outlook VBA gali tiesiogiai pasiekti AIP etiketes?
  4. Ne, Outlook VBA tiesiogiai nepalaiko SensitivityLabel nuosavybė, naudojama AIP etiketėms pasiekti. Reikalingi alternatyvūs metodai, pvz., antraščių analizė.
  5. Ką daro PropertyAccessor.GetProperty komandą daryti?
  6. Ši komanda nuskaito konkrečią ypatybę iš objekto, pvz., el. laiško programoje „Outlook“, naudodama jos MAPI nuosavybės žymą.
  7. Ar yra „JavaScript“ pagrįstas sprendimas šiuolaikinėms „Outlook“ versijoms?
  8. Taip, šiuolaikinis „JavaScript“ pagrindu sukurtas „Outlook“ papildinio modelis leidžia pasiekti šias ypatybes per Office.js biblioteką.
  9. Kaip „Outlook“ galima asinchroniškai pasiekti tinkintas el. pašto ypatybes?
  10. Naudojant loadCustomPropertiesAsync Office.js metodą, kuris nuskaito pasirinktines ypatybes neužblokuodamas vartotojo sąsajos.

Paskutinės mintys apie el. pašto saugumo pagerinimą programoje „Outlook“.

Nors tiesioginis AIP etikečių valdymas pasenusioje „Outlook“ naudojant VBA yra sudėtingas, aptartos strategijos yra veiksmingos problemos sprendimo būdai. Naudodamos „Outlook VBA“, skirtą antraštėms analizuoti, ir „Office.js“ tinkintoms ypatybėms tvarkyti šiuolaikinėje aplinkoje, organizacijos gali užtikrinti, kad jų el. pašto saugos protokolai išliktų patikimi ir pritaikomi prie besikeičiančių atitikties reikalavimų. Šis dvejopas požiūris pabrėžia poreikį lanksčiai valdyti el. pašto saugumą įvairiose technologinėse ekosistemose.