Salti pagina in Crystal Report

lunedì 06 settembre 2004 - 10.00

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

gianni Profilo | Newbie

7 messaggi | Data Invio: lun 6 set 2004 - 10:00

Buongiorno.

Ho il seguente problema:

Ho creato una procedura che richiede dei parametri di stampa, esegue la query su un db e poi apre un documento Crystal Report in anteprima per poterlo visualizzare e/o stampare.
Per qualche motivo da VB non mi funziona il salto pagina.

Mi spiego meglio.
Se apro il documento tramite VB (con l'apposito controllo presente in Visual Studio .NET) la procedura me lo visualizza bene a video in anteprima, pero' quando stampa emette sempre e solo 1 pagina (in effetti anche l'anteprima visualizza in basso pagina 1 di 1, pero' in realta' il documento e' formato da 4 pagine).

Se pero' apro lo stesso report (file .rpt) tramite Crystal report, vedo in basso sempre la dicitura "pagina 1 di 1", pero' quando lo stampo mi stampa tutte le 4 pagine.

Sapete per caso dirmi qualcosa?

trinity Profilo | Guru

3.465 messaggi | Data Invio: mer 8 set 2004 - 10:32

E' strano quello che ti succede, se utilizzi per stampare crnet mi potresti postare il codice che utilizzi per aprire il file report?Utilizzi il controllo Crystalreportviewer?

Ciao
Fabio

trinity Profilo | Guru

3.465 messaggi | Data Invio: mer 8 set 2004 - 10:32

E' strano quello che ti succede, se utilizzi per stampare crnet mi potresti postare il codice che utilizzi per aprire il file report?Utilizzi il controllo Crystalreportviewer?

Ciao
Fabio

trinity Profilo | Guru

3.465 messaggi | Data Invio: mer 8 set 2004 - 10:33

E' strano quello che ti succede, se utilizzi per stampare crnet mi potresti postare il codice che utilizzi per aprire il file report?Utilizzi il controllo Crystalreportviewer?

Ciao
Fabio

gianni Profilo | Newbie

7 messaggi | Data Invio: mar 16 nov 2004 - 12:36

Scusa il ritardo ma fino ad oggi non ho piu' avuto modo di guardare quel progetto per altri motivi...

Questo e' il codice del mio programma. Ho provato ad aggiungere come file il mio rpt....
Spero tu riesca a trovare qualcosa...
Grazie

Public Class StampaReport
Inherits System.Windows.Forms.Form

#Region " Windows Form Designer generated code "

Public Sub New()
MyBase.New()

'This call is required by the Windows Form Designer.
InitializeComponent()

'Add any initialization after the InitializeComponent() call

End Sub

'UserControl1 overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub

'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer

'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
Private WithEvents crViewer As CrystalDecisions.Windows.Forms.CrystalReportViewer
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.crViewer = New CrystalDecisions.Windows.Forms.CrystalReportViewer()
Me.SuspendLayout()
'
'crViewer
'
Me.crViewer.ActiveViewIndex = -1
Me.crViewer.DisplayBackgroundEdge = False
Me.crViewer.DisplayGroupTree = False
Me.crViewer.Dock = System.Windows.Forms.DockStyle.Fill
Me.crViewer.Name = "crViewer"
Me.crViewer.ReportSource = Nothing
Me.crViewer.ShowGroupTreeButton = False
Me.crViewer.Size = New System.Drawing.Size(492, 376)
Me.crViewer.TabIndex = 0
'
'StampaReport
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(492, 376)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.crViewer})
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.SizableToolWindow
Me.Name = "StampaReport"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Stampa report"
Me.WindowState = System.Windows.Forms.FormWindowState.Maximized
Me.ResumeLayout(False)

End Sub

#End Region

Public Sub New(ByVal nomeReport As String)
Me.New()
Me.NomeReport = nomeReport
End Sub

'
' Imposto il datatable
'
Public Property NomeReport() As String
Get
Return Me.crViewer.ReportSource
End Get
Set(ByVal Value As String)
Me.crViewer.ReportSource = Value
Me.crViewer.RefreshReport()
End Set
End Property

'
' Stampo
'
Public Sub Print()
Me.crViewer.PrintReport()
End Sub

End Class

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !