Vider un datagridview connecté avec sqlite

Version imprimable

18/05/2023, 09h37
Frédéric Desavoie

Vider un datagridview connecté avec sqlite
Bonjour,

Mon but est de pouvoir ouvrir diverses bases sqlite à la suite.
Donc remplir le DGV puis le vider pour le remplir à nouveau mais rien ne fonctionne pour le vider et faire apparaitre la nouvelle base.
j'ai tenté
Code:

1 2 3 4 DataGridView_SaisieJ.Columns.Clear() DataGridView_SaisieJ.Rows.Clear() DataGridView_SaisieJ.Refresh() DataGridView_SaisieJ.DataSource = Nothing
et rien ne va

Avez-vous d'autres propositions ?
Merci
18/05/2023, 10h58
Mario Rousson

De mémoire tu peux seulement rebâtir ton data source avec ta nouvelle datatable
18/05/2023, 12h22
Phil Rob

Bonjour,
Comme Mario, je te donne un avis de mémoire (je n'aurai pas accès à mon PC avant demain :().
Mettre le DataSource à Nothing, éventuellement le vider ENSUITE (...Rows.Clear), et réaffecter le DataSource.
Attention, l'affectation du DataSource se fait avec le DataTable qui contient les données. Le DataTable ne se vide pas tout seul et accumule les données d'un chargement à l'autre. Pour avoir effectivement le résultat de la dernière lecture de DB, il faut vider le DataTable.
Si le DataTable est toujours lié au DataSource, un Clear du DataTable devrait suffir pour vider aussi le DataGridViewx.
J espère que ceci t'aidera....

J'ai testé en vain

Bonjour,
Merci pour vos réponses

Voici mon code,
Je suis débutant, merci de votre compréhension mais critiques acceptées.
J'ai ajouté les 4 lignes noting, columns er rows clear puis refresh ce qui ne change rien

Merci de votre aide

Code:

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
Sub Remplissage_Datagridview() 'Remplissage du Datagridview à l'ouverture de la base
 
            Dim strsql As String = "select * from Joueur"
 
            connection = New SQLite.SQLiteConnection(constring)
            connection.Close()  'Ferme une éventuelle base ouverte
 
            connection.Open()
 
            sqlite_command = New SQLite.SQLiteCommand(strsql, connection)
            Dim sqlite_dataadapter As New SQLiteDataAdapter
            sqlite_dataadapter.SelectCommand = sqlite_command
            Dim dt As New DataTable
 
            Form_Principale.DataGridView_SaisieJ.DataSource = Nothing
            Form_Principale.DataGridView_SaisieJ.Columns.Clear()
            Form_Principale.DataGridView_SaisieJ.Rows.Clear()
            Form_Principale.DataGridView_SaisieJ.Refresh()
 
            sqlite_dataadapter.Fill(dt)
            Form_Principale.DataGridView_SaisieJ.DataSource = dt
            sqlite_command.Dispose()
 
            Connaitre_NbreJ()
 
            connection.Close()
            connection.Dispose()
 
      End Sub

19/05/2023, 10h48
Phil Rob
Bonjour
Je te réponds avec mon Smartphone car le site ne fonctionne pas sur mon pc ce matin.
Il conviendrait que le DataTable soit connu là où tu le charge et audwi dans le Form du DataGridView.
Tu devrais avoir sa déclaration Friend ou Public.
Exemple :

Code:

Public DT As DataTable

Et dans la procédure dont tu nous donne le code :
Code:

1 2 3 ... DT = New DataTable ...
Et dans cette procédure, l'affectation du DataSource devrait suffir. La mise à Nothing du DataSource n est nécessaire ici que si me DataGridView a déjà été affecté ailleurs.

J'espère que quelqu'un va dépanner le site, il plante sur " le respact de la vie privée ".

.....
25/05/2023, 14h57
umfred
A une époque, j'avais fait ainsi
Code:

1 2 3 dgv.DataSource= vbNull 'à remplacer probablement par Nothing aujourd'hui dgv.DataSource= maDataTable 'à l'époque, j'utilisais une liste en fait dgv.Refresh()
Tu dis que ça ne marche pas, mais tu ne dis pas vraiment ce qui ne marche pas ? la grille reste vide? les données ne sont pas changées ?
03/06/2023, 13h49
Frédéric Desavoie

Désolé du retard

Bonjour, j'étais en déplacement sans mon ordi maison, donc pas moyen de retravailler sur le problème.

En regardant mieux, je viens de me rendre compte que le message d'erreur que j'avais me disait juste que je ne pointais sur aucun fichier .db

Néanmoins, merci de votre aide et la prochaine fois je ferai attention à donner plus de détails.

Salut,
pour vider ta Table tu fais

MaTable = Ta DataTable

Code:

1
2
3
4
5
6
7
8
 
MaTable.Clear() 'Qui permet de vider la DataTable
 
'Si tu as une colone auto-Incrémenté tu remets ton prochain incrément à zéro
  MaTable.Columns("TaColonne en auto-increment").AutoIncrementStep = -1
  MaTable.Columns("TaColonne en auto-increment").AutoIncrementSeed = -1
  MaTable.Columns("TaColonne en auto-increment").AutoIncrementStep = 1
  MaTable.Columns("TaColonne en auto-increment").AutoIncrementSeed = 0

En espérant que cela puisse t'aider.