فصل ۱۴ — ارسال E-mail با Outlook و Merge به Word

با Reference به Microsoft Outlook Object Library می‌توان از Access یک Outlook.Application ساخت، MailItem ایجاد کرد، Subject/Body/Recipient را تنظیم و پیام را Display یا Send کرد.

Outlook Automation

Dim Olk As Outlook.Application
Dim OlkMsg As Outlook.MailItem
Set Olk = New Outlook.Application
Set OlkMsg = Olk.CreateItem(olMailItem)

With OlkMsg
   .Subject = Me!MsgSubject
   .Body = Me!MsgBody
   .Display
End With

Recipient Object می‌تواند Address را بگیرد و Resolve شود. With Block Propertyهای MailItem را کوتاه‌تر می‌کند. Objectها پس از استفاده آزاد می‌شوند.

Word Template

برای انتقال Data به Word، Document Template با Bookmarkهایی در محل FirstName، LastName، Company، Address و سایر Fieldها ساخته می‌شود. Bookmark Nameها باید با Code هم‌خوان باشند.

Word Automation

Access یک Word.Application و Document Object می‌سازد، Template را باز می‌کند، متن Record جاری Form را در Rangeهای Bookmark قرار می‌دهد و Document را نمایش/چاپ می‌کند. Address Lineهای خالی با Condition مدیریت می‌شوند تا Line خالی نامناسب ایجاد نشود.

شکل‌ها و عناصر بصری این بخش