Harry,
Here is the code from program, I feel Im almost there, I pulled out the email part, and did an open report instead while getting it to work. I believe Im having syntax errors in the Mystring.
Thanks for the assist
Private Sub Command4_Click()
Dim MyRS As Recordset
Dim MyQD As QueryDef...