Email Body Blank

[Janet]

I'm trying to send information from an AccessXP form
within the body of an email. The To/Subject are
populated correctly, but the body is always blank. Any
ideas?

Dim strTo As String
Dim strSubject As String
Dim strMsg As String
strTo = "(e-mail address removed)"
strSubject = "ORPCE Housing Request Forward"
strMsg = "tada"
strCC = ""
DoCmd.SendObject acSendNoObject, , , strTo, strCC, ,
strSubject, strMsg, True

 

[nathan harrison]

HI Janet,

There are two things I would try.

1 - strCC is not defined as a variable. You need to remove it or define it.
I believe your code will error if you dont

2 - try defining how you want the text to be formated. e.g.:

Sub early()
Dim strTo As String
Dim strSubject As String
Dim strMsg As String
strTo = "(e-mail address removed)"
strSubject = "ORPCE Housing Request Forward"
strMsg = "tada"

DoCmd.SendObject acSendNoObject, , acFormatTXT, strTo, , , strSubject,
strMsg, True
End Sub

acFormatTXT tells Access to format your text in plain txt.

Let m know if this helps. I tried the above code and it worked for me.

Have a Great Day!!!!
--
Nathan
www.SkyLinePrints.com
(e-mail address removed)

Come see our latest offerings at: www.skylineprints.com.
FREE shipping during May on all orders over $30

FREE E-CARDS: www.skylineprints.com/ecard Send yours today!