Point til raketten

Jeg fandt ud af følgende:

Public Sub Mailer()

Dim objol As New Outlook.Application
Dim objmail As MailItem
Set objol = New Outlook.Application
Set objmail = objol.CreateItem(olMailItem)
With objmail
.To = "Somebody@hotmail.dk"
'.CC = "SomebodyElse@hotmail.com"
.Subject = "TEST EMAIL"
.Body = "THIS IS THE BODY"
.NoAging = True
.Attachments.Add ("C:\TEST.txt")
.Display
.Send

End With
Set objmail = Nothing
Set objol = Nothing

End Sub

/raketten

Du skal lægge et svar for at få point :o)

.