Discussion :

[tibiurs]

bonjour a tous
a quoi correspond l'erreur réservée (-3025) ??

j'obtient cette erreur lorsque j'exécute une requete

voici le code

Code :

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

1
2
3
 
INSERT INTO t_cmd_encours
VALUES ((SELECT t_clients.[numero commande]                FROM t_clients                WHERE (((t_clients.nom)=forms!f_ajout_commande!md_nom));), [forms]![f_ajout_commande]!puissance, [forms]![f_ajout_commande]!côté, [forms]![f_ajout_commande]![nb récepteurs], [forms]![f_ajout_commande]![nb télécommandes], [forms]![f_ajout_commande]![lieu]);

modération : cafeine,

[hocine]

Salut,
je ne suis pas un expert mais je crois que le where doit être à la fin de votre requête.
Bonne chance.
Merci

[Dolphy35]

Salut,

Je ne comprend pas ton code, il est bizzare.

Voir voir sur ce lien Tu choppera des infos sur la synthaxe du SQL.

[tibiurs]

je ne sais pas si ma requete est bonne
j'ai essaye de faire une requete selection imbrique dans une requete ajout d'ou le where au milieu

[Dolphy35]

...

Pourquoi insérer des données que tu possède déjà ?

Si tu as un résultat de ta requête sélection c'est que tu possède déjà ces données.

[tibiurs]

en fait le resultat que je cherche c le numero de commande que j'obtient en selectionnant le nom dun client dans une liste a partir de mon formulaire et je cherche un moyen pour l'associer aux autres parametres

[Dolphy35]

re,

En gros tu récupère un N° de cde et tu veux ajouter dans une table des données associé à ce numéro.

J'ai bien compris?

[tibiurs]

voila c exactement ca
et en fait tout s'enregistre dans la table en laissant le champ numero de commande vide

[Dolphy35]

Il n'est pas possible de récupérer ton N° de Cde par DAO et lors de l'ajout mettre dans VALUES le N°cde.

[tibiurs]

je ne peux pas le specifier en dur car il depend du nom du client que j'ai selectionne

[Dolphy35]

En gros tu as un Form ou tu sélectionne ton Client, suite à cette sélection tu as un N°cde. S'affiche t-il dans un Contrôle? Ensuite tu saisie des données dans ce même Form que tu veux enregistrer dans une table avec le n°cde correspondant à ton client ?

C'est bien cela que tu veux faire?

[tibiurs]

oui et j'obtient le numero de cde (=[md_nom].column(1)) en selectionnant le nom du client dans une liste

[Dolphy35]

oui et j'obtient le numero de cde (=[md_nom].column(1)) en selectionnant le nom du client dans une liste

et bien tu charge ce résultat dans une variable et tu récupère cette variable pour ajouter tes données.

[tibiurs]

tu pourrais m'indiquer la methode a suivre ??
merci

[Dolphy35]

Code :

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

1
2
3
4
5
6
 
Dim num_cde As String
 
    num_cde = md_nom.Column(1)
 
DoCmd.RunSQL ("INSERT INTO <NomTable> (N°cde, <Champ2>) VALUES (" & num_cde & ", <Valeur2>")

Tu as été sur le lien que je t'ai indiqué sur mon premier message ?

car il y avait cela

VI – b Insertion à partir d’une autre table

INSERT INTO <NomTableDestination> SELECT <Champ1>, <Champ2>….FROM <NomTableSource> WHERE <condition>

Pour que l’insertion soit valide il faut que les champs de la table source aient le même type et la même longueur que la table destination.

[tibiurs]

oui j'y etais alle mais je suis encore un debutant en SQL et VBA donc c'est pas le pied
le code que tu vient de me donner marche seulement il me demande de lui indiquer le numero de cde dans une fenetre qui apparait a l'ecran

[Dolphy35]

Le code que je t'ai donnée est générique il faut l'adapter en fonction des tes champs remplace les noms que je t'ai mis par les noms de champs de tes tables.

[tibiurs]

oui ca j'avais compris c'est ce que j'ai fait
mais lorsque je l'utilise donc sur mon form je rentre tout ce que j'ai besoin
puis j'appuie sur mon bouton qui active ce code
mais a ce moment la il y a un lmessage qui apparait qui me demande d'entrer la valeur du parametre et si je met ok en laissant le champ vide il me l'enregistre sans rien et si je le rempli il enregistre le tout plus une fois mais sans le num cde
comment ca se fait ??

[Dolphy35]

Post ton code pour que je puisse regardé stp.

[tibiurs]

Private Sub Commande45_Click()
Dim num_cde As String
num_cde = Forms!f_ajout_commande!md_nom.Column(1)
DoCmd.RunSQL ("INSERT INTO t_cmd_encours ([numero commande], puissance, côté, [nb récepteurs], [nb télécommandes], lieu) VALUES (" & num_cde & ", puissance, côté, [nb récepteurs], [nb télécommandes], lieu)")
End Sub