Email current record

W

weircolin

Hi

I have a form and I would like to email the current record I am looking
at. I have a report which it would use for the email but I can't get
it to work.

Can anyone help?

This is what I have been working on

Dim strWhere As String

If Me.Dirty Then 'Save any edits.
Me.Dirty = False
End If

Dim stDocName As String
strWhere = "[Reference Number] = " & Me.[Reference Number]
stDocName = "rptnewsletterdatabase"
DoCmd.SendObject acReport, stDocName, , strWhere

Thanks

Colin
 
W

weircolin

Ah right,

I think from that link it's not possible.

Thanks

Colin
Barry said:
Try this FAQ from Tony Toews: http://www.granite.ab.ca/access/email.htm

Barry

[email protected] said:
Hi

I have a form and I would like to email the current record I am looking
at. I have a report which it would use for the email but I can't get
it to work.

Can anyone help?

This is what I have been working on

Dim strWhere As String

If Me.Dirty Then 'Save any edits.
Me.Dirty = False
End If

Dim stDocName As String
strWhere = "[Reference Number] = " & Me.[Reference Number]
stDocName = "rptnewsletterdatabase"
DoCmd.SendObject acReport, stDocName, , strWhere

Thanks

Colin
Click to expand...
Click to expand...
 

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

Similar Threads

Worked in Windows 2000 but not XP 0
Report VB Code 1
Email single record on a report 2
Not able to print current record... 2
Print the record in the form 1
Combo Box & Report Questions 22
Report Menu - Multi select Listbox Filter? 0
how to use list box contents as query criterion 2

Top