Bonsoir les génies
J'utilise Visual Studio 2012 et Access 2007. J'ai une table Certifs qui contient un champs DateCertifs de type date. En Ajoutant une Nouvelle Certifs tous fonctionne bien, pour la visualisation des Certifs j'utilise une DataGirdView et tous est OK. Je clique sur une ligne quelconque pour supprimer une Certifs présice je reçoit un message d'erreur " Type de données incompatible dans l'expression du critère. "
Voici mon Code:
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 Private Sub DG_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles DG.CellContentClick Label2.Text = CDate(DG.CurrentRow.Cells(0).Value.ToString) End Sub Sub SuppCertifs() Try '--------------------- Suppression dans la Table Certifs --------------------------------- Cn.Open() Cmd.Connection = Cn Cmd.CommandType = CommandType.Text Cmd.CommandText = "DELETE FROM Certifs WHERE DateCertifs = '" & Label2.Text & "'" Cmd.ExecuteNonQuery() Cn.Close() '------------------- Re-Afficher DataGrid après Ajout dan la Table Certifs ------------------------ Ds.Clear() : Dt.Clear() AfficheCertifs() Catch ex As Exception MsgBox(ex.Message) Cn.Close() End Try End Sub
Partager