Collegare la stampa ad un solo record

martedì 19 gennaio 2016 - 12.34

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

EugenioLena Profilo | Newbie

4 messaggi | Data Invio: mar 19 gen 2016 - 12:34

Ho collegato il mio file .rpt ad una tabella di DB.
Come faccio a visualizzare nella stampa SOLO l'ultimo record di tale tabella?
Grazie!!

jekisi Profilo | Senior Member

460 messaggi | Data Invio: mer 20 gen 2016 - 11:09

Ciao, questo ti permette di stampare il record sul quale ti trovi, che sia ultimo o meno.

La cosa dipende dal fatto di andare a scrivere la formula in modo corretto.

Nell' esempio che ti porto la formula sta scritta in queste 2 righe:

Dim varformula As String
varformula = "{CoordinateBancarie.codice}= " & Form73.CodiceTextBox.Text

In questo esempio io faccio uso di:

Faccio il file .rpt, aggiungo il controllo CrystalReportViewer alla form e assegno il report (file .rpt) al controllo.

-------------------------------------------CODICE----------------------------------

Public Class Form74

Private Sub Form74_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
caricaReport("C:\Messina Utility\MessinaUtility.mdb")
End Sub

Private Sub caricaReport(ByVal pathDatabase As String)
Dim mioreport1 As New CrystalDecisions.CrystalReports.Engine.ReportDocument()
mioreport1.Load(AppDomain.CurrentDomain.BaseDirectory & "\CrystalReport12.rpt")
Dim logOnInfo1 As New CrystalDecisions.Shared.TableLogOnInfo
logOnInfo1 = mioreport1.Database.Tables.Item("CoordinateBancarie").LogOnInfo
logOnInfo1.ConnectionInfo.ServerName = pathDatabase
logOnInfo1.TableName = "CoordinateBancarie"
mioreport1.Database.Tables(0).ApplyLogOnInfo(logOnInfo1)
CrystalReportViewer1.Visible = True
End Sub

Private Sub CrystalReportViewer1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CrystalReportViewer1.Load
CrystalReportViewer1.Visible = False
Try
Dim tbCurrent As CrystalDecisions.CrystalReports.Engine.Table
Dim tliCurrent As CrystalDecisions.Shared.TableLogOnInfo
Dim objdoc As New CrystalDecisions.CrystalReports.Engine.ReportDocument
Dim varformula As String
varformula = "{CoordinateBancarie.codice}= " & Form73.CodiceTextBox.Text
CrystalReportViewer1.SelectionFormula = varformula
CrystalReportViewer1.RefreshReport()
objdoc.Load(Application.StartupPath & "\crystalreport12.rpt")
For Each tbCurrent In objdoc.Database.Tables
tliCurrent = tbCurrent.LogOnInfo
With tliCurrent.ConnectionInfo
.UserID = ""
.Password = ""
.DatabaseName = "MessinaUtility"
End With
tbCurrent.ApplyLogOnInfo(tliCurrent)
Next tbCurrent
CrystalReportViewer1.ReportSource = objdoc
CrystalReportViewer1.RefreshReport()
Catch ex As Exception
End Try
CrystalReportViewer1.Visible = True
End Sub
End Class

Spero di esserti stato di aiuto

EugenioLena Profilo | Newbie

4 messaggi | Data Invio: lun 25 gen 2016 - 11:39

Ti ringrazio molto per la risposta.
Purtroppo conosco solo il C# e con la intassi VB mi trovo in difficoltà.
Forse non sono stato chiaro nel porre il quesito.
Volevo solo sapere come mettere una selezione in Crystal Reports per caricare solo un record, ad esempio quello con la Data maggiore.
In CR ho torvato una finestra 'Editor delle formule per la selezione dei record'. Mi è sembrato il posto giusto. Ho provato a scrivere con la sintassi SQL ma non la accetta. E' ncessaria una sintassi particolare?
Ancora grazie per il tempo che mi dedichi.

jekisi Profilo | Senior Member

460 messaggi | Data Invio: lun 25 gen 2016 - 12:32

In c# nonsoaiutarti

mi spiace

EugenioLena Profilo | Newbie

4 messaggi | Data Invio: mar 26 gen 2016 - 11:57

Ok, grazie lo stesso.
Spero che qualche altra anima buona mi risponda.
Buone cose!!

ysdemarc Profilo | Expert

587 messaggi | Data Invio: lun 22 feb 2016 - 18:20

Cosa significa andare a stam,pare l'ultimo record?

vuoi che in crystal report esca solo l'ultimo record o stampare l'ultima pagina o cosa?

Un piccolo esempio non guasterebbe.
Vincenzo
Programmatore sbilenco

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 !