Discussion :

[zizou2007]

Salut à tous. Mon problème est peut être simple, mais je parviens pas à le résoudre:
J'ai une combobox indépendante "cboVilleCible" et une DataGridView "TblMouvementsDataGridView" liée à une table Access "TblMouvements".
Ce que j'essaie de faire, c'est d'enregistrer chaque fois la valeur sélectionnée de ma combobox dans la dernière ligne vide de ma DataGridView. Voici mon code :

Code :

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

1
2
3
4
5
PrivateSub cboVilleCible_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cboVilleCible.SelectedIndexChanged
  TblMouvementsDataGridView.Item(4, TblMouvementsDataGridView.RowCount - 1).Value = cboVilleCible.Text
  MsgBox("Mutation effectuée avec succès.")
EndSub

Et j'enregistre comme suit:

Code :

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

1
2
3
4
5
6
7
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  Me.Validate()
  Me.TblMouvementsBindingSource.EndEdit()
  Me.TblMouvementsTableAdapter.Update(Me.GRHDataSet1.TblMouvements)
  GRHDataSet1.AcceptChanges()
EndSub

La valeur sélectionnée apparaît bien dans la dernière ligne de ma DataGridView, mais ne s'enregistre pas lorsque je ferme l'application. Ce qui est bizarre, c'est quand je clique sur cette dernière ligne, la valeur disparaît même avant de fermer le formulaire!
Mais lorsque je précise une ligne particulière, ça marche! Par exemple :

Code :

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

1
2
3
4
PrivateSub cboVilleCible_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cboVilleCible.SelectedIndexChanged
 TblMouvementsDataGridView.Item(4, 2).Value = cboVilleCible.Text
EndSub

Est ce que j'indique mal la dernière ligne de la DataGridView ?
J'attend votre aide.

[zizou2007]

Salut à tous. Le problème était d'enregistrer des données sur la dernière ligne qui permet d'ajouter de nouveaux enregistrements!
Ce que j'ai fait :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Private Sub cboVilleCible_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cboVilleCible.SelectedIndexChanged
  ' Ajouter une nouvelle ligne pour éviter la non sauvegarde 
  ' relative à la dernière ligne :
  TblMouvementsTableAdapter.Insert(TblPersonnelDataGridView.Item(0, 0).Value, "", "", "")
  TblMouvementsDataGridView.Item(4, TblMouvementsDataGridView.RowCount - 1).Value = cboVilleCible.Text
  MessageBox.Show("Mutation effectuée avec succès.", "Mutation", MessageBoxButtons.OKCancel, MessageBoxIcon.Information)
  Me.Validate()
  Me.TblMouvementsBindingSource.EndEdit()
  Me.TblMouvementsTableAdapter.Update(Me.GRHDataSet1.TblMouvements)
End Sub

Et :

Code :

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

1
2
3
4
5
6
7
Private Sub frmMouvements_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load
  Me.TblMouvementsTableAdapter.Fill(Me.GRHDataSet1.TblMouvements)
  ' Pour ne pas avoir 2 lignes vides lorsque j'insère une nouvelle ligne 
  ' lors du clic sur "cboVilleCible" :
  TblMouvementsDataGridView.AllowUserToAddRows = False
End Sub

Et ça marche .