Probleme avec ma requete SQL

Bonjour à  tous,
Voila je galère depuis plusieurs jours avec ma requete
j'ai un listview qui est charger avec ma table access
en clickant sur une ligne du listview et ensuite sur mon bouton je veux que la ligne s'efface de ma base
Mais j'ai toujours un message d'erreur
pourtant ce code fonctionne parfaitement sur une autre appli que j'ai pris sur ce site
je ne comprends pas !

Je debute et je bloque dessus depuis longtemps
Je ne sais pas si le probleme est sur la construction de ma requete SQL ou si c'est sur le code qui execute la requete

Mon message d'erreur :
Aucune valeur donnée pour un ou plusieurs des parametres requis
à system.data.oledb.oledb.command.executecommandtextforsingleresult etc .........
Merci beaucoup a tous pour votre aide

Voici mon code :

PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

SQLString =

"DELETE FROM PROG " _

&

"WHERE ([Fabricant] = '" & ListView1.Items(ListView1Position).Text & "'" _

&

"AND [Type] = '" & ListView1.Items(ListView1Position).SubItems(1).Text & "'" _

&

"AND [D,signation] = '" & ListView1.Items(ListView1Position).SubItems(2).Text & "'" _

&

"AND [Taille m,moire] = '" & ListView1.Items(ListView1Position).SubItems(3).Text & "'" _

&

"AND [Boitier] = '" & ListView1.Items(ListView1Position).SubItems(4).Text & "'" _

&

"AND [Temps d'acc¦s] = '" & ListView1.Items(ListView1Position).SubItems(5).Text & "'" _

&

"AND [Nombre d'octets] = '" & ListView1.Items(ListView1Position).SubItems(6).Text & "'" _

&

"AND [Code Fabricant] = '" & ListView1.Items(ListView1Position).SubItems(7).Text & "'" _

&

"AND [Code Composant] = '" & ListView1.Items(ListView1Position).SubItems(8).Text & "'"

Try

 

objconnection.Open()

Dim objCommand AsNew OleDbCommand(SQLString, objconnection)

objCommand.ExecuteNonQuery()

objconnection.Close()

Catch ex As Exception

MsgBox(ex.ToString)

EndTry

Chargebd()

'Affiche dans label15 le nombre d'entr,es dans la base de donn,es

Label15.Text = ListView1.Items.Count

EndSub

Non, "DELETE FROM PROG" est une syntaxe habituellement correcte

De plus le point virgule n'est pas non plus obligatoire lorsque on passe une requette depuis le code

Ceci dit, ça n'empeche pas de faire des essais pour voir.

---- Sevyc64  (alias Casy) ----

---

# LE PARTAGE EST NOTRE FORCE #

Le probleme est toujours le meme
point virgule ou pas
et la " je seche "

Sur quelle ligne exactement tu as l'erreur?

---- Sevyc64  (alias Casy) ----

---

# LE PARTAGE EST NOTRE FORCE #

bonsoir Casy,
les données ne sont pas effacées de ma table "PROG"
et lors du click sur mon bouton1 j'ai une fenetre avec :

"Aucune valeur donnée pour un ou plusieurs des parametres requis
à system.data.oledb.oledb.command.executecommandtextforsingleresult etc ........."
Je cherche depuis un long moment et je ne trouve pas
je te remercie pour ton aide
A+

Oui mais justement il serait interessant de savoir sur quelle ligne tu as l'erreur, car pour moi ce code me semble correct. D'autant plus que tu as un gestionnaire d'erreur sur l'execution de la requette, donc tu ne devrais pas avoir le message d'erreur, je pense.

En plus le message d'erreur ne semble pas correspondre avec l'instruction que tu utilise :
system.data.oledb.oledb.command.executecommandtextforsingleresult <--> objCommand.ExecuteNonQuery()

Mais l'erreur peux aussi venir de la fonction ChargeBD()

Execute ton code en mode debug et sur l'erreur tu devrais etre arreté sur la ligne en cause.


---- Sevyc64  (alias Casy) ----

---

# LE PARTAGE EST NOTRE FORCE #

Les espaces entre les mots clé !
Penses-y quand tu passes à la ligne : Ajoute un espace avant de fermer le " ou devant chaque AND
(déjà dis)

Toujours le meme probleme meme avec des "espaces"

L'erreur est sur :

Catch ex As Exception

le detail de l'erreur :

Interception de System.Data.OleDb.OleDbException
  ErrorCode=-2147217904
  Message="Aucune valeur donnée pour un ou plusieurs des paramètres requis."
  Source="Microsoft JET Database Engine"
  StackTrace:
       à System.Data.OleDb.OleDbCommand.ExecuteCommandTextForSingleResult(tagDBPARAMS dbParams, Object& executeResult)
       à System.Data.OleDb.OleDbCommand.ExecuteCommandText(Object& executeResult)
       à System.Data.OleDb.OleDbCommand.ExecuteCommand(CommandBehavior behavior, Object& executeResult)
       à System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method)
       à System.Data.OleDb.OleDbCommand.ExecuteNonQuery()
       à PROGRAMMATEUR_D_EPROM.form11.Button1_Click(Object sender, EventArgs e)

J'ai le meme soucis.

Je pense que ça vient du fait que la requete SQL ne donne aucun résultat... (RecordSet vide).
Je vais essayer de voir comment passer outre...

bon courage !