Discussion :

[jojo1284]

Bonjour à tous,

Je viens vers vous car j'ai épuisé mon stock de bidouillage en tout genre et pour finir, je m'y perds complètement.

Voilà mon problème :

J'ai une BD access avec 2 tables (entre autre).

Ma première table (tâche) utilise un identifiant de la seconde table (personne) pour savoir qui a encodé la tâche.

Ma requête utilise donc une jointure, pas de soucis là dessus.

Si j'ai bien compris la logique (et reprenez moi si je me trompe) pour afficher les résultats de la requête dans une datagridview, il faut :

Créer un dataadapter
Créer un dataset
Créer un datatable qui a la structure du résultat de ma requête
Ajouter ce datatable au dataset
Faire un fill du dataadapter vers la table du dataset
Spécifier le datasource du datagridview comme étant le datatable

Là niveau code ça coince j'ai déjà essayé plusieurs combinaisons et j'ai tjrs mon datagrid qui n'affiche rien

A Plus long terme il faudrait aussi que je puisse ajouter un nouveau record (row), supprimer, et mettre à jour.

J'ai déjà lu et relu la doc Philippe Lasserre et rien n'y fait

Pour infos je suis donc en vb.net sous visual studio 2010 ultimate (framework 4 donc).

D'avance merci.

[sihammaster]

Bonjour,
Si tu peux nous ecrire ton code pour bien voir le probleme.

[jojo1284]

ok mais à force de changer je doute que ca veuille dire quelque chose encore..

mais bon, voilà :

Code :

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

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
 
ObjetConnection = New OleDbConnection()
        ObjetConnection.ConnectionString = ChaineConnec
 
        ObjetConnection.Open()
 
        ObjetCommand = New OleDbCommand("SELECT tache.dateeve, tache.tache, tache.demandeur, utilisateur.id, utilisateur.nom FROM tache, utilisateurs WHERE tache.encodeur = utilisateurs.id")
 
        ObjetDataAdapter = New OleDbDataAdapter(ObjetCommand)
 
        ObjetCommand.Connection() = ObjetConnection
        ObjetDataTable = New DataTable("reqTache")
        Dim colonne As DataColumn
 
        colonne = New DataColumn()
        colonne.DataType = System.Type.GetType("System.DateTime")    
        colonne.ColumnName = "dateeve"
        ObjetDataTable.Columns.Add(colonne)
 
        colonne = New DataColumn()
        colonne.DataType = System.Type.GetType("System.String")   
        colonne.ColumnName = "tache"
        ObjetDataTable.Columns.Add(colonne)
 
        colonne = New DataColumn()
        colonne.DataType = System.Type.GetType("System.String") 
        colonne.ColumnName = "demandeur"
        ObjetDataTable.Columns.Add(colonne)
 
        colonne = New DataColumn()
        colonne.DataType = System.Type.GetType("System.Integer")
        colonne.ColumnName = "userId"
        ObjetDataTable.Columns.Add(colonne)
 
        colonne = New DataColumn()
        colonne.DataType = System.Type.GetType("System.String") 
        colonne.ColumnName = "userNom"
        ObjetDataTable.Columns.Add(colonne)
 
        ObjetDataSet.Tables.Add(ObjetDataTable)
 
ObjetDataAdapter.Fill(ObjetDataSet, "reqTache")
 
BindingSource1.DataSource = ObjetDataTable
        DataGridView1.DataSource = BindingSource1
        BindingNavigator1.BindingSource = BindingSource1

Voilà, ça ne doit surement pas être bon.

Merci d'avance.

[sinople]

Je suis encore sous le coup de la digestion mais il manque, entre la datatable et le datagridview, une binding source.

Autrement je vous conseille d'utiliser VisualStudio et la partie Source de donnée pour définir ta table access en tant que source de donnée.

Ainsi le code créant le dataset, les datatables, les tableadapter seront générés automatiquement. Encore mieux normalement dans la fenetre source de donnée, vous verrez apparaitre vos tables dans la base de donnée avec la possiblité de les glisser directement dans votre formulaire sous en tant que controle. Et là l'IDE créera automatiquement les objet nécessaires pour gérer l'opération.

Une fois le résultat optenu (sous la forme d'un prototype fonctionnel), je vous recommande fortement d'étudier les objets et le code généré par Visual Studio afin de comprendre ce qui a été générée. Vous pourrez ainsi ensuite croiser vos nouvelles connaissances avec la doc Philippe Lasserre et la doc MSDN afin de pousser plus loin l'utilisation du datagridview (qui est un controle relativement complexe).

[mactwist69]

Je ne voudrait pas contredire mon prédécesseur, mais j'ai un autre avis.

Utiliser le designer pour ajouter des sources de données, ça peut sembler sympa, mais en code c'est pas grand chose a faire, et quand une erreur survient, il est impossible de la réparer, vu que le code est auto générer.

(Par exemple, si dans une table de ta BDD, tu modifie une colonne, c'est la catastrophe, il faut tout recommencer).

Ensuite le binding source n'est pas obligatoire.

Dans ton code, tu ajoutes manuellement des colonnes a ta datatable, or ce n'est aps nécessaire. Le dataadapter va te les créers.

Ton erreur viens je pense dans l'indication de la connexion a utiliser.

Si je reprends ton code, ca donnerai ca:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
ObjetConnection = New OleDbConnection()
        ObjetConnection.ConnectionString = ChaineConnec
 
        ObjetConnection.Open()
        'Ligne de code modifier au bout
        ObjetCommand = New OleDbCommand("SELECT tache.dateeve, tache.tache, tache.demandeur, utilisateur.id, utilisateur.nom FROM tache, utilisateurs WHERE tache.encodeur = utilisateurs.id", ObjetConnection)
 
        ObjetDataAdapter = New OleDbDataAdapter(ObjetCommand)
 
        ObjetDataTable = New DataTable("reqTache")
 
        ObjetDataSet.Tables.Add(ObjetDataTable)
 
        ObjetDataAdapter.Fill(ObjetDataSet, "reqTache")
 
        DataGridView1.DataSource = ObjetDataSet.Tables("reqTache")
 
        'Ne pas oublier de fermer la connection
        ObjetConnection.Close()

[peregna2007]

Essaie de voir ceci :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
  Dim ObjetConnection As New OleDb.OleDbConnection(ChaineConnec)
 
        'Remplissage du DataGrid
        Dim ObjetDataSet As DataSet = New DataSet
        Dim ObjetDataAdapter As OleDb.OleDbDataAdapter
        Dim LaRequete As String = "SELECT tache.dateeve, tache.tache, tache.demandeur, utilisateur.id, utilisateur.nom FROM tache, utilisateurs WHERE tache.encodeur = utilisateurs.id"
 
        ObjetConnection.Open()
 
        ObjetDataAdapter = New OleDb.OleDbDataAdapter(LaRequete, ObjetConnection)
        ObjetDataAdapter.Fill(ObjetDataSet, "tache, utilisateurs")
        DataGridView1.DataSource = ObjetDataSet.Tables("tache, utilisateurs").DefaultView
 
        ObjetConnection.Close()

[jojo1284]

merci beaucoup pour vos réponses !

Je test ça demain, pas le temps aujourd'hui et je post le résultat pour aider si d'autres ont le même problème.