validation dans un datagridview

**djelloharmel** · 14/11/2011, 08h39

bonjour,
j'ai placé sur mon formulaire un datagridview qui a les propriétés:
-activer l'ajout (coché)
-activer la modification (coché)
-activer la suppression (coché)

et le code suivant:

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
Imports System
Imports System.Data
Imports System.Data.SqlClient
Imports Microsoft.VisualBasic
 
Public Class p_client
    Dim sqlCMD As SqlCommand
    Dim Dadpter As SqlDataAdapter
    Dim tab As DataTable
    Dim Dset As DataSet
 
    Private Sub ExecuteLMD(ByVal bSql As String, ByVal bTable As String)
        sqlCMD = New SqlCommand(bSql)
        Dadpter = New SqlDataAdapter(sqlCMD)
        tab = New DataTable
        Dset = New DataSet
        sqlCMD.Connection = sqlCONN
        Dadpter.Fill(Dset, bTable)
        tab = Dset.Tables(bTable)
        sqlCMD.CommandType = CommandType.Text
        Dadpter.SelectCommand = sqlCMD
    End Sub
 
    Private Sub cmdfermer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdfermer.Click
        Me.Close()
    End Sub
 
    Private Sub p_client_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ExecuteLMD("select * from client", "client")
        Grille.DataSource = tab
    End Sub
End Class

lorsque j'entre un enregistrement sur une ligne et que je passe à la ligne suivante, l'enregistrement n'est pas validé. je ne sais pas s'il y a une ligne de code que je n'ai pas insérer.

merci d'avance.

**tomlev** · 14/11/2011, 09h57

Qu'est-ce que tu entends pas "n'est pas validé" exactement ? Qu'est-ce que tu veux que ça fasse ?

**asmduty** · 14/11/2011, 10h08

Moi ce qu'il faut m'expliquer c'est la présence de ces 2 lignes :

Code :

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

1
2
        sqlCMD.CommandType = CommandType.Text
        Dadpter.SelectCommand = sqlCMD

alors que les opérations SQL sont passées

Sinon je ne comprends pas vraiment non plus le problème, le but, etc.

**tomlev** · 14/11/2011, 10h36

Envoyé par asmduty

Moi ce qu'il faut m'expliquer c'est la présence de ces 2 lignes :

Code :

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

1
2
        sqlCMD.CommandType = CommandType.Text
        Dadpter.SelectCommand = sqlCMD

alors que les opérations SQL sont passées

Effectivement... et même si c'était avant l'exécution, ça changerait rien : CommandType.Text est la valeur par défaut, et la SelectCommand a déjà été spécifiée via le constructeur

**djelloharmel** · 14/11/2011, 14h03

j'ai fait 2 formulaires:
1. l'un où je renseigne ma table t_client à partir de contrôles textbox
2. l'autre à partir d'un datagridview.

j'ai effacé les 2 lignes

Code :

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

1
2
sqlCMD.CommandType = CommandType.Text
        Dadpter.SelectCommand = sqlCMD

je renseigne sans problème la table t_client dans le formulaire 1.
par contre, à partir du formulaire 2., je saisis des valeurs dans les colonnes mais elles n'apparaissent pas dans ma table t_client.

**tomlev** · 14/11/2011, 14h34

Impossible de répondre avec les éléments que tu donnes...
A quoi correspond le code que tu as posté au départ ? au 1e ou au 2e formulaire ? Quel est la relation entre les 2 formulaire ? Appelles-tu l'un à partir de l'autre ? Comment passes tu les données entre les 2 ?

Bref, essaie d'être plus précis...

**djelloharmel** · 16/11/2011, 07h55

le formulaire 1 ne contient que des contrôles textbox et le formulaire 2 contient le datagridview. les 2 formulaires ne sont pas en relation. je veux juste renseigner ma table à partir de ces 2 formulaires. je n'ai aucun problème avec le formulaire 1. par contre, le formulaire 2 dont le code a déjà été donné en début de discussion ne renseigne pas ma table. je remets le code corrigé:

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
Imports System
Imports System.Data
Imports System.Data.SqlClient
Imports Microsoft.VisualBasic
 
Public Class p_client
    Dim sqlCMD As SqlCommand
    Dim Dadpter As SqlDataAdapter
    Dim tab As DataTable
    Dim Dset As DataSet
 
    Private Sub ExecuteLMD(ByVal bSql As String, ByVal bTable As String)
        sqlCMD = New SqlCommand(bSql)
        Dadpter = New SqlDataAdapter(sqlCMD)
        tab = New DataTable
        Dset = New DataSet
        sqlCMD.Connection = sqlCONN
        Dadpter.Fill(Dset, bTable)
        tab = Dset.Tables(bTable)
    End Sub
 
    Private Sub cmdfermer_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdfermer.Click
        Me.Close()
    End Sub
 
    Private Sub p_client_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ExecuteLMD("select * from client", "client")
        Grille.DataSource = tab
    End Sub
End Class

merci de votre assistance

**tomlev** · 16/11/2011, 09h49

Bah oui, tu n'as écrit aucun code pour mettre à jour la table... c'est pas automatique !

Tu peux utiliser le DataAdapter :

Code :

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

1
2
Dim commandBuilder As New SqlCommandBuilder(Dadpter)
Dadpter.Update(tab)

(le CommandBuilder permet de générer automatiquement les commandes UPDATE/INSERT/DELETE à partir du SELECT que tu as indiqué ; par contre il faut que ta table ait une clé primaire)

**djelloharmel** · 16/11/2011, 11h09

j'ai les lignes de codes

Code :

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

1
2
Dim commandBuilder As New SqlCommandBuilder(Dadpter)
Dadpter.Update(tab)

dans la procédure "ExecuteLMD", ça ne donne rien.
je l'ai déplacé dans l'évènement p_client_load, ça ne donne toujours rien.

ou est ce que je dois placer ce bout de code?

cordialement

**tomlev** · 16/11/2011, 11h24

Envoyé par djelloharmel

j'ai les lignes de codes

Code :

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

1
2
Dim commandBuilder As New SqlCommandBuilder(Dadpter)
Dadpter.Update(tab)

dans la procédure "ExecuteLMD", ça ne donne rien.
je l'ai déplacé dans l'évènement p_client_load, ça ne donne toujours rien.

ou est ce que je dois placer ce bout de code?

cordialement

Bah il faut le mettre à l'endroit où tu veux enregistrer les données... si tu le mets dans le Load, ça sert à rien, vu que tu as pas encore modifié les données. Tu as pas un bouton "enregistrer" ou "valider" ou un truc comme ça ?

**djelloharmel** · 16/11/2011, 12h07

je voulais qu'en passant d'une ligne à une autre, les données de la ligne précédente soit enregistrées dans la table.

en essayant avec le code

Code :

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

1
2
3
4
5
6
7
8
Private Sub Grille_ColumnStateChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewColumnStateChangedEventArgs) Handles Grille.ColumnStateChanged
        Try
            Dim commandBuilder As New SqlCommandBuilder(Dadpter)
            Dadpter.Update(tab)
        Catch ex As Exception
            MsgBox(Err.Description, , "Echec de validation")
        End Try
    End Sub

j'y suis parvenu. mais je dois avouer que c'est un hasard. n'y a-t-il pas un meilleur évènement que celui-ci sur la grille qui me permette de parvenir à mes fins.

**Maniz** · 16/11/2011, 12h12

Tu as l'évenement RowLeave
Lorsque qu'une ligne perd le focus, que ce n'est plus la ligne actuelle, peut-être que celui la te convient mieux?

**tomlev** · 16/11/2011, 12h17

Envoyé par djelloharmel

je voulais qu'en passant d'une ligne à une autre, les données de la ligne précédente soit enregistrées dans la table.

Ca aurait été plus simple si tu l'avais dit dès le départ

L'évènement le plus approprié pour ça à mon avis est RowValidated

**djelloharmel** · 16/11/2011, 12h22

oui. je conviens avec vous que je n'ai pas été assez clair.
il y a deux blocages que j'ai à ce niveau pour passer complètement:

1. je ne veux pas qu'on passe à une autre ligne s'il y a une erreur de validation
2. je veux un message de confirmation de suppression si je veux effacer une ou des ligne(s)

**tomlev** · 16/11/2011, 14h30

Envoyé par djelloharmel

1. je ne veux pas qu'on passe à une autre ligne s'il y a une erreur de validation

Gère l'évènement RowValidating, et s'il y a une erreur tu mets e.Cancel à true

Envoyé par djelloharmel

2. je veux un message de confirmation de suppression si je veux effacer une ou des ligne(s)

Gère l'évènement UserDeletingRow, affiche ton message de confirmation, et si l'utilisateur ne confirme pas tu mets e.Cancel à true

**djelloharmel** · 16/11/2011, 19h19

pas de problème avec le message de suppression d'une ligne.
par contre, je ne sais pas comment annuler la mise à jour d'une nouvelle ligne sur laquelle il y a une erreur de validation lorsque je passe à une ligne existante.

je m'explique mieux:
je suis sur une nouvelle ligne en mode d'insertion de données. si je passe à une nouvelle ligne (vierge), alors message d'échec de validation et impossible d'aller à la nouvelle nouvelle. mais si je passe à une ligne existante, message d'erreur de validation avec la possibilité de valider d'abord la ligne (en cours) ou de l'annuler avant de passer à la ligne existante. dans le second cas, la nouvelle ligne s'efface et le curseur va à la ligne existante.

**asmduty** · 17/11/2011, 08h21

Ouais enfin là faut peut être un peu chercher aussi, c'est quand même pas sorcier à faire, tu as toutes les cartes en main maintenant.

validation dans un datagridview [Débutant]

VB.NET

Discussions similaires

Partager

Partager