Your application or website rely on your database to deliver information about products and services to your customers. You can’t afford to have your database lose performance, lose availability or become unresponsive – even for just a few minutes.
strSQL = "DELETE FROM SummaryReport" CurrentDb.Execute strSQL strSQL = "INSERT INTO SummaryReport ( Clients, [Entered Invoices], [EMS Line Item], [No Of Errors] ) " _ & "SELECT ClientName.ClientName AS Clients, Count(QCLog.Noli) AS [Entered Invoices], " _ & "Sum(QCLog.Noli) AS [EMS Line Item], Sum(QCLog.NumofErr) as [No of Errors] " _ & "FROM ClientName LEFT JOIN QCLog ON ClientName.ClientName = QCLog.ClientName " _ & " WHERE (([QCLog].[CheckedDate]) >= # " & st1 & " #) AND (([QCLog].[CheckedDate]) <= # " & st2 & " #) GROUP BY ClientName.ClientName;" CurrentDb.Execute strSQL On Error GoTo errorhandler DoCmd.SetWarnings False DoCmd.OutputTo acOutputTable, "SummaryReport", acFormatXLS
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.