Discussion :

[simotaqi]

bonjour ; j'ai crée un état, est j'y ai ajouté deux champs parametrés, puis mis ce code dans l'evenement de bouton imprimer
remarque impression est mon crystalreport

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Dim cr As New Impression
        cr.SetDataSource("dataset1.xsd")
        cr.SetParameterValue("Nomclient", Nomclient.text)
        cr.SetParameterValue("Numerofacture", Numerofacture.text)
        Appercu.CrystalReportViewer1.ReportSource = cr
        Appercu.CrystalReportViewer1.RefreshReport()
        Appercu.Show()

il m'affiche cette erreur dans la ligne 3

Browse field not found

les noms des champs parametrés sont corrects ainsi que le nom du dataset

merci pour votre reponse

[sebnantes]

Hello ^^

1ère chose, il vaut mieux se servir des indices que du nom des champs paramétrés. Tu peux toujours faire une erreur là dessus, utilises les indices (ils commencent à 0).

Ensuite, tu te sers ben de Crystal Report ? Je ne comprend pas ce que représente Impression dans ton code.

[simotaqi]

bonjour, merci pour ta remarque..

J'ai la meme erreur si je change le nom parametre en indice de parametre...

Impression.rpt est le nom de mon crystal report

et puis j'ai une petite remarque: si j'enleve cette ligne:

cr.SetDataSource("dataset1.xsd")

il ne me donne plus cette erreur , mais si je donne des valeurs au champs parametres

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
cr.SetParameterValue("Nomclient","simotaqi")
        cr.SetParameterValue("Numerofacture", "3")

le debogeur me donne des formulaire disant que je doit entrer les valeurs nouveau, c'est a dire qu'il ignore les valeur que j'ai passe par code

et merci encore

[sebnantes]

Il me semble que ta déclaration de ton état n'est pas bon dans ce cas. Il faut que tu fasses :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim cr as CrystalDecisions.CrystalReports.Engine.ReportDocument
cr = New Impression

Je ne suis pas sûr à 100% que ce code rectifie ton problème.

[simotaqi]

j'ai enleve la ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
cr.SetDataSource("dataset1.xsd")

il ne m'affiche plus le message d'erreur , mais il me donne un formulaire pour entrer les valeurs des champs parametres malgre que je les ai passe dans le code

voici la capture d'ecran:
http://tbata.com/Sans%20titre.jpg

[sebnantes]

C'est normal, tu lui places des champs paramétrés donc si tu n'as pas de sources, il te demande de rentrer en direct les infos. Par contre, ton dataSet, tu l'as créé avec VS ou en lignes de code ? Si c'est la deuxième option, il semblerait que ce n'est pas possible de lier ton rapport au dataSet.

Je détaille un peu. Quand tu crées ton rapport dans l'explorateur de champs, tu as Champs de base de données. Dans celui-ci, as-tu la (ou les) table(s) liée(s) à ton Dataset ?

[simotaqi]

pour le dataset1, je l'ai cree avec VS, et pour les champs de base de donnees dans l'explorateur des champs sont egalement cree, mais je souviens plus est ce que je les ai cree avant le dataset1 ou apres, car pour ces champs , j'ai etablie une connexion directe a la base de donnees sont passer par le dataset1

(Me manque une methodologie de travail avec les CR )

[sebnantes]

Peux tu me mettre un screen de ton DataSet et ton rapport (avec champs de bases de données déployé) stp ? ^^

[simotaqi]

Ok
Voici mon dataset1
http://tbata.com/Sans%20titre1.jpg

et voici mon crystal report

http://tbata.com/Sans%20titre3.jpg

je veux faire une impression de facture, en fait, l'utilisateur choisit un client et une facture de ce client dans les deux combobox (prmiere screen) ensuite le programme lui affiche la facture ... et merci

si tu veux voir tout le projet , je suis pret a l'envoyer a ton mail

[sebnantes]

Il faut que tu déploies le DataBase Fields pour que je puisse voir qu'elles sont les liens avec Etat.

[simotaqi]

Comment puis je deployer?

si tu veux voir tout le projet , je vais le t'envoyer avec la base de donnees

[sebnantes]

Vérifie que NomClient.text a bien une valeur avec un point d'arrêt

[simotaqi]

Merci Sebnantes, Merci Lilrom
ca marche bien maintenant, j'ai fait comme ma dit lilrom , maintenant , lorsque je selectionne un nom client, il m'affiche la valeur du combobox sans passer par la fenetre des valeurs discretes ,

merci encore ...

[sebnantes]

Juste par curiosité, tu peux me mettre le code final qui fonctionne ^^ Je pense en plus que si certains font des recherches, cela pourra leur servir

[simotaqi]

Bon voila

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim cr As CrystalDecisions.CrystalReports.Engine.ReportDocument
        cr = New Impression
        Appercu.CrystalReportViewer1.ReportSource = cr
        ds5.Clear()
        Dim dap1 As OleDbDataAdapter = New OleDbDataAdapter("select * from client where Nom='" + Nomclient.Text + "'", cnx.ConnectionString)
        dap1.Fill(ds5, "client")
        Dim dap2 As OleDbDataAdapter = New OleDbDataAdapter("select * from facture where Mat_facture=" + Numerofacture.Text, cnx.ConnectionString)
        dap2.Fill(ds5, "facture")
        cr.SetDataSource(ds5)
        Appercu.CrystalReportViewer1.RefreshReport()
        Appercu.Show()

Pourtant , j'ai encore besoin de faire des requetes select pour les autres tables

dans le crystalreport , je glisse les champs de base de donnees Nom et Mat_facture, et j'ai supprimer les champs parametres

[Hinault Romaric]

Merci Sebnantes, Merci Lilrom

lilroma pas Lilrom .

courage pour la suite
@++

[simotaqi]

Excuse moi; plutot lilroma