La Web del Programador: Comunidad de Programadores
 
    Pregunta:  11384 - COMO CAMBIO CONFIG. IMPRESORA EN ACTIVE REPORT
Autor:  Walter Hernández
Tengo una aplicacion en VB60 que imprime en Active Report, que usa la configucion de pagina de la impresora predeterminada de windows (95/98/NT). Puedo cambiar la impresora predeterminada con una API, pero si necesito imprimir en la misma impresora con otro tipo de hoja no me queda mas opcion que cambiar la configuracion de esa impresora desde el panel de control o agregar otra impresora igual con otro tipo de hoja y predeterminarla cuando voy a imprimir...
Si alguien sabe algo o tiene alguna sugerencia ...muchas gracias

  Respuesta:  Marcelo Carvajal Alvarado
Debes usar el commondialog con la siguiente sintaxis

On Error GoTo Errimp
Dim BeginPage, EndPage
CommonDialog1.PrinterDefault = True
BeginPage = CommonDialog1.FromPage
CommonDialog1.Flags = "&H40000"
CommonDialog1.ShowPrinter
CommonDialog1.CancelError = True
EndPage = CommonDialog1.ToPage

y despues lamar al crystal report

Crystalreport1.action