A very helpfull chap called Bruce sent me this code in response to a request from me - The problem was that the emails from my app were going as rich text and not text.

This is the code I am using:
--------------------------------------------------------------------------------
Private Sub Auto_Send()
Dim objOutlook As New Outlook.Application
Dim objOutlookMsg As Outlook.MailItem

'Create new message
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)

' Set all desired Outlook properties
With objOutlookMsg
.To = "userid@users_address"
.Subject = "Automated email test"
.Body = "This is line 1" & vbcrlf
.Body = .Body & "This is line 2" & vbcrlf

{.BodyText as text?????? not HTML}

.Importance = olImportanceHigh
.Send
End With

Set objOutlookMsg = Nothing

'Close Outlook instance: Important!
Set objOutlook = Nothing

MsgBox "Auto Email Complete", vbInformation

End Sub
--------------------------------------------------------------------------------
The emails I send using this code get sent as rich text format and the only other format option seems to be HTML. Do you know of anyway to send them and set the email format to plain text?

NB: My Outlook settings are plain text.

Thanks in advance.