Susan Harkins
harkins at iglou.com
Fri Feb 28 09:51:00 CST 2003
Well, I tried it in several spots, still no success. I understand what you're saying, but either I'm not getting right or the fact that I only have one real printer attached is fooling things -- possible I could have it right and not know it. Although, I changed to acViewPreview to see if the settings were being noted and they're not -- just as before. > Susan, > > >From what I can see, > Set prt = Application.Printers(lngPrinter) > gets an object pointer to the correct printer, and > Set Application.Printer = prt > then activates that printer as the new application default. > > Kind of like getting a record bookmark and then resetting it back when > you're done. > > Seth > > On Fri, 2003-02-28 at 09:26, Susan Harkins wrote: > > OK, wait a minute -- apparently, I'm missing a gear or two. > > > > Dim prt As Access.Printer > > Set prt = Application.Printers(lngPrinter) > > > > isn't the same as > > > > Set Application.Printer = prt > > > > ???? > > > > Susan H. > > > > > > ----- Original Message ----- > > From: "Mike and Doris Manning" <mikedorism at ntelos.net> > > To: <accessd at databaseadvisors.com> > > Sent: Friday, February 28, 2003 10:14 AM > > Subject: RE: [AccessD] more on printing > > > > > > > Your problem is that you haven't actually changed the default printer. > > You > > > need to add the line below just before you open the report. > > > > > > Set Application.Printer = prt > > > > > > And it is strongly recommended that you hold the default printer somewhere > > > so you can easily switch it back to being the default. > > > > > > Doris Manning > > > Database Administrator > > > Hargrove Inc. > > > www.hargroveinc.com > > > > > > > > > -----Original Message----- > > > From: accessd-admin at databaseadvisors.com > > > [mailto:accessd-admin at databaseadvisors.com] On Behalf Of Susan Harkins > > > Sent: Friday, February 28, 2003 10:07 AM > > > To: accessd at databaseadvisors.com > > > Subject: Re: [AccessD] more on printing > > > > > > > > > OK, I've done that. > > > > > > Dim prt As Access.Printer > > > Dim strReport As String > > > Dim strPrinter As String > > > Dim lngPrinter As Long > > > lngPrinter = cboPrinter > > > strReport = cboReport > > > Set prt = Application.Printers(lngPrinter) > > > prt.Orientation = fraOrientation > > > prt.Copies = txtCopies > > > prt.PaperSize = cboPaperSize > > > DoCmd.OpenReport strReport, acViewNormal > > > > > > Now, I've installed a few printers, but I only actually have one and the > > > above always sends to the actual (default) printer, even if I select one > > of > > > the others -- I expected an error. In addition, if I do a preview, I don't > > > see the changes in orientation, etc. that I might have selected. So, I'm > > > doing something wrong. I'm wondering if Access is smart enough to know I > > > don't really have that printer connected, and so it just ignores > > everything > > > -- but then, I'd still expect an error. > > > > > > Thanks for your help Doris. > > > Susan H. > > > > > > ----- Original Message ----- > > > From: "Mike and Doris Manning" <mikedorism at ntelos.net> > > > To: <accessd at databaseadvisors.com> > > > Sent: Friday, February 28, 2003 8:37 AM > > > Subject: RE: [AccessD] more on printing > > > > > > > > > > Once you change the Application.Printer, you open and print the report > > > just > > > > like you normally would. > > > > > > > > Doris Manning > > > > Database Administrator > > > > Hargrove Inc. > > > > www.hargroveinc.com > > > > > > > > > > > > -----Original Message----- > > > > From: accessd-admin at databaseadvisors.com > > > > [mailto:accessd-admin at databaseadvisors.com] On Behalf Of Susan Harkins > > > > Sent: Thursday, February 27, 2003 11:34 PM > > > > To: AccessD at databaseadvisors.com > > > > Subject: [AccessD] more on printing > > > > > > > > > > > > After setting all the appropriate Printer properties and choosing a > > > > nondefault printer, how do you actually print a report? Will the > > > OpenReport > > > > method print to the set printer or always print to the default > > > > printer? > > > > > > > > Susan H. > > > > > > -- > Seth Galitzer sgsax at ksu.edu > Computing Specialist http://puma.agron.ksu.edu/~sgsax > Dept. of Plant Pathology > Kansas State University > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > >