Send E-mail

Its possible if you use Outlook automation to send your emails.

Function SendMail()
Dim objOl As New Outlook.Application
Dim objPost As MailItem
Dim vedhæftet As Attachments
   
    Set objPost = objOl.CreateItem(olMailItem)
   
    Set vedhæftet = objPost.Attachments
    vedhæftet.Add "C:\Output.txt"
    vedhæftet.Add "c:\staff.xsl"
   
    With objPost
        .Subject = "Subject goes here"
        .To = "eksperten@santhell.dk"
        .Body = "Hej med Dig" & .Body 'Just in case we are using an autosignature
       
               
        .Display
       
    End With
 
  objOl.Quit
 
    Set objPost = Nothing
    Set vedhæftet = Nothing
   
Exit Function

These lines add two attachments

It's not 2 existing files, it's 2 reports from my db that I want to send as SnapShots.

Not sure you can. Cant you save the reports as snapshot files first?

Offcourse I can, but if I have 35 persons to send to, it will be a lot actions to do. I had hoped I could do it much easier.

?
If the same reports are sent to 35 people then then you just include them in the .To parameter just as you when you use

docmd.SendObject

.To = "eksperten@santhell.dk;nyholm@mail.dk"

It's not the same report. It is sallary notifications consists of 2 reports. One is how the sallary is calculated and the other is a specification of the data that the sallary is based on.

The only way it will simplyfie the mailing of the reports is if it's possible for the SendObject function to handle two objects at the same time.

Well if having to send two emails is simpler than using Outlook to send them both at once then great.

I have had a look around and as far as I know you can not send multiple attachments (objects) at the same time using cmd.SendObject

Docmd.SendObject

When I'm using the Docmd.SendObject it looks up the e-mail adress for that individual, it starts my mailingprogram. The procedure takes only two klicks. It can't be any simliper than that. It's just that I have to do it twize and send the two objects in two different mails.

I will give You the points anyhow. Over the time You have been most helpful and I appreciate wery much Your suggestions.

"...It's just that I have to do it twize and send the two objects in two different mails."

and thats what I'm saying cant be avoided using Docmd.SendObject.

I know the few lines of code is simpler than using Outlook, but to get around your problem you have to use another method

Thanks.
You dont have to give me points if you cant use the answer, but I think you will find that its the only option (not using Docmd.SendObject) to solve your problem.