Outlook Mail fra Access Formular

Docmd.SendObject virker også selvom du ikke vil sende noget objekt:

docmd.SendObject acSendNoObject,,,"Test@mail.dk",,,"Emne", "Brødtekst", True

Alternativt skal du lave en reference til Microsoft Outlook X.0 Object Library og derefter benytte denne kode:

Public Sub CreateMail()
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 = "Mails"
        .Body = "Sådan sender man mails vha VBA"
        .FlagStatus = olFlagMarked
        '.Attachments.Add "C:\Dokumenter\MinFil.txt"
        .Recipients.Add "test@mail.dk"
             
        .Display
    End With
   
    'Item.Send
    Set Item = Nothing
End Sub

Tak for det - er der også mulighed for at specificere hvem mailen skal komme fra i "From:" feltet?

og her er point

Hmm, det vil som udgangspunkt være default-mailadressen på maskinen.