Can anyone tell me what i am doing wrong ??

I am trying to send the current 'printable form' to email recipent


Thanks in advance

Phil



Private Sub Command91_Click()
On Error GoTo Err_Command91_Click

Dim strEmail As String

strEmail = Me.email

DoCmd.SendObject acSendForm, , acFormatRTF, strEmail, , , "Urgent defect from ???", "Please find attached defect from ?????. Please confirm receipt", , True - 1

Exit_Command91_Click:
Exit Sub

Err_Command91_Click:
MsgBox Err.Description
Resume Exit_Command91_Click

End Sub

Can anyone tell me what i am doing wrong ?

You'll need to say what's happening first. ;)

Anyway, if you are trying to send the actual graphical representation of the form then that won't be possible* because the form is just a vessel for holding data so when you "send" a form you are just sending the current record that it displays.

* No doubt there is some overcomplicated way of using Windows API to take a screen dump of the relevant window and paste it into an email attachment as a bitmap. :D

SJ McAbney

Sorry, as you correctly guessed, i am trying to send a graphical representation of the 'printable form'.
Is there a was or creating a query of the current record, and then sending a report based on that query.
Also when i send the form, it sends all the data not just the current one.
Any ideas at all would be great

Phil