print dialog box ?

Hello All,
can anyone tell me how to provide a windows printing Dialog Box for printing a crystal report thru coding?
thanks in Advance!
Pari

VB Code:

CommonDialog1.ShowPrinter
 
    Printer.Print "TEST PRINT"
    Printer.Print "DeviceName = " & Printer.DeviceName
    Printer.EndDoc

This moves the default printer though so you would be wise to add a variable to store the original printer.devicename and then reset after the .enddoc.

Same control as with an Open or Save As dialog box...
Select Microsoft Common dialog Control in 'Components'

VB Code:

Dialog1.ShowPrinter

:)

Have you tried compiling the report, and then useing Shell to execute it?