[VS2005 CR] Paramètre date/heure [Résolu]

[collaud_vb]

hello !

j'ai un crystal report qui m'affiche des données. Mais avec les années, je risque d'en avoir beacoup ... j'essaie donc de trouver comment spécifier un filtre qui me renvoie que les données entre date x et date y...

j'ai d'ailleurs dans mes données ce champs 'date' !

j'ai trouvé comment créer un champ de paramètre. j'ai sélectionner le type "date/heure", valeurs de plage, etc. et j'ai inséré mon param dans mon cr

quand j'exécute, une fenêtre m'invite à entrer la plage de date, mais mon reportviewer me montre quand meme la totalité des données... le filtre ne marche pas !!

Avec l'Expert en sélection, cela marche, mais c'est pas très dynamique !!!

Pourquoi ça ne marche pas ??? je sèche depuis des heures.....

[collaud_vb]

j'm'étais dis que c'était peut-être a cause du format de la date, etc...

mais meme pas ! Les autres types de données merdouille aussi... est-ce qu'on doit coder à quelque part ? ou est-ce que le reportviewer est trop faible ? j'ai vu un reportdocument ?? faudrait plutot ça ?

Help please !

[le_tisseur]

A ta place je ferais plutôt un filtre en amont afin d'éviter de charger toutes les données et de les donner à crystal.

[collaud_vb]

ok, et comment je fais ça ?

on peut mettre deux DateTimePicker dans l'appli windows for en VB et dire à Crystal de ne prendre que les données comprises entre ces deux dates ??

Comment ?

[le_tisseur]

Tu utilises un dataset fortement typé que tu rempli avec une requete adequat.

[collaud_vb]

mmmh... moui et ça donnerait quoi ?? Genre ça :

Code :

Me.ActivitesTableAdapter.Fill(Me.GpiDataSet.activites)

mais y a moyen d'améliorer pour dire : "ne charge que les données dont ce champs y = cette donnée x"

c'est ça !?

[le_tisseur]

Envoyé par collaud_vb

mmmh... moui et ça donnerait quoi ?? Genre ça :

Code :

Me.ActivitesTableAdapter.Fill(Me.GpiDataSet.activites)

mais y a moyen d'améliorer pour dire : "ne charge que les données dont ce champs y = cette donnée x"

c'est ça !?

Bein oui.
Tu peux en autre faire une requete sql adapté, on n'est pas obligé de charger toute la base

[collaud_vb]

ha voui ! Modifier les requêtes sql...

Ou plutot en ajouter une nouvelle...pis là j trouve un code du genre "ne charge que les x derniers mois"...

faut voir...

[collaud_vb]

chuis en train de paramétrer ma requète... "en dur" ça fonctionne !!

Code :

SELECT id_activite, date_activite, description, temps, id_num_projet, id_num_pers_elsa, id_entreprise FROM dbo.activites WHERE date_activite >= '10/01/2006 00:00:00' AND date_activite <= '10/31/2006 00:00:00'


mais now j'aimerais faire du dynamique, on peut ?? genre dire : "entre les valeurs de ces DateTimePick' ??

Code :

SELECT id_activite, date_activite, description, temps, id_num_projet, id_num_pers_elsa, id_entreprise FROM dbo.activites WHERE date_activite >= Form93.DateTimePicker1.value AND date_activite <=Form93.DateTimePicker2.value


mais la synthaxe est fausse !! Help please !!

[le_tisseur]

Il faut que tu rajoute un ' avant et après chaque date.
Donc tu fais un ToString avec le format qu'il faut (attention à la différente entre mois et minute), que tu entoures d'apostrophe :
string maChaineDateSql = "'" + maDate.ToString("DD/MM/YYYY") + "'" ;

[collaud_vb]

oulàà attends, je suis pas sur de piger ta phrase...

effectivement, ça gueule moins comme cela :

Code :

1
2
 
SELECT id_activite, date_activite, description, temps, id_num_projet, id_num_pers_elsa, id_entreprise FROM dbo.activites WHERE date_activite >= 'Form93.DateTimePicker1.value' AND date_activite <= 'Form93.DateTimePicker2.value'

mais ça me dit : "syntax error converting datetime from character string"

donc c'est bel et bien un prob de type ! Mais je pige pas la fin de ton post !!

----edit

pask moi je mets mon code dans le sql adapter... c'est dans le code du form que je fais le tostring ?

----edit

ça gueule toujours... mais si je mets '10/26/2006' à la place de 'Form93.Textbox4.text', ça fonctionne... c'est la dynamique avec des objets vb qui marche pas...

Code :

SELECT id_activite, date_activite, description, temps, id_num_projet, id_num_pers_elsa, id_entreprise FROM dbo.activites WHERE date_activite >= 'Form93.Textbox3.text' AND date_activite <= 'Form93.Textbox4.text'

----edit

j'deviens badingue...

je réexplique depuis le début ce que j'ai fait :

j'ai ajouté une requête 'FillBy' dans mon table adapter pour la table 'activite'... ça donne :

Code :

SELECT id_activite, date_activite, description, temps, id_num_projet, id_num_pers_elsa, id_entreprise FROM dbo.activites WHERE date_activite >= 'a' AND date_activite <= 'b'

'a' et 'b' sont des variables... j'ai essayé de mettre 'DateTimePicker1.value' ou 'Me.DateTimePicker1.value' ou encore 'Form93.DateTimePicker1.value', mais aussi essayé avec des textbox, des variables........ rien

si je mets en dur dans la requête sql, no prob.. je mets sous ce format 'mm/jj/aaaa'...et ça fonctionne... mais avec des objet vb.net... ça va pas..... "syntax error converting datetime from character string"...

voici le code de mon Form93, le form contenant mon reportviewer...

j'ai tout mis derrière un bouton... pis y a du code qui me mets les dates dans un textbox... sinon je remplis 2 autres textbox, bref, c'est "statique", mais c est pour tester encore...

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
 
Public Class Form93
 
    Private Sub Form93_Load(ByVal sender AS System.Object, ByVal e AS System.EventArgs) Handles MyBase.LOAD
 
 
    End Sub
 
    Private Sub Button1_Click(ByVal sender AS System.Object, ByVal e AS System.EventArgs) Handles Button1.Click
 
        Try
 
            TextBox1.Text = DateTimePicker1.Value.ToString
            TextBox2.Text = DateTimePicker2.Value.ToString
 
            Dim a AS String = "10/02/2006"
            Dim b AS String = "10/22/2006"
            TextBox3.Text = a
            TextBox4.Text = b
 
            'TODO : cette ligne de code charge les données dans la table 'GpiDataSet.entreprises'. Vous pouvez la déplacer ou la supprimer selon vos besoins.
            Me.EntreprisesTableAdapter1.Fill(Me.GpiDataSet1.entreprises)
            'TODO : cette ligne de code charge les données dans la TABLE 'GpiDataSet.projets'. Vous pouvez la déplacer ou la supprimer selon vos besoins.
            Me.ProjetsTableAdapter1.Fill(Me.GpiDataSet1.projets)
            'TODO : cette ligne de code charge les données dans la table 'GpiDataSet.collaborateurs'. Vous pouvez la déplacer ou la supprimer selon vos besoins.
            Me.CollaborateursTableAdapter1.Fill(Me.GpiDataSet1.collaborateurs)
            'TODO : cette ligne de code charge les données dans la TABLE 'GpiDataSet.participer_entreprises'. Vous pouvez la déplacer ou la supprimer selon vos besoins.
            Me.Participer_entreprisesTableAdapter1.Fill(Me.GpiDataSet1.participer_entreprises)
            'TODO : cette ligne de code charge les données dans la table 'GpiDataSet.participer_collaborateurs'. Vous pouvez la déplacer ou la supprimer selon vos besoins.
            Me.Participer_collaborateursTableAdapter1.Fill(Me.GpiDataSet1.participer_collaborateurs)
            'TODO : cette ligne de code charge les données dans la TABLE 'GpiDataSet.activites'. Vous pouvez la déplacer ou la supprimer selon vos besoins.
            'Me.ActivitesTableAdapter1.Fill(Me.GpiDataSet1.activites)
            Me.ActivitesTableAdapter1.FillBy(Me.GpiDataSet1.activites)
 
            Cursor = Cursors.WaitCursor
 
            Dim report As New CrystalReport4
            report.SetDataSource(GpiDataSet1)
            CrystalReportViewer1.ReportSource = report
 
            Cursor = Cursors.Default
 
        Catch ex As System.Exception
            System.Windows.Forms.MessageBox.Show(ex.Message)
        End Try
 
    End Sub
 
End Class

[collaud_vb]

!!!! J'ai avancé là !!

Code :

SELECT id_activite, date_activite, description, temps, id_num_projet, id_num_pers_elsa, id_entreprise FROM dbo.activites WHERE date_activite > @date_activite

en passant cette requête dans le tableadapter et en mettant ce code de charge dans mon form :

Code :

1
2
 
Me.ActivitesTableAdapter1.FillBy(Me.GpiDataSet1.activites, TextBox1.Text)

j'arrive à avoir les enregistrement entre la date insérée dans un textbox et le dernier enregistrement... j'ai plus qu'à trouver comment faire pr insérer 2 dates (fourchette) et ça me suffirait... après le must c'est pour faire fonctionner 2 datetimepicker... mais c est plus dur apparemment...

[collaud_vb]

C'est BOOON !!!! J'ai "fini" mon projet !!!!

Code de la requête supplémentaire du TableAdapter :

Code :

SELECT id_activite, date_activite, description, temps, id_num_projet, id_num_pers_elsa, id_entreprise FROM dbo.activites WHERE date_activite BETWEEN @date1 AND @date2

code dans le win Form :

Code :

1
2
3
4
5
6
Dim date1 AS Date
        Dim date2 AS Date
        date1 = DateTimePicker1.Value
        date2 = DateTimePicker2.Value
 
        Me.ActivitesTableAdapter1.FillBy(Me.GpiDataSet1.activites, date1, date2)

Amen, allelouia...