sendobject isn't available now

M

Mark

Out of 9 computers running access xp, 2 of them give me the error :"The
command or action 'SendObject' isn't available now".

I am using the sendobject to do a simple email of a report. Here is the code.
Private Sub Send_Email_Confirmation_Click()
On Error GoTo Err_Send_Email_Confirmation_Click

Dim stDocName As String
Dim stName As String
Dim stsubject As String
Dim stmessage As String
Dim stm1 As String
Dim stm2 As String
Dim stm3 As String
Dim sthtml As String
Dim stcamper As String

stm1 = [Dear]
stcamper = [CamperSbFrm]![FirstName]
stDocName = "NewReceiptRpt"
stName =
stsubject = "Your 2007 Confirmation!"
stmessage = "Dear " + stm1 + "," + Chr$(13) + Chr$(10) + Chr$(13) +
Chr$(10) + "Your 2007 Summer Camp Confirmation for " + stcamper + " is
attached." + Chr$(13) + Chr$(10) + "Please review for any corrections needed.
" + Chr$(13) + Chr$(10) + Chr$(13) + Chr$(10) + " If you have questions
concerning your application, please call, " + Chr$(13) + Chr$(10) + "Tricia
800-711-4729"
DoCmd.SendObject acReport, stDocName, acFormatHTML, stName, , ,
stsubject, stmessage

Exit_Send_Email_Confirmation_Click:
Exit Sub

Err_Send_Email_Confirmation_Click:
MsgBox Err.Description
Resume Exit_Send_Email_Confirmation_Click

End Sub


I have tried many things, but cannot find a solution.

Mark
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top