Since you already have the data in Access, you may want to keep the data
where it is and look at the ReminderDate when you start up to see if there
is any pending reminder.

Here's an example:

Private Sub Form_Open()
'********************************************************************
' Purpose: Email Updates
'
' Author:  Arvin Meyer
' Date:    March 27, 2002
' Comment: Check if wanted, then run in a Transaction
'
'********************************************************************
On Error GoTo Err_Handler
Dim rstItems As DAO.Recordset
Dim db As DAO.Database
Dim lngCount As Long

Set db = CurrentDb
Set rstItems = db.OpenRecordset("qryItemsToEmail", dbOpenSnapshot)

lngCount = rstItems.RecordCount

If lngCount > 0 Then
   If MsgBox("You have records with effective dates that need mailing." & _
       vbCrLf & vbCrLf & "MAILTHEM?", vbYesNo, "Email Records?") = vbYes
Then

       Call SendMail

   End If
End If

Exit_Here:

   rstItems.Close
   Set rstItems = Nothing
   Set db = Nothing
   Exit Sub

Err_Handler:
       MsgBox Err.Description
       Resume Exit_Here
   End Select
End Sub

The SendMail call just uses SendObject code from the helpfile example. If
you are using Outlook, you can also use this:

http://www.datastrat.com/Code/OutlookEmail.txt