El momento al pulsar el boton imprimir. - VB-MUNDO

ThE_AsUs · #1 (**permalink**) 01-10-2007, 04:24:34

Hola a todos nuevamente, bueno tengo una pequeña consulta, como se puede saber cuando alguien a hecho click en el boton de imprimir de un datareport, osea uno da click al boton para que genere el datareport, pero quiero que cuando el usuario haga click para ya imprimir el reporte desde el boton "print "de la vista previa realize una accion de actualizar la BD. alguien me puede decir el codigo?

gracias de antemano por su tiempo.

J.M.Movilla · #2 (**permalink**) 01-10-2007, 08:35:40

Ese botón tiene una función muy concreta, que no es programable. Por tanto no puedes implementar funciones diferentes a las que le son internamente propias. Cosa que, por otra parte, tampoco parece que debas mezclar... Actualiza al salir de la presentación del informe.

ThE_AsUs · #3 (**permalink**) 01-10-2007, 08:50:24

ok, bueno viendo un manual de datareport vi un codigo sencillo que voy a usar por el momento para lo que quiero:

Código:

If opPantalla.Value Then
    rptVentas.Show
Else
    rptVentas.PrintReport
End If

Pero esto no es exactamente lo que quiero, lo que quiero es que el programa sepa si el boton fue presionado o el reporte a sido enviado a la impresora, con la forma de arriba actualizo la BD si selecciono impresora directa en lugar de vista previa, pero lo malo es que si el usuario decide imprimir el reporte con el boton de vista previa, pues no me va a realizar la actualizacion, y me han pedido justo esto, q cuando se imprima la hoja automaticamente cambie el estado de la reparacion de de "Reparado" a "Enviado" x ejemplo.

J.M.Movilla · #4 (**permalink**) 01-10-2007, 08:56:19

Hace muchos años que no uso DataReport, pero creo recordar que puedes ANULAR la posibilidad de imprimir el informe presentado... Si es así, prepara dos botones, uno para Visualizarlo y otro para Imprimirlo, y en éste añades la línea del .Update... De esa forma siempre que impriman actualizan...

ThE_AsUs · #5 (**permalink**) 01-10-2007, 20:31:14

Cita:

Empezado por J.M.Movilla

Hace muchos años que no uso DataReport, pero creo recordar que puedes ANULAR la posibilidad de imprimir el informe presentado... Si es así, prepara dos botones, uno para Visualizarlo y otro para Imprimirlo, y en éste añades la línea del .Update... De esa forma siempre que impriman actualizan...

Ok, gracias, voy a ver si se puede anular el boton de imprimir de la vista previa, ojala se pueda. salu2.

pdt: si alguien mas sabe algun codigo u otra opcion me avisa.

ThE_AsUs · #6 (**permalink**) 02-10-2007, 00:16:15

Bueno bueno, ya logre resolver mi problema, dejo la solucion aqui por si alguien la necesita en algun momento, este codigo va en el reporte:

Código:

Private Sub DataReport_AsyncProgress(ByVal JobType As MSDataReportLib.AsyncTypeConstants, ByVal Cookie As Long, ByVal PageCompleted As Long, ByVal TotalPages As Long)
If JobType = rptAsyncPrint Then
MsgBox "el reporte se esta imprimiendo"
End If
End Sub

donde JobType es la variable del reporte para lo que esta haciendo en el momento y "rptAsyncPrint" es la accion que esta realizando, las cuales pueden ser:

Constante - Valor - Descripción
rptAsyncPreview - 0 - El informe está procesando una operación de presentación preliminar.
rptAsyncPrint - 1 - El informe está procesando una operación PrintReport.
rptAsyncReport - 2 - El informe está procesando una operación ExportReport.

Bueno d esta forma se sabe si el usuario le dio imprimir al reporte o solo lo esta visualizando. salu2