If you use NetScaler you will want to see these guides. The NetScaler How To Guides show administrators how to get NetScaler up and configured by providing instructions for common scenarios and some not so common ones.
Private Sub Command2_Click() DoCmd.RunCommand acCmdSaveRecord Forms!Form1.SetFocus Dim rst As DAO.Recordset Set rst = CurrentDb.OpenRecordset("SELECT DISTINCT [Account], [InvoiceNum] FROM [ContactTotals] WHERE (((Contracts.SelectedPrint)=True)) ORDER BY [Account];", dbOpenSnapshot) Do While Not rst.EOF strRptFilter = "[InvoiceNum] = " & Chr(34) & rst![InvoiceNum] & Chr(34) DoCmd.OutputTo acOutputReport, "InvTotal", acFormatPDF, "C:\Scripts" & "\" & rst![Account] & " - " & rst![InvoiceNum] & ".pdf" DoEvents rst.MoveNext Loop rst.Close Set rst = Nothing End Sub
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
12 Experts available now in Live!