Discussion :

[stdebordeau]

Salut à tous,
je voudrais votre opinion sur comment efficacement remplaçer l'usage des recordsets. j'ai travaillé jusque là avec DAO, et avec les recordset c'était , enfin vous voyez.

Alors j'hésite, travailler directement sur les tables du dataset en utilisant le referencement colonne ligne, ou bien utiliser le curseur des objets de liaison (bindingsource)

merci de m'orienter

[vinowan]

moi j'ain utiliser le tableadapter du dataset.

tu fait d'abord glisser la table dans ton form.

mais il ya un petit dadictiel dans les cours proposé ici:
http://http://plasserre.developpez.com/vsommair.htm

sinon moi j'ai fait comme ca:

pour ecrire dans les colonne nom_utilisateur, date_du_login, ... de la table historique_login

Code :

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

1
2
3
4
5
6
7
8
 
  dim row As DataRow
            row = DataSet1.historique_login.NewRow()
            row("nom_utilisateur") = TBox_nom_utilisateur.Text
            row("date_du_login") = DateString
            row("heure_du_login") = TimeOfDay
            DataSet1.historique_login.Rows.Add(row)
            Me.Historique_loginTableAdapter.Update(DataSet1)

pour faire un test ou une recherche dans une table
ici table mot_de_passe_utilisateur
on cherche le mot de passe de l'utilisateur en cours et on regarde si son mot de passe correspond.

Code :

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

1
2
3
4
5
6
7
8
 
  For Each element In DataSet1.mot_de_passe_utilisateur
            If element.nom_utilisateur = TBox_nom_utilisateur.Text Then
                If element.mot_de_passe = TBox_mot_de_passe.Text Then
                    mot_de_passe_et_nom_utilisateur_correct = True
                End If
            End If
        Next

et un exemple de requete dans la table listing_pointage
ici je selectionne toute la table pour ensuite y faire different filtrage

Code :

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

1
2
3
4
5
6
7
 
    Dim query = From record In DataSet1.listing_pointage Select record
 
        'filtre par nom utilisateur de la query 
        If nom_utilisateur <> "tout selectionner" Then
            query = From record In query Where record.nom_utilisateur = nom_utilisateur Select record
        End If

j'espere que cela t'aidera

[stdebordeau]

merci labo vwd de me faire part de ton expérience.
je serai heureux de recevoir d'autres contributions sur le sujet.
manière éfficace de travailler à l'image des recordsets dans DAO.
vous pouvez faire l'économie des détails, pour le reste je chercherai.