Embed Recordset in Email

[csandrou]

I am working on a module that will create several recordsets using SQL statements that contain "tickler" information to be sent to employees through the email to complete different actions. The recordsets are no problem, however, the only way I have been able to send emails is to send one action at a time per email using the SendObject command. Ex. "Please update payment amount in file 123 to $50.00 by 1/1/2007." I would rather send an entire recordset to an individual in one email.

Ex. "Please make the indicated updates to the following files.

File 123 Update payment amount to $50.00 by 1/1/2007
File 223 Request production reports from X Co. by 2/1/2007.
File 323 Calculate new periodic payment "

Is there a way to loop through a recordset and have it embed string values for each record in a Groupwise email?

[MMcCarthy]

Assuming the message size doesn't get too big you can loop through the recordset and pass all the values to a string variable which would include line down characters.

e.g.

Dim strMsg As String
 
    ' open recordset method here using rst variable name for example
 
    rst.MoveFirst
    Do until rst.EOF
        strMsg = strMsg & rst!YourFieldName & chr(13)
    Loop
 

Then use strMsg as the Message parameter in SendObject.