Datamaskin
  | Hjem | Hardware | Nettverk | Programmering | Software | Feilsøking | Systems | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringsspråk
  • Delphi Programming
  • Java Programming
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl Programming
  • Python Programming
  • Ruby Programming
  • Visual Basics Programming
  •  
    Datamaskin >> Programmering >> Visual Basics Programming >> Content
    Hvordan bruke VBA for e-post i Access
    Opprette en e- management program inni Microsoft Access database kan gjøre Access-programmet mer verdifulle og mer dynamisk . I VBA kan du bruke Microsoft Outlook Object Library for å lage e-post og tilgang til e-mapper i Microsoft Outlook. Biblioteket kan du programmatisk opprette og sende en e-post uten å måtte åpne Outlook. Bruk dette biblioteket for å sende e-post automatisk til brukere med databasen informasjon som er viktig for dem . Instruksjoner
    en

    Klikk på " Database Tools "-kategorien , klikk på " Visual Basic ", og klikk på " Insert"-menyen . Klikk på " Module " for å sette inn en ny VBA-kode modul .
    2

    Klikk på " Verktøy "-menyen og klikk på "Referanser" . Kryss av i boksen ved siden av " Microsoft Outlook Object Library " og klikk " OK" .
    3

    Opprett en ny sub prosedyre til og definere Outlook objekter ved å legge til følgende VBA -kode:

    Private Sub createEmail ( )

    Sett outlookApp = CreateObject ( " Outlook.Application ")

    Dim myItem som objekt

    Set myItem = outlookApp.CreateItem ( olMailItem )
    4

    Opprett en ny e- post ved å legge følgende kode:

    myItem.Subject = " e- emne "

    myItem.Body = " postmelding "

    myItem.To = " myname@myemail.com "

    myItem.Send
    5

    Rediger forrige trinn , og angi en gyldig e- ta ved siden av " myItem.To " for å sende e-posten. Skriv " End Sub " for å avslutte prosedyren og trykk " F5 " for å kjøre prosedyren og sende e-post med Outlook .
    6

    Les e-post i innboksen og vise den i vinduet som vises ved å skape følgende delprosedyre : en

    Private Sub checkEmail ( )

    Sett OLApp = CreateObject ( " Outlook.Application ")

    Set MAPIs = OLApp.GetNamespace ( " MAPI ")

    Set outlookFolder = MAPIs.GetDefaultFolder ( olFolderInbox )

    Hver mymail I outlookFolder.Items

    Debug.Print myMail.Subject

    Debug.Print mymail . Body

    Neste mymail

    End Sub
    7

    Trykk " F5 " for å utføre prosedyren.

    früher :

     Weiter:
      Relatert Artike
    ·Hvordan endre en Grid Color 
    ·Slik Sync Services Ved hjelp av WCF 
    ·Hvordan få en brukerprofil i VBS 
    ·Hvordan overføre data fra en form til en Query Tilgang…
    ·Feil å logge inn på tekstfil for en VB.NET Applicatio…
    ·Hjelp for VB6 Internet Transfer Control 
    ·Slik endrer du skrift for Treeview i Vb.Net 
    ·Hvordan lage en vitenskapelig kalkulator i Visual Basic…
    ·ADO SQL Server Tutorial 
    ·Hvordan bruke Visual Basic Coding 
      Anbefalte artikler
    ·Hvordan bruke Adobe Acrobat PDF -filer i en Delphi Appl…
    ·Hvordan lage en blinkende grensen på DIV 
    ·Forskjellen mellom Cake Auth & ACL 
    ·Hvordan legge til Påminnelse Kommentarer ved hjelp av …
    ·Fordelene ved CMP Over BMP 
    ·Hva er SQL CLS 
    ·Slik fjerner du Coredata iPhone Emulator 
    ·Slik konverterer Excel makroer Net 
    ·Hva er en sparsom Array i MATLAB 
    ·Hvordan skrive en abstrakt klasse i Java 
    Copyright ©  Datamaskin  http://www.datamaskin.biz/