Salut
Je ne comprend pas pourquoi que le "Insert" marche tres bien mais le "update"
ne fonctionne pas.
Code VB.Net : 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
33
34
35 Imports System Imports System.Data Imports System.Data.OleDb Public Class Form1 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim conn As New System.Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C:\AccessDataBase\petitepetiteDB.mdb") Dim connSql As OleDbCommand = conn.CreateCommand() conn.Open() connSql.CommandText = "INSERT INTO Ledepart (Cestquoi, lenumero,quand,Etat) VALUES('BINGO','412','04/26/2012','1')" connSql.ExecuteNonQuery() conn.Close() End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Dim conn As New System.Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C:\AccessDataBase\petitepetiteDB.mdb") Dim connSql As OleDbCommand = conn.CreateCommand() conn.Open() connSql.CommandText = "UPDATE Ledepart SET Etat='2' WHERE lenumero='412'" connSql.ExecuteNonQuery() conn.Close() End Sub End Class
j ai cette erreur la pour le updateMerci d'avance(ligne 30){"Type de données incompatible dans l'expression du critère."}
Partager