Discussion :

[marot_r]

Bonjour à vous et merci de votre aide et de votre temps.

Aujoud'hui j'ai constaté que le vieux truc qui consiste à mettre dans une requête un critère égale à [Forms]![NomForm]![NomControl] ne fonctionne plus. Il est simplement ignoré sans générer d'erreur.

J'ai fait le test sur 3 postes différents et avec 2 versions de Access (2003 et 2007) et j'ai eu le même résultat partout.

J'ai du remplacer cela par le code suivant :

Code :

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

1
2
3
4
5
6
7
8
9
Public Function GetParamFromForm(prmFormName As String, prmFieldName As String) As Variant
 
    If CurrentProject.AllForms(prmFormName).IsLoaded Then
            GetParamFromForm = Forms(prmFormName).Controls(prmFieldName).Value
        Else
            GetParamFromForm = Null
    End If
 
End Function

Quelqu'un a-til eu le même problême ?

A+

[jimbolion]

René bonjour,

Je suis plus que surpris par ce comportement étrange sur plusieurs de tes versions.
De mon côté aucune anomalie constatée que cette syntaxe soit transmise dans un formulaire ou une requête. Une rapide recherche sur m'a hélas rien appris de plus sur ce phénomène


Peut-être certains memebres auront ils quelques informations supplémentaires ?

Jm

[ClaudeLELOUP]

Bonjour René et Jean-Marie,

Avec Access2000, le comportement dépend des circonstances.

Si le formulaire est affiché et que les colonnes sont correctement référencées dans la requête, c’est OK.
Si le formulaire est ouvert en mode construction et que les colonnes sont correctement référencées dans la requête, la requête s’exécute, mais n’affiche aucun résultat.
Si le formulaire est fermé, la requête s’ouvre en réclamant un paramètre.
Si le formulaire est ouvert et que dans la requête le nom d'une colonne est mal orthographié, la requête s’exécute, mais n’affiche aucun résultat

[jimbolion]

Claude bonjour,

Oui le comportement est identique sous 2010, hormis peut-être le point 4 à vérifier. Mais c'est sur la syntaxe que je suis interrogateur René nous aurait-il tout dit ?

Jean-Marie

[ClaudeLELOUP]

René nous aurait-il tout dit ?

On va encore le laisser dormir un peu (c'est encore la nuit chez lui !).

[alassanediakite]

Salut
Je sens le poisson d'avril à plein nez
@+

[ClaudeLELOUP]

Bonjour Alassane,

Il y a un décalage horaire entre Canada et Europe/Afrique mais quand même pas si long !

[alassanediakite]

Il y a un décalage horaire entre Canada et Europe/Afrique mais quand même pas si long !

[marot_r]

Non desole il ne s'agit pas d'un poisson d'avril mais d'un informaticien TRES fatigue.

J'ai fait une erreur de syntaxe dans le nom de mon champ et comme j'ai eu pas mal de problemes bizares par ailleur avec mon applications je ne l'ai pas identifier comme tel.

Bon pour que ce ne soit pas completement perdu voici le code qui m'a permis de trouver mon erreur.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Private Enum eFormView
    ModeDesign = 0
    formView = 1
    DatasheetView = 2
End Enum
 
Public Function GetParamFromForm(prmFormName As String, prmControlName As String) As Variant
    'if [Forms]![FormName]![ControlName] does not work anymore.
    ' This function replaces it.
 
    Dim result As Variant
 
    If CurrentProject.AllForms(prmFormName).IsLoaded Then
            Dim f As Form: Set f = Forms(prmFormName)
 
            If f.CurrentView <> eFormView.ModeDesign Then
                    result = Forms(prmFormName).Controls(prmControlName)
                Else
                    result = Null
            End If
 
        Else
            result = InputBox("[Forms]![" & prmFormName & "]![" & prmControlName & "]")
    End If
 
    GetParamFromForm = result
End Function

Quand je l'ai executer il m'a tout de suite dit que mon champ n'existait pas.

Je vous remercie de vos reponses et vous presente mes excuses pour cette fausse alerte.

A+

[jimbolion]

Claude,

Non desole il ne s'agit pas d'un poisson d'avril mais d'un informaticien TRES fatigue.

On va encore le laisser dormir un peu (c'est encore la nuit chez lui !)

Tu ne croyais pas si bien dire

Il doit vraiment être fatigué René, un modérateur qui oublie le Tag

Et nous nous dormirons mieux ce soir

Jim

[marot_r]

Claude avait identifie le symptome.

Si le formulaire est ouvert et que dans la requête le nom d'une colonne est mal orthographié, la requête s’exécute, mais n’affiche aucun résultat

Merci en particulier a lui.

A+

[jimbolion]

René,

Merci pour cette précision, j'avais évoqué le point 4 à vérifier mais tu as pu lever cette ambiguïté.

Dorénavant je redoublerai de vigilance quant aux passages de critères sur une requête.

Jm