Emailing from access issues on client's computers not mine

[Gina Maylone]

Hello all! I am once again banging my head. I have an email function that works perfectly for me, but everytime I try to implement it at my clients location it fails miserably. We both have Access 2013 with a Sharepoint backend and Outlook 2013. ? Code and error message below.

Private Sub Command0_Click()
Dim olApp As Object
Dim objMail As Object
Set olApp = CreateObject("Outlook.Application") 'Create a new instance of Outlook
'Create e-mail item
'Set objMail = olApp.CreateItem(olMailItem)
Set objMail = olApp.CreateItem(0)
With objMail
'Set body format to HTML
'.BodyFormat = olFormatHTML
.bodyformat = 2
.To = Me.emailaddress
.SentOnBehalfOfName = "chris@ABCmoving.com"
.Subject = "Thank you for choosing ABC Moving"
.HTMLBody = "Testing body of email function "
.Save
.send
End With
End Sub

[ItsMe]

If you debug and hover over Me.emailaddress, what is its value?

[Gina Maylone]

If you debug and hover over Me.emailaddress, what is its value?

It's my email address as it should be.

[ItsMe]

Aparently the client has a full version of Access. Maybe you can see if early binding is working and test Intellisense with the objMail. So after the line where it is instantiated and before "With" ... type the dot operator after objMail and see if you can access its members.

Beyond that, the only thing I can think of is a security thing. Did you google the error numbers?

[Gina Maylone]

They are running Access the same way I am, on demand, Office 365. I will try what you suggested tomorrow.

Yes, googled the error numbers with no luck.

Thank you so much for your input!!