Discussion :

[Thyyb]

Bonjour,

Je vous sollicite encore une fois ^^

Alors voila mes 3 petites lignes de code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Naccess.Dec_SQL = "UPDATE " & [NomTable] & " SET " &[ComboBox_ch1].Text & " = '" & [TextBox_ch1].Text & "' WHERE Numero_ID = " & ListView_tbmodif.FocusedItem.Text
MsgBox(Naccess.Dec_SQL)
Ndata = Naccess.Execute

Mon problème est que cette requête fonctionne pour 1 champ de ma table, et non pas pour les autres (30).
Je suis donc très embêté xD

Dans ma msgbox il m'affiche bien

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

UPDATE matable SET monchamp = mavaleur WHERE Numero_ID = monelementselectionné

Mais ensuite il me dit
"Erreur de syntaxe dans l'instruction UPDATE"
Ce message je ne l'ai que pour 30 de mes champs, et pour 1 seul, la requête fonctionne ...

Avez-vous des idées ?

ps : je devrais passer en paramètre dans ma requête ça je le sais, est-ce que ça pourrait être la raison de mon problème ?

[_Ez3kiel]

Je conseille la requête paramétrée.

Ce message je ne l'ai que pour 30 de mes champs, et pour 1 seul, la requête fonctionne ...

C'est à dire ? Tu fais cette requête avec 30 champs ? Ou 30x cette requete avec des champs différents ?

[Thyyb]

Ok, donc je passe par paramètre déjà

Dans un 1er temps je voulais tester et donc j'ai essayé cette même requête avec les autres champs, et ça ne fonctionne qu'avec 1 seul

[_Ez3kiel]

Dans le doute, je rappelle la syntaxe d'un update multiple ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
-- Bon
Update TaTable Set TonChamp = 'TaValeur', TonChamp2 = 'TaValeur2' Where id = TonID;
 
-- Pas bon
Update TaTable Set TonChamp = 'TaValeur' AND TonChamp2 = 'TaValeur2' Where id = TonID;

Ok, donc je passe par paramètre déjà

Tu utilises des objets OleDb ? Je me trompe peut-être, mais on ne dirait pas une requête paramétrée... (D'autant plus si tu arrives à voir ta requête avec les valeurs de ses paramètres dans une msgbox...)

[Thyyb]

Pour la syntaxe du update j'utilisais la bonne, mais merci de me la rappeler
Enfin, le ";" est-il obligatoire a la fin de ma requête ?

Sinon la dans le code que je t'ai montré, je ne passe pas en paramètre. Je n'utilisais donc pas encore d'objet OleDb dans le code que tu peux voir

Mais de mon côté sur mon pc, je m'y mets ^^

[_Ez3kiel]

Pour la syntaxe du update j'utilisais la bonne, mais merci de me la rappeler
Enfin, le ";" est-il obligatoire a la fin de ma requête ?

Sinon la dans le code que je t'ai montré, je ne passe pas en paramètre. Je n'utilisais donc pas encore d'objet OleDb dans le code que tu peux voir

Mais de mon côté sur mon pc, je m'y mets ^^

Non il n'est pas obligatoire, la requête se finit à la fin de la chaîne, mais mettre ";" défini explicitement la fin de la requête.

Sinon avant exécution, place la requête dans ton presse-papier, et colle la sur un éditeur SQL de ta BDD, tu pourras la tester dessus.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Clipboard.SetText(TaRequete)

[Thyyb]

Alors j'ai réessayé avec mon code sans paramètre et apparemment, c'est un soucis d'espace dans les noms des champs.
J'ai beau avoir mis mes champs entre [], il compte quand même les espaces ...

Et un autre soucis sur un champ qui s'appelle "Value" mais je suppose que c'est un mot réservé ?
Comment je peux gérer le soucis du "value" ? Sachant que je n'ai pas le choix des noms des champs, il n'en est pas autrement :/

[_Ez3kiel]

Alors j'ai réessayé avec mon code sans paramètre et apparemment, c'est un soucis d'espace dans les noms des champs.
J'ai beau avoir mis mes champs entre [], il compte quand même les espaces ...

Et un autre soucis sur un champ qui s'appelle "Value" mais je suppose que c'est un mot réservé ?
Comment je peux gérer le soucis du "value" ? Sachant que je n'ai pas le choix des noms des champs, il n'en est pas autrement :/

Des champs avec espace dans le nom ... des champs qui s'appelle Value ... Il n'y a vraiment pas moyen de revoir la base ?
Tu es partie pour un tas de soucis avec ce genre de défaut de conception ...

[Thyyb]

Ba j'en ai parlé avec l'entreprise et leur ai dit que les espaces dans les noms de champs c'était pas bon, donc la il est ok il est au courant. Faut que je lui dise aussi pour le value mais pour ça j'ai pas de soucis.
Mais en fait ils veulent que l'on puisse importer n'importe quelle base de données, dont des mauvais qui mettent des espaces dans des champs ou qui les appellent value ... ^^

En clair, je n'est pas le choix de la base, faut que j'arrive à tout gérer en fait :o
Ou alors ils utiliseront uniquement leurs bases ...

[_Ez3kiel]

Haaaa d'accord je comprend mieux.

Donc la seule solution c'est de gérer tous les cas ...
Mais sinon, en théorie, avec les crochets ça devrait être bon ...
Tu as essayé ce que j'avais préconisé ? Mettre la requête dans la presse papier avant execution, la coller dans un éditeur SQL de ta bdd et lancer pour qu'il te crache une exception plus localisée/précise.

[Thyyb]

Je suis nouveau sur vb.net, j'ai que 2 mois ^^ Ca va être corsé lol

Alors donc avec les crochets ça ne fonctionnait pas, après peut être que je les mettaient pas au bon endroit.

Oui j'ai testé ce que tu m'a dit, c'est ce qui m'a permis de voir qu'en fait le code ne géré pas les espaces mal gré les [] et le "value".

Je vais essayer le paramètre sinon mais tout cela m'intrigue quand même. J'ai une âme de Sherlock des fois
Pourquoi cela ne marche pas alors que ça devrait ? ^^

[_Ez3kiel]

Je suis nouveau sur vb.net, j'ai que 2 mois ^^ Ca va être corsé lol

Alors donc avec les crochets ça ne fonctionnait pas, après peut être que je les mettaient pas au bon endroit.

Oui j'ai testé ce que tu m'a dit, c'est ce qui m'a permis de voir qu'en fait le code ne géré pas les espaces mal gré les [] et le "value".

Je vais essayer le paramètre sinon mais tout cela m'intrigue quand même. J'ai une âme de Sherlock des fois
Pourquoi cela ne marche pas alors que ça devrait ? ^^

Je ne fais du Vb.NET que depuis un peu plus d'1 an ...
Mais en milieu professionnel et avec ce forum, on apprend très très vite.

Et sinon je crois que je viens de comprendre -tardivement- le souci ...

Et si tu fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Dim req As String = "UPDATE [" & NomTable & "] SET [" & ComboBox_ch1.Text & "] = '" & TextBox_ch1.Text & "' WHERE Numero_ID = " & ListView_tbmodif.FocusedItem.Text

Plutôt que

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Dim req As String = "UPDATE " & [NomTable] & " SET " &[ComboBox_ch1].Text & " = '" & [TextBox_ch1].Text & "' WHERE Numero_ID = " & ListView_tbmodif.FocusedItem.Text

[Thyyb]

Oui je pense aussi que le code ça s'apprend vite en général, en fonction de la compréhension de chacun aussi

J'ai essayé et effectivement le problème était la place des [].
En voyant ta solution je me suis rendu compte de ma bêtise :o

Merci en tout cas c'est sympa de m'aider encore une fois

[_Ez3kiel]

Y'a pas de soucis, bon courage pour la suite.
(N'oublie pas le )