Crystal report probleme

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
A voir également:

4 réponses

Utilisateur anonyme
 
Bonjour,

Ta fonction semble être du PL/SQL, mais avec quel langage
comptes-tu manipuler Crystal Report ?

Cdt

Lupin
0
kamal1899 Messages postés 7 Statut Membre
 
Bonjour Lupin.PC4,

c'est avec Asp.net (vb) et base de donnees SQL Server

Cdt
0
Utilisateur anonyme
 
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
0
kamal1899 Messages postés 7 Statut Membre
 
Merci pour votre solution, mais ça marche pas :(
0