puni
03 de Marzo del 2004

tengo una consulta que solo tiene un datagrid que muestra ciertos datos, le agrege al form un botom de imprimir y dentro de este inserte el codigo:

Private Sub cmdImprimir_Click()
Dim Copias As Byte ' guardar el número de copias With CommonDialog1 '
.Flags = cdlPDHidePrintToFile Or cdlPDNoSelection Or cdlPDNoPageNums
.PrinterDefault = True
.ShowPrinter ' Mostrar el cuadro de diálogo
Copias = .Copies
End With
Printer.Copies = Copias ' número de copias
Printer.Font = Me.Font ' Tomar el estilo de texto del form
Printer.Print
PrintForm ' Imprimir el form
Printer.EndDoc ' Fin de la impresión

y me da error : run time error 486, algo como que la impresora no puede imprimir eso
porque???
muchas gracias
ah, ademas necesito imprimir un recibo cuando guarda una modificacion, para eso tengo que hacer un form y luego imprimirlo?
nuevamente muchas gracias

evaristo
03 de Marzo del 2004

esta malo tu caga de codigo pos saco de huea
chuchetumadre