Como agregar mas paginas e.HasMorePages????

[pablo_giri]

Buen dia, para tener el hasmore pages tenes que tener una variable global, y sobre eso controlar cuando tenes que hacer el salto de linea en el procedimiento en donde imprime, porque eso lo que hace es primero ejecutar y despues imprimir, o sea, ejecuta todo el codigo y cuando termina de armar el documento, imprime. Tenes que tener en cuenta que vas a controlar, si es una cantidad X de items por pagina tenes que ir controlando eso y poner el contador en 0.
Ejemplo:

Variable global

Dim CantidadItems As Integer = 0
Dim Indice As Integer

proceso imprimir ---
Dim Contador As Integer = 0
-
Codigo de texto a imprimir
-
CantidadItems = CantidadItems - 1
Contador = Contador + 1
Indice = Indice + 1
If Contador = 3 Then
If CantidadItems = 0 Then
e.HasMorePages = False
Else
e.HasMorePages = True
End If
Exit Sub
Else
If CantidadItems = 0 Then
e.HasMorePages = False
End If

End If


Espero que te sirva, sino, me contas!!! Saludos

Pablo Germán Giribaldi - Analista de sistemas