Πώς να διαβάσετε μηνύματα ηλεκτρονικού ταχυδρομείου χρησιμοποιώντας VBA

Γνωρίζοντας πώς να διαβάσετε e-mail μέσω μιας εφαρμογής Microsoft Access χρησιμοποιώντας τη Visual Basic for Applications ( VBA ) μπορεί να σας βοηθήσει να κάνουν τις εφαρμογές πιο φιλική προς το χρήστη . Η Microsoft Access είναι ένα σχεσιακό σύστημα διαχείρισης βάσεων δεδομένων που χρησιμοποιείται συχνά για μικρές , τοπικές βάσεις δεδομένων . Το Outlook είναι ένα σύστημα διαχείρισης e-mail που περιλαμβάνονται στη σουίτα Microsoft Office . VBA είναι μια γλώσσα προγραμματισμού ηλεκτρονικών υπολογιστών . Σε μερικά βήματα , μπορείτε να μάθετε και να γράφουν κώδικα VBA για να διαβάσετε στοιχεία του Outlook e-mail . Οδηγίες
Η

1 Ανοίξτε το Microsoft Access 2007 . Κάντε κλικ στο " Εργαλεία βάσης δεδομένων " και επιλέξτε " Visual Basic ". Επιλέξτε από το μενού "Εργαλεία" και κάντε κλικ στο "Αναφορές ". Επιλέξτε το πλαίσιο δίπλα στην επιλογή " Microsoft Outlook ( αριθμός έκδοσης ) Object Library". Κάντε κλικ στο " OK". 2

Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στη νέα λειτουργική μονάδα σας . Ο κωδικός θα διαβάσει το φάκελο "Εισερχόμενα" στο e-mail Microsoft Outlook και να εμφανίσει το θέμα και το σώμα μέσα από ένα πλαίσιο μηνύματος .

Private Sub ReadOutlookMail ( )

Σετ otlkApp = CreateObject ( " Outlook.Application » )

Σετ MAPISpace = otlkApp.GetNamespace ( " MAPI " )

Set otlkFolder = MAPISpace.GetDefaultFolder ( olFolderInbox )

For Each MailItem Σε otlkFolder.Items

MsgBox " Θέμα : " & MailItem.Subject & "Body : " & MailItem.body

Επόμενο MailItem

End Sub
εικόνων 3

Πατήστε το πλήκτρο " F5 " για να εκτελέσετε το " ReadOutlookMail " υπορουτίνα .
Η
εικόνων