[VBA] Erreur de syntaxe ?

Bonjour,

L'erreur 3075 apparaît et me dit qu'il y a une erreur de syntaxe mais je ne vois pas où 8O

Code:

---

1 2 3 4 5 6 7 8 9 10

SQL = "INSERT INTO EquipmentCharacteristics ( IDCharacteristic , IDEquipment ,CharacValue )" SQL = SQL & " SELECT [CharacteristicsList].[IDCharacteristic], [Equipments].[IDEquipment], '*" & Me.txt_value & "*' " SQL = SQL & " FROM CharacteristicsList, Equipments, EquipmentFamilies, EquipmentTypes" SQL = SQL & " WHERE [Equipments].[IDEquipment] IN (SELECT [Equipments].[IDEquipment] FROM Equipments " SQL = SQL & " WHERE [Equipments].[IDFamily] IN (SELECT [Equipments].[IDFamily] FROM Equipments " SQL = SQL & " WHERE [Equipments]![IDEquipment] = " SQL = SQL & cmb_IDEq & ") AND [Equipments].[IDType] IN (SELECT [Equipments].[IDType] FROM Equipments " SQL = SQL & " WHERE [Equipments]![IDEquipment] = " SQL = SQL & cmb_IDEq & ")) And [Equipments]![IDEquipment] != " SQL = SQL & cmb_IDEq & ";"

---

Merci d'être mon sauveur :mouarf:

Code:

---

1 2 3

SQL = SQL & " WHERE [Equipments].[IDEquipment] IN (SELECT [Equipments].[IDEquipment] FROM Equipments " SQL = SQL & " WHERE [Equipments].[IDFamily] IN (SELECT [Equipments].[IDFamily] FROM Equipments " SQL = SQL & " WHERE [Equipments]![IDEquipment] = "

---

Tu batis une requête SQL avec 3 clauses Where !!!!!!

Il y en a 2 de trop ....

Salut,

Les différentes clauses WHERE sont inclus dans les IN (SELECT ...FROM ... WHERE) il ne faut pas que je les remplace par des AND, Si ?

je n'ai pas lu attentivement ta requête (elle est bien longue)

mais si ce sont des conditions qui s'ajoutent, oui tu mets des AND

Re,

elles ne s'ajoutent pas justement, j'ai mieux te présenter le code histoire que ça soit moins chiant à lire :D

Cf. Pièce jointe

Salut,

Code:

---

And [Equipments]![IDEquipment] != "

---

Access ne connait pas !=
Utilise <>

Merci plus d'erreur de syntaxe ! :P
Par contre quand access me demande si je suis d'accord pour qu'il ajoute 114000 lignes je lui dis NON !!:D

il est censé mettre à jour une quinzaine de ligens tout au plus... d'où pourrait provenir un si grand nombre d'ajouts ? (ma table principale : Equipments contient à peine 111 éléments!)

Transforme ta requête insert en requête de sélection pour voir si les enregistrements retournés sont bien ceux attendus.

Si je transforme un "INSERT INTO" en SELECT rien ne me sera retourné vu que les critères n'existent pas (je voulais les ajouter donc ils ne sont aps encore dans la table). Tu veux que j'essaye d'ajouter un critère existant déjà ? et ma sélection va apparaître où ? je n'ai rien prévu à cet effet

Citation:

---

Envoyé par dalmasma

Si je transforme un "INSERT INTO" en SELECT rien ne me sera retourné vu que les critères n'existent pas (je voulais les ajouter donc ils ne sont aps encore dans la table). Tu veux que j'essaye d'ajouter un critère existant déjà ? et ma sélection va apparaître où ? je n'ai rien prévu à cet effet

---

Qu'est ce qu'on peut écrire comme c****** quand on est pas réveillé :aie:

Désolé...

Citation:

---

il est censé mettre à jour une quinzaine de ligens tout au plus...

---

Ajouter.. tu ajoutes ;)

Que va renvoyer :

Code:

---

1 2 3 4 5 6 7 8 9

SQL = " SELECT [CharacteristicsList].[IDCharacteristic], [Equipments].[IDEquipment], '*" & Me.txt_value & "*' " SQL = SQL & " FROM CharacteristicsList, Equipments, EquipmentFamilies, EquipmentTypes" SQL = SQL & " WHERE [Equipments].[IDEquipment] IN (SELECT [Equipments].[IDEquipment] FROM Equipments " SQL = SQL & " WHERE [Equipments].[IDFamily] IN (SELECT [Equipments].[IDFamily] FROM Equipments " SQL = SQL & " WHERE [Equipments]![IDEquipment] = " SQL = SQL & cmb_IDEq & ") AND [Equipments].[IDType] IN (SELECT [Equipments].[IDType] FROM Equipments " SQL = SQL & " WHERE [Equipments]![IDEquipment] = " SQL = SQL & cmb_IDEq & ")) And [Equipments]![IDEquipment] != " SQL = SQL & cmb_IDEq & ";"

---

pas compris ton "ajouter ... tu ajoutes" j'ajoute les 114000lignes ?

j'ai enlever la ligen contenant le "INSERT INTO" il reste donc que le SELECT comme tu m'as dit et un erreur s'est afficher :
"une action ExécuterSQL nécessite un argument conssitant en une instruction SQL"