Πώς να δημιουργήσετε και Αποστολή Αυτόματη Έκθεση Microsoft Access σε Microsoft Outlook

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

Επιλέξτε την έκθεση που θέλετε να στείλετε στον παραλήπτη . Μπορείτε να επιλέξετε μια έκθεση χρησιμοποιώντας τον ακόλουθο κώδικα :

Set Η έκθεση παρουσίασε = db.OpenRecordset ( " Η έκθεση παρουσίασε Επιλέξτε από την έκθεση όπου id = 2 " )

Ο παραπάνω κώδικας ανακτά μια έκθεση με ID 2 . 2

Δημιουργήστε ένα αντικείμενο email . Το αντικείμενο ηλεκτρονικού ταχυδρομείου έχει οριστεί σε μια εφαρμογή του Microsoft Outlook . Ο παρακάτω κώδικας δημιουργεί ένα αντικείμενο αλληλογραφίας που χρησιμοποιείται για την αποστολή της έκθεσης μέσω του Outlook :

Set app = Νέα Outlook.ApplicationSet email = app.CreateItem ( )
εικόνων 3

Ρυθμίστε το ιδιότητες email , συμπεριλαμβανομένων του θέματος , το σώμα και την πρόσβαση συνημμένο έκθεση . Ο παρακάτω κώδικας ορίζει τις ιδιότητες ηλεκτρονικού ταχυδρομείου σας ορατό στο email του παραλήπτη :

email.subject = " έκθεση για το πρωί 1/1/2010 " email.Recipients.Add " recipient@domain.com " email.Body = " Παρακαλώ δείτε το συνημμένο έκθεσή σας " email.Attachments.Add η έκθεση παρουσίασε , olByValue , 1 , " έκθεση Morning "
Η 4

Στείλτε το email και κλείστε τα αντικείμενα . Κλείνοντας αντικείμενα απελευθερώνει πόρους του υπολογιστή , συμπεριλαμβανομένου του χώρου μνήμης . Τα ακόλουθα ολοκληρώνει έκθεση Κωδικός Πρόσβασης :

email.SendSet email = NothingSet app = Τίποτα
Η
εικόνων