Crystal report probleme
kamal1899
Messages postés
7
Statut
Membre
-
kamal1899 Messages postés 7 Statut Membre -
kamal1899 Messages postés 7 Statut Membre -
Bonjour,
j'ai une fonction avec un parametre qui retour une table et je veux afficher les colons dans un "crystal report"
exemple :
CREATE FUNCTION produit(@mois INT)
RETURNS TABLE AS RETURN (
SELECT id, nom, mois, prix
FROM produits
)
la requête est complique, c'est juste un exemple
Merci d'avance
j'ai une fonction avec un parametre qui retour une table et je veux afficher les colons dans un "crystal report"
exemple :
CREATE FUNCTION produit(@mois INT)
RETURNS TABLE AS RETURN (
SELECT id, nom, mois, prix
FROM produits
)
la requête est complique, c'est juste un exemple
Merci d'avance
4 réponses
-
Bonjour,
Ta fonction semble être du PL/SQL, mais avec quel langage
comptes-tu manipuler Crystal Report ?
Cdt
Lupin -
Bonjour Lupin.PC4,
c'est avec Asp.net (vb) et base de donnees SQL Server
Cdt -
re:
Je suis plutôt familier avec VBForms.Net, néanmoins
ça doit se ressembler beaucoup.
1.) Tu crée un Dataset static avec le nom de tes colonnes
2.) Tu instancie celui-ci :
Dim LeDataSet As New MonDataSet
3.) Tu alimente le DataSet à partir du DataReader
3.) Tu instancie un objet Rapport (*.rpt)
Dim ObjetRapport As MonRapport
4.) Tu appelle une méthode de visualisation dans un form secondaire
Dim FenRap As New FormRapports()
FenRap.ViewReport(LeDataSet)
FenRap.Show()
Méthode du nouveau form
Public Sub ViewReport(ByVal LeDataSet As DataSet) Dim Report As CrystalDecisions.CrystalReports.Engine.ReportDocument = New CrystalDecisions.CrystalReports.Engine.ReportDocument Dim CrystalReportViewer As CrystalDecisions.Windows.Forms.CrystalReportViewer = New CrystalDecisions.Windows.Forms.CrystalReportViewer CrystalReportViewer.ActiveViewIndex = 0 CrystalReportViewer.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle CrystalReportViewer.DisplayGroupTree = False CrystalReportViewer.Dock = System.Windows.Forms.DockStyle.Fill CrystalReportViewer.Location = New System.Drawing.Point(0, 0) CrystalReportViewer.Name = "CrystalReportViewer" Report.Load(Dossier_RPT & "RapportVideo.rpt") Report.SetDataSource(LeDataSet) CrystalReportViewer.ReportSource = Report Me.Panneau.Controls.Add(CrystalReportViewer) End Sub
Cdt
Lupin -
