|  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Visual Basics Programmering >> Content

    Hur man kan få ett 2007 VBA Email Attachment

    Visual Basic for Applications ( VBA ) är ett programmeringsspråk som vanligen används i Office-program för att automatisera rutinuppgifter . Du kan enkelt skriva VBA-kod för att söka efter en viss anslutningspunkt i din inkorg och spara den i en mapp som du väljer . Instruktioner
    1

    Starta Microsoft Access 2007 , välj " Databas Verktyg " fliken och klicka på " Visual Basic " . Välj " Verktyg " -menyn och klicka på " Referenser " . Markera rutan bredvid " Microsoft Outlook 12.0 Object Library " och klicka " OK "
    2

    Skriv följande för att skapa en ny sub : .

    Sub getEemailAttachment ( ) katalog

    Type " Enter " för att skapa " End Sub " automatiskt Addera 3

    Skriv följande för att deklarera dina variabler som kommer att användas för att komma åt dina Outlook bilagor : .
    < p > Dim NMSP Som namespace

    Dim oInbxFldr Som MAPIFolder

    Dim objMailItems As Object

    Dim emailAttachment Som Outlook.Attachment
    4

    Skriv efter att definiera ditt namespace och definiera variabeln för att hålla Outlook inkorgen :

    Set NMSP = GetNamespace ( " MAPI " ) katalog

    Set oInbxFldr = nmSp.GetDefaultFolder ( olFolderInbox ) katalog
    5

    Skriv följande för att loopa igenom alla dina bilagor och spara din anknytning till " C : \\ " när det hittas :

    för varje objMailItems i oInbxFldr.Items

    för varje emailAttachment I objMailItems.attachments
    p Om emailAttachment.FileName = " myAttachment.doc " Då

    emailAttachment.SaveAsFile " C : \\ " & attachmentFileName

    End If
    < p > Nästa emailAttachment

    Nästa objMailItems

    Du kan byta ut " myAttachment.doc " med namnet på din infästning i följande rad :
    p Om emailAttachment.FileName = " myAttachment . doc "
    6

    Skriv följande för att frigöra dina variabler från minnet :

    Set emailAttachment = Nothing

    Set objMailItems = Nothing

    Set NMSP = Nothing

    Tidigare:

    nästa:
    relaterade artiklar
    ·Vad är Visual Basic Sub rutiner
    ·Hur man läser text mellan två HTML-taggar i Visual Ba…
    ·Lägga till en lokal skrivare Använda Script
    ·Hur till låsa upp ett konto Script
    ·Vad är en Visual Basic DataGrid
    ·VB6 Strängfunktioner
    ·Hur man gör en kvadratiska formel Programmet på en TI…
    ·Vad kan jag använda för att fylla Data textrutor i en…
    ·Hur gör jag Kompilera och köra mina Vb.Net filer i Vi…
    ·Hur man kopplar Visual Basic
    Utvalda artiklarna
    ·Hur tar jag en sträng från en indatafil och vända de…
    ·Hur man skriver ut listor i Python
    ·Hur man gör en ögla Line
    ·Konvertera en dubbel att flyta i Java utan att förlora…
    ·Konvertera Int till Real i SML
    ·Skriva ut till en specifik skrivare i VB.NET
    ·Hur Java stöder Software Återanvändning
    ·PHP Error : Undefined offset
    ·Styra en webbsida i PHP
    ·ASP.NET projekt och kodning i C
    Copyright © Dator Kunskap http://www.dator.xyz