Utiliser crystal reports avec un dataset cree par code et non par le wizard
Soyez le premier à donner votre avis sur cette source.
Vue 10 988 fois - Téléchargée 2 237 fois
Description
Voici un petit programme qui marche en vb .net 2005 et qui illustre la maniere d'utiliser un rapport de crystal avec un dataset cree par code. Le source original a ete trouve sur le net et a ete modifie pour fonctionner avec oledb (base de donnees mdb d'access).
Codes Sources
A voir également
- Temperaire
- Crystal reports python - Meilleures réponses
- Python crystal reports - Meilleures réponses
- Visual Basic / VB.NET : Utiliser crystal raports avec dataset cree par code pas avec le wizard suite - Guide
- Visual Basic / VB.NET : Utiliser crystal report - CodeS SourceS - Guide
- ASP / ASP.NET : Utiliser crystal report dans une web form - CodeS SourceS - Guide
- Utiliser un dataset cree par programmation avec crystal reports en vb.net 2005 ✓ - Forum - VB.NET
- Comment imprime un etat crystal report en utilisant les sockets ✓ - Forum - C# / .NET
12 janv. 2012 à 09:05
votre code est un peu compliquer car vous creer une table temperaire pour afficher un etat et vous le supprimer encore.ce qui est bizard !!.
bon voila je vous donne ce code simple est pratique pour corriger ou remplacer votre code :
il faut creer une classe de connexion que je l'ai appeler ModuleConnexion dans laquelle vous introduiser la schaine de connexion comme suit
Public Sub connection()
connexion.ConnectionString = "Data Source=localhost;Initial Catalog=nomde la base;;User id=users passe ;password=votre mot de passe;Integrated Security=True"
connexion.Open()
End Sub
ensuite sur la frame ou vouler vous voir l'etat vous introduiser le code ci dessus
ModuleConnexion.connection()
sql = "SELECT * from T_Poste "
Dim da As New SqlDataAdapter(sql, ModuleConnexion.connexion)
Dim ds As New DataSet
Dim objRpt As New CrystalReport1
da.Fill(ds, "T_Poste")
objRpt.SetDataSource(ds.Tables("T_Poste"))
CrystalReportViewer1.ReportSource = objRpt
CrystalReportViewer1.Refresh()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
ModuleConnexion.connexion.Close()
bonne code
azyez mourad
24 oct. 2010 à 05:48
vas y voir
http://vb.net-informations.com/crystal-report/vb.net_crystal_report_without_database.htm
23 oct. 2010 à 18:38
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.