Discussion :

[toham]

Bonjour, voila je me réfère à vous, car après des recherches sur internet et dans mes bouquins sur VS08, je n'arrive pas à déterminé la valeur d'une checkbox, quand je lui indique la colonne

dgv_enfants.Rows(e.RowIndex).Cells("nomColonne").Value

il m'indique après execution que la colonne n'existe pas, pourtant c'est bien les nom des colonnes. J'ai tout tester, zoner l'aide de MSDN, mais je ne trouve pas ce que je veux.
Pour les détails sur le projet, j'ai 3 tables, Enfants, Semaines, et Pointer, la table enfants contient bien évidement des informations sur des enfants, la table semaine contient juste le numéro d'une semaine, son année, et la date du début de semaine et de fin de semaine, et la table pointer qui contient le numéro de l'élève , le numéro de la semaine et son année , ainsi que 4 champ de type bouleen, qui permet de savoir si un enfant est là un tels jour ....
Voici ma form :


Donc le premier DGV correspond a la liste d'enfant, le bouton permet de le pointer, et le deuxieme DGV est alimenter, donc j'aimerais que quand je coche les checkbox et que j'appuie sur le bouton de la colonne pointer , que cela recupere la valeur des colonnes "lundi", "mardi".... en booléen et ainsi faire un insert into dans la base pointer.

Bref j'espère vous pourrez m'aider, je désespère et perd mon temps...
Cordialement
Toham

[Chris@Xerox]

Bonjour,

Et avec ceci :

Code :

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

dgv_enfants.Rows(dgv_enfants.CurrentCell.RowIndex).Cells("nomColonne").Value

[toham]

Merci pour la réponse,
le problème est toujours le même, il me précise que le nom de la colonne n'existe pas, j'ai essayer de rentrer l'index mais il est hors limite car il prend pas en compte les autres checkbox donc crois qu'il y a seulement 6 colonnes au lieu de 10 , le nom est pourtant bien le bon (copier-coller).

[olsimare]

Bonjour.

Vu le code, tu es sur une gestion d'évènement.

Lequel ?

Cdt.

[toham]

Je travail sur l'événement CellOnClick, car enfaite quand j'appuie sur le bouton a coté des checkbox sa insert dans ma base les valeur booléenne des checkbox.

[Chris@Xerox]

Bonjour,

Pourrais-tu mettre un peu plus de code stp?

[Chris@Xerox]

Ha mais .... Maintenant que j'y pense:

Code :

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

dgv_enfants.Rows(e.RowIndex).Cells.Item("nomColonne").Value

[Chris@Xerox]

Et je dirais même plus:

Code :

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

1
2
dgv_enfants.Columns(index colonne).Name = "nomColonne"
dgv_enfants.Rows(e.RowIndex).Cells.Item("nomColonne").Value

Car le Name n'est pas égal au Header

[toham]

non mais c'est pas un probleme de nom, puisque à la création des colonnes on precise le header et le nom, et la valeur de la propriété "name" est bien ce que je marque dans le nom de la colonne, meme quand je met l'index de la colonne cela me dit qu'elle n'existe pas ou la confond avec une colonne qu'il reconnait.

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
 Private Sub dgv_semaines_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles dgv_semaines.CellContentClick
         Dim Cn As OleDb.OleDbConnection
         Dim CmdR As OleDb.OleDbCommand       
         Dim strCon$ = CStr("Provider=Microsoft.Jet.OLEDB.4.0;" + "Data Source=H:\Pointage Eleves Cantine\Application\Pointage\DataBase\PEC.mdb;")
 
        Dim intNumero As Integer = CInt(dgv_semaines.Item(0, e.RowIndex).Value)
        Dim intAnnee As Integer = CInt(dgv_semaines.Item(1, e.RowIndex).Value)
        Dim numeroEleve As Integer = numeroEnfant (variable globale)
 
       Cn = New OleDb.OleDbConnection(strCon)
       Cn.ConnectionString = strCon
       Cn.Open()
       CmdR = Cn.CreateCommand()
 
       CmdR.CommandText = "insert into pointer values(" & numeroEleve & "," & intNumero & "," & intAnnee & "," & dgv_enfants.Rows(e.RowIndex).Cells("lundi").Value  & "' ," & dgv_enfants.Rows(e.RowIndex).Cells("mardi").Value  & "," & dgv_enfants.Rows(e.RowIndex).Cells("jeudi").Value  & "," & dgv_enfants.Rows(e.RowIndex).Cells("vendredi").Value  & ")"
 
        CmdR.ExecuteNonQuery()
 
        End If

[Chris@Xerox]

Tu devrais utiliser des variables paramétrées au lieu des concaténations:

Code :

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

CmdR.CommandText = "insert into pointer(numele, numsem, annsem, lunpnt) values(" & numeroEleve & "," & intNumero & "," & intAnnee & "," & dgv_enfants.Rows(e.RowIndex).Cells("lundi").Value  & "' ," & dgv_enfants.Rows(e.RowIndex).Cells("mardi").Value  & "," & dgv_enfants.Rows(e.RowIndex).Cells("jeudi").Value  & "," & dgv_enfants.Rows(e.RowIndex).Cells("vendredi").Value  & ")"

Le problème vient peut-être de là.

[toham]

Ne t'inquiete pas, à la base dans le code, j'affecte le resultat du checkbox dans des variables, c'est juste je fais beaucoup de phase de test pour comprendre d'ou viens l'erreur. Que je n'ai toujours pas trouvé ....