Auto mailing with Outlook

[sureshmopl]

Hi,

Can anyone please tell me how to automatically e-mail my reports to the respective employees using Outlook? I have more than 100 separate reports which I wants to send based on the e-mail ids and employee code in my table. I am using Access 2000. Thanks in advance.

 

[Minty]

Can you show us how far you got from this thread http://www.access-programmers.co.uk/forums/showthread.php?t=290142 ?

 

[sureshmopl]

Hi, I could not make the record-set as you suggested mainly because I am not that good with codes. I made separate reports for each employees (using the SELECT command at Data->Record Source tab of report properties) and with the following code, exported all those reports as html in a folder.

Function AllReports() As String
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Dim strMsg As String
Dim rpt As AccessObject, dB As Object

On Error GoTo Error_Handler

Set dB = Application.CurrentProject
For Each rpt In dB.AllReports

DoCmd.OutputTo acOutputReport, rpt.Name, acFormatHTML, "H:\Work\Employees\Reoports\" & rpt.Name & ".html"

Next rpt

strMsg = " -- Reports listing complete -- "

Procedure_Done:
AllReports = strMsg
Exit Function
=======================================

Now am trying to mail these html files (more than 200) to the respective employees based on their e-mail ids in the master table with a command button. Please help me with any simple methods. Thanks