[AccessD] more on printing

I have a report generator in one of my ADPs where the user can choose the
printer they want their reports sent to from a combobox.  In the AfterUpdate
event of the combo box, I have the following code:

Private Sub cboPrintTo_AfterUpdate()
    'Change the default printer
    Set Application.Printer = Application.Printers(cboPrintTo)
End Sub

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 11:42 AM
To: accessd at databaseadvisors.com
Subject: Re: [AccessD] more on printing


What I expect, is an error -- if I choose Printer A, which Windows thinks I
have so I can get it to list it when running through the Printers collection
-- but I really don't, I expect an error when I try to print to it.

However, even when I use the default printer, the settings aren't changing.
So, obviously, I'm not doing something right anyway.

Susan H.


> AXP allows you to design and even preview reports without an actual 
> printer attached.  But if there isn't a printer, you can't really 
> expect it to behave as if there were.
>
> Charlotte Foust
>
> -----Original Message-----
> From: Susan Harkins [mailto:harkins at iglou.com]
> Sent: Friday, February 28, 2003 7: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.
> >
> > _______________________________________________
> > AccessD mailing list
> > AccessD at databaseadvisors.com 
> > http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> >
> > _______________________________________________
> > AccessD mailing list
> > AccessD at databaseadvisors.com 
> > http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> >
> >
>
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com 
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com 
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com 
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>

_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com