Ako získať prístup k 2007 VBA e - mailu

Visual Basic for Applications ( VBA ) je programovací jazyk , ktorý je používaný v aplikáciách balíka Office pre automatizáciu rutinných úloh . Môžete ľahko písať kód VBA na vyhľadanie konkrétnej prílohu vo vašej e - mailovej schránky zložku a uložte ho do zložky podľa vášho výberu . Pokyny dovolená 1

Spustite program Microsoft Access 2007 , vyberte " databázové nástroje " kartu a kliknite na " Visual Basic " . Zvoľte menu " Nástroje " a kliknite na " Odkazy " . Zaškrtnite políčko vedľa " Microsoft Outlook Knižnica 12.0 Object " a kliknite na " OK "
2

Zadajte nasledujúci vytvoriť nový sub : .

Sub getEemailAttachment ( ) klipart

Zadajte " Enter " pre vytvorenie " End Sub " automaticky
3

Zadajte nasledujúce deklarovať svoje premenné , ktoré budú použité pre prístup k príloh Outlook : .

Dim nmSp ako menný priestor

Dim oInbxFldr ako MAPIFolder

Dim objMailItems As Object

Dim emailAttachment ako Outlook.Attachment
4

typu nasledujúce definovať menný priestor a definovať premennú držať priečinok Doručená pošta programu Outlook :

Set nmSp = GetNamespace ( " MAPI " )

Set oInbxFldr = nmSp.GetDefaultFolder ( olFolderInbox )

5

Zadajte nasledujúce slučka cez všetky svoje prílohy a uložiť prílohu na " C : \\ " , keď je zistené :

každý objMailItems V oInbxFldr.Items

každý emailAttachment V objMailItems.attachments

Ak emailAttachment.FileName = " myAttachment.doc " Tak

emailAttachment.SaveAsFile " C : \\ " & attachmentFileName

End If

Ďalšie emailAttachment

Ďalšie objMailItems

môžete nahradiť " myAttachment.doc " s názvom vašej prílohy v nasledujúci riadok :

Ak emailAttachment.FileName = " myAttachment . doc "
6

zadajte nasledujúce uvoľniť svoje premenné z pamäti :

Set emailAttachment = Nothing

Nastaviť objMailItems = Nothing

Set nmSp = Nothing

• Predchádzajúca strana: Ako exportovať prístup k dátam na SQL 
• Ďalšia strana: Ako sa pripojiť k Access DB v jazyku Visual Basic Net