daniel.n...@fairchild.af.mil wrote:
I have some reports in access that I'd like to automatically save in
html format for viewing on my web site. Export to html works nicely
but I don't want to have to manually do that. Any ideas?
I'm sure this code will be shredded by someone else, but this should
get you started....
Public Sub OutputAllReportsToHTML()
Dim intCounter As Integer
For intCounter = 0 To CurrentProject.AllReports.Count - 1
'---just so I can see what's going on if something fails
Debug.Print intCounter;
CurrentProject.AllReports(intCounter).Name
'--output report to HTML
DoCmd.OutputTo acOutputReport, _
CurrentProject.AllReports(intCounter).Name, acFormatHTML, _
CurrentProject.AllReports(intCounter).Name
Next intCounter
End Sub