La conversion de la chaine "" en 'Integer' n'est pas valide

Version imprimable

bonjour j'essaye de faire une suppression dans ma base de donnée mon projet affiche La conversion en de la chaine "" en 'Integer' n'est pas valide j'utilise VISUAL STUDIO 2012 et ma base de donnée est dans access 2013. j'ai besoin de votre aide :oops::oops:
Code:

1 2 3 4 5 6 OUVERTUREBASE() CMD = New OleDb.OleDbCommand CMD.Connection = CNX CMD.CommandText = "delete * from CLIENT where NUMERO = " & Me.List_Client.SelectedItems.Item(0).SubItems(0).Text & "" Dim i As Int16 = CMD.ExecuteNonQuery() CNX.Close()

03/08/2016, 23h47
DotNetMatt

Deja il est tres mauvais de faire de la concatenation avec des requetes SQL... Il faut utiliser des requetes parametrees (voir Tuto ou FAQ).

Ensuite, quel est le type de la colonne "NUMERO" dans ta base de donnees ?
04/08/2016, 00h10
konebrin

c'est NuméroAuto de access
donc un numerique
04/08/2016, 00h17
DotNetMatt

Ok, le probleme ne vient pas de la, mais je viens de voir une erreur de syntaxe dans ta requete. Elle devrait etre somme suit :

Code:

DELETE FROM CLIENT WHERE NUMERO = ...

(J'ai supprime l'asterisque '*').

Ensuite, le probleme vient probablement du fait que Me.List_Client.SelectedItems.Item(0).SubItems(0).Text te retourne une chaine vide... Ensuite ton SGBD essaie de convertir cela en INT pour matcher le type de la colonne NUMERO et ca ne marche pas. Verifie donc que la ligne de code te renvoie bien une valeur.
04/08/2016, 00h47
konebrin

j'ai vérifié sa retourne une valeur et j'ai récuperé cette valeur avec une variable integer et j'ai inséré cette variable dans la requete sa fait toujours la meme chose
04/08/2016, 00h57
DotNetMatt

Bizarre. Peux-tu poster ton code avec la variable ?

j'ai affiché le contenu dans un msgbox sa affiche 1
voila le code avec la requête parametre c'est ma premiere fois de l'utiliser mais sa affiche le meme message

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 MsgBox(Me.List_Client.SelectedItems.Item(0).SubItems(0).Text)
        Try
            Dim ittt As Integer = Me.List_Client.SelectedItems.Item(0).SubItems(0).Text
            OUVERTUREBASE()
            Dim Rquet As String
            Rquet = "DELETE FROM [CLIENT] WHERE [NUMERO] = @numero"
            CMD = New OleDb.OleDbCommand(Rquet, CNX)
            With CMD
                .Parameters("@numero").Value = CInt(Me.List_Client.SelectedItems.Item(0).SubItems(0).Text)
            End With
            Try
                CMD.Connection.Open()
                CMD.ExecuteNonQuery()
                CMD.Connection.Close()
            Catch ex As Exception
                MsgBox(ex.Message)
            End Try
            CHARGEMENT()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try

Il me semble qu'Access ne supporte par les parametres nommes. Il faut utiliser un '?' pour chaque parametre, puis les ajouter dans la commande dans le meme ordre. Exemple :
Code:

1 2 3 4 5 Rquet = "DELETE FROM [CLIENT] WHERE [NUMERO] = ?" CMD = New OleDb.OleDbCommand(Rquet, CNX) With CMD .Parameters.AddWithValue("numero", CInt(Me.List_Client.SelectedItems.Item(0).SubItems(0).Text)) End With

Bonjour,
pourquoi convertir le string en iteger alors que ça fonctionne direct sans conversion?
Code:

1 2 3 quet = "DELETE FROM [CLIENT] WHERE [NUMERO] = ?" CMD = New OleDb.OleDbCommand(Rquet, CNX) CMD.Parameters.AddWithValue("@numero", Me.List_Client.SelectedItems.Item(0).SubItems(0).Text)
si non tu laisse Access faire le travail!*

Code:

CMD.CommandText = "delete * from CLIENT where NUMERO =val( " & Me.List_Client.SelectedItems.Item(0).SubItems(0).Text & ")"

04/08/2016, 16h21
jopopmk

Citation:

Envoyé par DotNetMatt

Il me semble qu'Access ne supporte par les parametres nommes. [..]

Il me semble qu'il les accepte ... mais qu'il s'en fout : il fait le replace selon l'ordre d'insertion des Parameters, peu importe leurs noms.
04/08/2016, 18h17
Invité

Citation:

Envoyé par jopopmk

Il me semble qu'il les accepte ... mais qu'il s'en fout : il fait le replace selon l'ordre d'insertion des Parameters, peu importe leurs noms.

Access utilise ?,?,?,? Pour chaque paramètres mais veut @Champ en paramètres!

Re,

soit la fonction suivante :

Code:

1
2
3
4
5
6
7
8
// Ma_Connexion est une connexion valide et ouverte vers un .accdb avec le provider Microsoft.ACE.OLEDB.12.0
public string ExecuteStuff(string pReqName1, string pParName1, string pReqName2, string pParName2) {
	OleDbCommand cmd = new OleDbCommand("SELECT nickname FROM employes WHERE firstname = " + pReqName1 + " AND lastname = " + pReqName2, Ma_Connexion);
	cmd.Parameters.Add(pParName1, OleDbType.VarChar).Value = "Marc";
	cmd.Parameters.Add(pParName2, OleDbType.VarChar).Value = "DUPONT";
	object tmp = cmd.ExecuteScalar();
	return tmp != null ? tmp.ToString() : "[not found]";
}

Alors tous les appels suivants renvoient la même valeur :

Code:

1
2
3
4
5
6
7
cnx.ExecuteStuff("@a", "@a", "@b", "@b");
cnx.ExecuteStuff("?", "@a", "?", "@b");
cnx.ExecuteStuff("@a", "@b", "@c", "@d");
cnx.ExecuteStuff("?", "x", "?", "y");
cnx.ExecuteStuff("?", "?", "?", "?");
cnx.ExecuteStuff("?", "", "?", "");
cnx.ExecuteStuff("?", null, "?", null);