Visual Basic - Nueva pagina en un active report o data report

Life is soft - evento anual de software empresarial
 
Vista:

Nueva pagina en un active report o data report

Publicado por Pedro (50 intervenciones) el 19/07/2006 19:46:04
Quiero pasar a una nueva hoja cuando termine de llenar los datos en la anterior, como se hace eso??????
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Nueva pagina en un active report o data report

Publicado por Bernardo (8 intervenciones) el 22/07/2006 22:05:39
Hola, prueba con este pedazo de ejemplo de un trabajo mío. TempCliente es el nombre de mi DataReport. Pregunto al usuario si desea una página por cliente, o un cliente a continuación de otro, sin división por página. Hice muchas pruebas para llegar a esto, no hay mucha literatura al respecto, al menos en español. Yo probé y probé una y mil veces, hace que lo logré. Te sugiero que no te canses de experimentar, una y mil veces, es la forma de lograr todo. Suerte. Bernardo, en la ciudad de Elena en la provincia de Córdoba, Argentina. Sábado 22 Julio 2006.-

' Opción usuario imprimir hojas por separado por cada cliente. Sinó, contínuas.
iRespuesta = MsgBox("Si desea imprimir una página por cliente, " & vbCrLf & _
"entonces, haga clic en ""Si"".¡Gracias!.", vbQuestion + vbYesNo + vbDefaultButton2, _
"MC Computación")
If iRespuesta = vbYes Then
TempCliente.Sections(3).ForcePageBreak = rptPageBreakBefore
TempCliente.Sections(3).KeepTogether = True
Else
TempCliente.Sections(3).ForcePageBreak = rptPageBreakNone
TempCliente.Sections(3).KeepTogether = False
End If
TempCliente.Show
TempCliente.Title = "Movimientos de Cta.Cte.Cliente del " & _
Format(FechaDesde, "dd/mm/yy") & " al " & Format(FechaHasta, "dd/mm/yy") & "."
Exit Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar