Jun 7

ACCESE VBA 按E-MAIL 打开邮件发送 OUTLOOK

MS ACCESS               共有人观看过

1.添加引用Microsoft Outlook 11.0 Object Library。

Private Sub E_mail_DblClick(Cancel As Integer)
Dim otlk As Outlook.Application
    Dim mailitem As Outlook.mailitem
    Set otlk = New Outlook.Application
...

  [«]1[»]