Discussion :

[ClaudeLELOUP]

Bonjour à tous,

Ceci est en relation avec cette discussion :

http://www.developpez.net/forums/d10...s/#post5779120

J’ai créé un formulaire basé sur une requête analyse croisée.
Pour le formulaire, plus de problème.

J’essaie maintenant de produire un état semblable au formulaire.

L’idée est de partir d’un embryon d’état qui contient des champs indépendants et de le compléter de manière dynamique. C’est-à-dire faire en sorte que la source de l’état soit celle du formulaire et que les propriétés des contrôles du formulaire (qui ont été créés dynamiquement) soient reportées dans l’état.

Pas de problème pour le code relatif à ces manipulations.

Le problème
Ce message apparaît lorsque je tente d’afficher l’état :



[A force de chercher une solution, je constate que si j’enregistre une copie de la source du formulaire dans une requête, et que je base mon état sur cette requête, j’obtiens mon résultat.

Merci déjà à ceux qui m’aideront à comprendre pourquoi.

Pour que vous puissiez visualiser, je joins une BDD réduite.

Quoi qu'il en soit, bonne journée.

[User]

Salut Claude,

J'espère que cet exemple pourra t'aider :
FormEtatReqCroisee2.zip

sur ouverture de l'état tu peux aussi faire :

Code :

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

1
2
3
4
5
6
7
set rs=Me.recordset
 
for i=1 to rs.fields.count-1
Me("zdtFournisseur" & Format(i,"00")).ControlSource = rs(i).name
Me("etFournisseur" & Format(i,"00")).Caption = rs(i).name
         ...
next i

A+

[ClaudeLELOUP]

Bonsoir User,

Merci !

Effectivement ton code m’a aidé à comprendre que, dans ma deuxième solution (celle qui fonctionne), je reconstruisais systématiquement la même requête quels que soient les filtres. Le sql de la requête croisée reste identique, c’est son résultat qui change !

Donc, je peux simplifier mon code en enregistrant l’état avec une source permanente : la requête que j’ai appelée rTransitoire dans mon exemple.

1er réflexe
Par souci d’uniformité, j’inscris aussi le nom de cette requête comme source de mon formulaire (dans mon exemple, c’est le sql que j’avais indiqué).
Cela fonctionne.

2e réflexe
Pour économiser un objet (rTransitoire), j’essaie d’enregistrer mon formulaire et l’état avec, dans les deux cas, le sql comme source.
Résultat : le formulaire fonctionne mais l’ouverture de l’état provoque le message que j’ai mentionné dans mon poste précédent.

C’est donc comme si, dans ACCESS2000, la source d’un état ne peut pas être le sql d’une requête croisée. La requête en question doit être enregistrée et c’est son nom qui doit figurer dans la propriété source de l’état.

Merci encore pour ton intervention.

Au plaisir de te recroiser.

[User]

Bonsoir Claude,

Effectivement la source de l'état doit être enregistrée...

Content d'avoir contribué à résoudre ton problème

A+

[ClaudeLELOUP]

Salut User,

Code :

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

1
2
3
4
5
6
7
set rs=Me.recordset
 
for i=1 to rs.fields.count-1
Me("zdtFournisseur" & Format(i,"00")).ControlSource = rs(i).name
Me("etFournisseur" & Format(i,"00")).Caption = rs(i).name
         ...
next i

J’ai retenu ton idée.

L’écriture est élégante et en plus cette manière d’aborder me libère de la contrainte de mentionner dans le code le nombre de paires Etiquette / Fournisseur.

C’est intéressant pour la maintenance : si on dispose d’un écran plus large qui permet d’augmenter le nombre de paires sans altérer le confort de lecture, il suffit d’ajouter les contrôles supplémentaires en respectant la numérotation, le code ne devra pas être modifié.

Merci encore.