| Hjem | Hardware | Netværk | Programmering | software | Fejlfinding | systemer | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringssprog
  • Delphi programmering
  • Java programmering
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl programmering
  • Python Programming
  • Ruby Programming
  • Visual Basics Programmering
  •  
    Computer Viden >> Programmering >> Visual Basics Programmering >> Content
    Sådan bruges VBA for Email i Access
    Oprettelse af en e-mail- management program inde i din Microsoft Access-database kan gøre din Access-program mere værdifulde og mere dynamisk. I VBA kan du bruge Microsoft Outlook Object Library til at skabe e-mail og adgang e-mail mapper i Microsoft Outlook. Biblioteket giver dig mulighed for programmering oprette og sende en e-mail uden at skulle åbne Outlook. Brug dette bibliotek til at sende e-mails automatisk til brugere med database oplysninger, der er vigtige for dem . Instruktioner
    1

    Klik på " Database Tools " fanen , klik på " Visual Basic ", og klik på "Indsæt "-menuen. Klik på " Modul " for at indsætte en ny VBA-kode modul.
    2

    Klik på menuen "Funktioner" og klik på "Referencer" . Afkryds feltet ved siden af ​​" Microsoft Outlook Object Library " og klik " OK".
    3

    Opret en ny sub procedure og definere Outlook objekter ved at tilføje følgende VBA-kode : Hej

    Private Sub createEmail ()

    Set outlookApp = CreateObject ( " Outlook.Application " )

    Dim myItem As Object

    Set myItem = outlookApp.CreateItem ( olMailItem )
    4

    Opret en ny e-mail- konto ved at tilføje følgende kode : Hej

    myItem.Subject = " e-mailens emne "

    myItem.Body = " mail "

    myItem.To = " myname@myemail.com "

    myItem.Send
    5

    Rediger det forrige trin , og indtaste en gyldig e-mail løse ved siden af ​​" myItem.To " for at sende e-mailen . Skriv " End Sub " for at afslutte proceduren og tryk på " F5 " for at køre din procedure og sende e-mailen ved hjælp af Outlook .
    6

    Læs email i din indbakke mappe og vise det i din nærmeste vindue ved at skabe følgende sub procedure : Hej

    Private Sub checkEmail ()

    Set OLApp = CreateObject ( " Outlook.Application " )

    Set MAPIs = OLApp.GetNamespace ( " MAPI " )

    Set outlookFolder = MAPIs.GetDefaultFolder ( olFolderInbox )

    For Each myMail I outlookFolder.Items

    Debug.Print myMail.Subject

    Debug.Print myMail . Krop

    Næste myMail

    End Sub
    7

    Tryk på " F5 " for at udføre proceduren.
    < br >

    Forrige :

    næste :
      Relaterede artikler
    ·Tekst til tale i Vb Net 
    ·Sådan oprettes en tom formular med Scrolling Brug VB6 
    ·Hvad er VB.NET 2005 
    ·Sådan bruges VB6 som en SWF Variabel Finder 
    ·Filstørrelse i VB.NET 
    ·Visual Basic Math funktioner Tutorial 
    ·Hvordan man laver en webbrowser med Visual Basic 2005 E…
    ·Sådan bruges modalformer i VB6 
    ·Sådan Udskift Streger i Visual Basic 
    ·Sådan Find det midterste tal med tre tal i VBA 
      Anbefalede Artikler
    ·Unicode Fejl i Python 
    ·Sådan læses en Pipe Separeret Linje Into en Bash Arra…
    ·Sådan Debug Ubuntu 
    ·Sådan Slut VB.NET Med Oracle 
    ·Sådan Konverter SGML til ASN.1 
    ·Hvordan man skriver NetBeans til en fil 
    ·Java 5 Vs . Java 6 
    ·Sådan Input Tilfældige binære tal i C + + 
    ·Hvordan laver Letter Number Boxes på internettet 
    ·Sådan oprettes dato dimensioner i MySQL 
    Copyright © Computer Viden http://www.computerdk.com