Report - Label size and margins

[Justin]

I have a SQL database with an Access front end. I'm using Access 2002 SP2.
The front end contains many differnet labels. Each uses a different label
size ( 2.25"X1.25", 2.25"X4.00",..). Luckly the different labels size each
have a dedicated printer. I having an issue with multiple work stations. I
will set-up the font end for a certain printer, but users who have a
different printer need to manually set-up the label each time a push out a
new revision of the front end. I'm looking for a way I can set-up the
printer, label size and margins using VB. I can generate the printers set-up
on the pc and compare it to a master list to determine what label size it
should be. I've tried the following code, but it just displays the default
printer.

DoCmd.OpenReport "rptMyLabel", acViewPreview, , , acHidden

Reports("rptMyLabel").Printer = Application.Printers(pVar)
Reports("rptMyLabel").Printer.DefaultSize = False
Reports("rptMyLabell").Printer.ItemSizeWidth = plVar
Reports("rptMyLabel").Printer.ItemSizeHeight = phVar
Reports("rptMyLabel").Printer.BottomMargin = 0
Reports("rrptMyLabel").Printer.TopMargin = 0
Reports("rptMyLabel").Printer.LeftMargin = 0
Reports("rptMyLabel").Printer.RightMargin = 0

DoCmd.OpenReport "rptMyLabel", acViewPreview

Any assistance or direction will be most appreciated.