Hi
You could use something like this
Private Sub SomeField_AfterUpdate()
If (DateDiff("d", Date, DueDate) < 6) Then
MsgBox "Due date is less than 6 days away ??", vbOKOnly, "Date
Checker"
DoCmd.SendObject acReport, "ReportName", "RichTextFormat(*.rtf)",
Forms!FormName!EMailField, , "", "Money Owed ??", "Hi You need to send us
some money ", False, ""
End If
End Sub
You would need to have at least a few fields on your form.
A Date field that shows the due date
The email address that you want to send the email to
Private Sub SomeField_AfterUpdate()
This is afterupdate of some field you could only use a button, on form load,
etc whichever is most appropriate for your use
Notes about the code above
"ReportName"
You would need to create a filtered report that would be emailed - note this
would be "attached" to the email isf you use the code above.
"RichTextFormat(*.rtf)"
This is the format of the report in the code (for MS Word) you can change
this if you want
Forms!FormName!EMailField
You need to show the email address that you want to send the report to
Forms!FormName!EMailField, , "",
Note the space between the , , after the wordField. In this space you could
insert another address if someone needs a CC of the Mail like this
Forms!FormName!EMailField,Forms!FormName!CCEMailField , "",
The 2 fields are called [EMailField] and [CCEMailField] of course you can
alter this
"Money Owed ??"
This is text the is in the e mail subject line
"Hi You need to send us some money "
This is text in the body of the e mail
You will need to do some work to produce the filtered report and ensure the
form has all the required fields but this should set you in the right
direction
Of course you can simply not use the report attachement and just send the e
mail with a message - in this case you could use the IIF to send a mail
showing how many days are left before due date
Good luck - hope thi helps
--
Buon Natale, Happy Chritmas.
Wayne
Manchester, England.
Scusate,ma il mio Inglese fa schiffo
Percio se non ci siamo capiti, mi mandate un
messagio e provero di spiegarmi meglio.