Printer Object & Commondialog cotrol

[itismesa]

Hi

I am using printer object for printing a receipt
I want to use the commondialog.showprinter to give the user the ability to select the printer before he print the reciept
and then asign it to the printer object using
I dont want to change the system default printer

the unkonwn point to me is how to do the assignment
here is a sample of the code"


CommonDialog1.PrinterDefault = False
CommonDialog1.ShowPrinter
Set Printer = ?????????????

Regards

[HanneSThEGreaT]

Dim PrinterName As String 'current printer
PrinterName = Printer.DeviceName

Hope it helps!