Discussion :

[30avril1989]

Bonjour,

J'aimerai exécuter une de mes requêtes à partir du code de mon formulaire, mais j'obtient une erreur d'exécution (Trop peu de paramètres. 1 attendu).

Code :

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

1
2
3
4
5
6
7
8
9
10
Dim Qry As DAO.QueryDef
Dim Rs As DAO.Recordset
Set Qry = CurrentDb.QueryDefs("Fusion colonne")
Set Rs = Qry.OpenRecordset
While Not Rs.EOF
    MsgBox Rs(0)
    Rs.MoveNext
Wend
Set Qry = Nothing
Set Rs = Nothing

Malgrès mes différentes recherches, je n'y arrive toujours pas!

Merci pour l'aide que vous pourrez m'apporter!

30avril1989

[Jeannot45]

Je viens de tester ton code, je n'ai pas rencontrer de problème particulier. Un souci peut-être dans la requête elle-même ?

[30avril1989]

Merci pour l'aide que tu m'as apporter.

Ci-dessous ma requête:

Code :

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

1
2
SELECT [Type_AS] & " " & [Typ_a_edit] & [Vers_edit]
FROM Mise_a_jour_EC;

Merci

30avril1989

[Jeannot45]

Tu fais une concaténation dans ta requete ce qui signifie que tu crées un champ calculé. Il te faut alors un nom de champ

Code SQL :

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

1
2
SELECT [Type_AS] & " " & [Typ_a_edit] & [Vers_edit] as ChampConcatene
 FROM Mise_a_jour_EC;

Bonne continuation

[Tofalu]

Tu fais une concaténation dans ta requete ce qui signifie que tu crées un champ calculé. Il te faut alors un nom de champ

Code SQL :

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

1
2
SELECT [Type_AS] & " " & [Typ_a_edit] & [Vers_edit] as ChampConcatene
 FROM Mise_a_jour_EC;

Bonne continuation

Ce qui est optionnel.

J'aurais plutot tendance à croire que :

• Soit un champ est mal orthographié,
• Soit la requête Mise_à_Jour_EC fait appel à des contrôles de formulaire

Au passage, c'est curieux de nommer une requête Mise_àJour quand elle ne fait pas de mise à jour.