sending e-mails from access

[Zibinette]

Hi, another question from a helpless access user.
Does anyone know how to program a button that will allow me to send an e-mail to a client with info regarding his file. I'm guessing that the personalized message would probably end up being a WORD document containing the info I want to send.
thanks again and hope to read some helpful messages soon !!!
Z.

 

[Nero]

Dim olkapps As Outlook.Application
Dim olknamespaces As Outlook.NameSpace
Dim objmailitems As Outlook.MailItem

Set olkapps = New Outlook.Application
Set olknamespaces = GetNamespace("MAPI")
Set objmailitems = olkapps.CreateItem(olMailItem)
With objmailitems
.To = "Recipients Name"
.Subject = "Subject Title"
.Body = "Text In Here"
.Importance = olImportanceHigh
.Attachments = "C:Your File"
.Send
End With
Set olkapps = Nothing
Set olknamespaces = Nothing
Set objmailitems = Nothing
This message was edited by Nero on 2003-02-06 11:05

 

[Wuddle]

Alternatively you could go to Macros and from the drop down list select Send Object. The arguments section at the bottom of the screeen are pretty easy to follow...Even for me!!
Then create a button and attach the macro to it
This message was edited by Wuddle on 2003-02-09 07:35