Send mail fra felt

DoCmd.SendObject acSendNoObject, , , Me!Mailadresse, , , , , True

Anbringes på dobbelklik-hændelsen

what is your \"standard mail\" program.

Terry-> Doesn\'t matter, does it?

On the double click event for the field add

Sendmail

then place the following in a module.
You needf a reference to Outlook (Tools+References)


In the example you can just display Outlook with
.display instead of .send

Function SendMail()
Dim OutL As Outlook.Application
Dim Item As MailItem
Dim Receiver As Recipient

    Set OutL = New Outlook.Application

    Set Item = OutL.CreateItem(olMailItem)
   
    With Item
       
        .Subject = \"The subject\"
        .Body = \"This is the body of the mail - http://www.eksperten.dk\"
        .FlagStatus = olFlagMarked
        \'.Attachments.Add \"Any attachments\"
       
        Set Receiver = .Recipients.Add( Me.YourMailAddressField)
       
        If Not Receiver.Resolve Then
            .Display
        Else
            .Send
        End If
    End With
   
    Set Item = Nothing

End function

Hi Thomas! It does if I was going to give an example (as I have) in Outlook :o)