Problema con reports

10/05/2007 - 13:30 por Juanma | Informe spam
Hola,

Tengo una aplicacion que imprime pedidos en una impresora de longitud
variable (corto el papel cuando se acaba el pedido... 1 , 2 , 100 lineas).
Para crear el informe utilizo crystal reports, y gracias a una stored
consigo rellenar el informe. Si imprimo desde una impresora normal no hay
ningun problema, pero cuando lo hago con una que lleva cortador, esta solo
me imprime el tamaño que tengo por defecto en la configuracion de la
impresora. Me he asegurado de que no fuese problema de software de la
impresora, pero esta funciona correctamente. Os pongo el codigo que utilizo
para modificar la longitud de la pagina. Sabeis si lo estoy haciendo bien o
si hay otros modos de hacerlo?

Dim impresora As New System.Drawing.Printing.PrinterSettings

impresora.PrinterName ='"nombre_impresora"

Dim psize As New System.Drawing.Printing.PaperSize

psize.Height = 9000 'Me.rpt1.PrintOptions.PageContentHeight -- esta seria la
longitud del informe, pero incluso probando con longitudes fijas no funciona

impresora.DefaultPageSettings.PaperSize = psize


Gracias
 

Leer las respuestas

#1 bernardo
12/06/2007 - 15:53 | Informe spam
"Juanma" escribió en el mensaje
news:
Hola,

Tengo una aplicacion que imprime pedidos en una impresora de longitud
variable (corto el papel cuando se acaba el pedido... 1 , 2 , 100 lineas).
Para crear el informe utilizo crystal reports, y gracias a una stored
consigo rellenar el informe. Si imprimo desde una impresora normal no hay
ningun problema, pero cuando lo hago con una que lleva cortador, esta solo
me imprime el tamaño que tengo por defecto en la configuracion de la
impresora. Me he asegurado de que no fuese problema de software de la
impresora, pero esta funciona correctamente. Os pongo el codigo que
utilizo para modificar la longitud de la pagina. Sabeis si lo estoy
haciendo bien o si hay otros modos de hacerlo?

Dim impresora As New System.Drawing.Printing.PrinterSettings

impresora.PrinterName ='"nombre_impresora"

Dim psize As New System.Drawing.Printing.PaperSize

psize.Height = 9000 'Me.rpt1.PrintOptions.PageContentHeight -- esta seria
la longitud del informe, pero incluso probando con longitudes fijas no
funciona

impresora.DefaultPageSettings.PaperSize = psize


Gracias
lo que haces es correcto y hay maneras otras manerras de hacerlo

Preguntas similares