Export XML avec XSD imposé

Bonjour,

J'ai oublié de préciser une chose importante.
Si tu dois reproduire dans ta base de données ce que j'ai fait dans le formulaire fmPhotosListe, il faut mettre la propriété «Verrouillé» du contrôle case à cocher bVitrine sur «Oui». En effet, il ne faut pas que le formulaire cherche à modifier le champ lié à la case à cocher, car mon code le fait déjà.
Si le contrôle n'est pas verrouillé, on a alors un conflit d'écriture car à la fois le formulaire et mon code cherchent à modifier, en même temps, la valeur du champ lié au contrôle case à cocher.

A+

Bonjour,

En fait, le formulaire fmPhotosListe, je l'ai importé dans ma base (je l'utilise comme sous-formulaire de mon formulaire Annonces), et je viens de vérifier la propriété de bvitrine est bien verrouillé.

Cependant quand j'ouvre le formulaire Annonces, sur le premier enregistrement tout se passe bien et la photo est affichée. Pour les enregistrements suivant, la 1ére photo est ouverte 2 fois (affichée, fermée, et réouverte) alors que pour les autres photos ce n'est pas le cas.
C'est vrai également que quand je veux changer bvitrine, ça marche mais après un certain temps et en faisant des choses bizarres (comme ci une procédure se répétait plusieurs fois).
Le plus simple, ne serait il pas que je t'envoie toute ma base en mail privé ? ou sur ton mail perso ?

A+

Bonjour,

Je viens de rentrer chez moi, et j'ai essayé sur mon ordinateur.
Je constate le phénomène que tu décris.
Cela doit venir de la puissance de l'ordinateur et du poids des photos car ce phénomène ne m'était pas apparu sur un ordinateur plus puissant et avec des photos au format PNG.
Je pense que c'est dû à l'événement «changement d'enregistrement actif» qui se déclenche deux fois de suite.
Je vais voir demain si je peux contourner le problème en évitant de remplacer une photo par elle-même.

A+

Bonjour,

Après de plus amples investigations, il semble que le scintillement de l'image soit principalement du au fait que l'image soit dans le sous-formulaire.
J'arrive à neutraliser certains effets visuels non désirés, mais pas tous.

En conséquence, j'ai déplacé les deux contrôles image dans le formulaire principal fmAnnonces, et j'ai modifié le code vba du formulaire fmPhotosListe.

Dans le formulaire principal on doit avoir les contrôles suivants:

• imgBlank
  Contrôle de type image avec la propriété «Visible» à «Non».
• imgPhoto
  Contrôle de type image
• lblPhoto
  Contrôle de type étiquette.

Tu peux copier/coller les deux contrôle images (imgBlank et imgPhoto) du formulaire fmPhotosListe actuel dans ton formulaire principal.
Ensuite crée l'étiquette lblPhoto.
Quand c'est fait, supprime le formulaire fmPhotosListe et importe celui de la pièce jointe.

Si je n'ai rien oublié, c'est tout ce qu'il y a à faire.
Tu remarquera que lorsque tu redimensionnes le formulaire principal, l'image scintille.
C'était déjà le cas avant. Pour moi cela vient d'Access.

Bon réveillon.
A+

Bonjour,

J’ai fait les modifs que tu m’as indiqués, et tout est parfait.
Je ne sais pas quoi dire pour te remercier, tant ce que tu as fait pour moi est superbe.
J’aimerais de rendre l’appareil, mais à part te donner des conseils en immobilier…je ne vois pas. Si un jour tu en as besoin, mon mail pro est : agence@gresimmo.fr
Passes, toi et ta famille une merveilleuse année 2015.
Gérard

Bonjour Gérard,

Je te souhaite également une bonne année 2015.

Tu n'as pas à te sentir redevable de quoi que ce soit.
Tes remerciements me suffisent.

A+
Christophe

Bonjour Christophe,

Serait il possible de faire que, par défaut, ce soit la photo « vitrine » (si elle existe) qui s’affiche lors de l’ouverture d’un enregistrement, en gardant bien sur la possibilité d’en visualiser d’autres sur clic ?

Gérard

Bonjour Gérard,

Je n'arrive pas à le faire :weird: avec la logique du code actuel.
Les événement ne se déclenchent pas dans l'ordre attendu ou bien ils se télescopent.

Donc je vais te proposer une solution alternative, cohérente avec la logique actuelle.

• Crée une nouvelle requête.
  Ferme la boîte de dialogue t'invitant à ajouter des tables
  Bascule en mode d'affichage SQL
  Colle ce SQL:
  
  Code:

  ---

  1 2 3

  SELECT photos.reference, photos.photo, photos.bVitrine FROM photos ORDER BY photos.reference, photos.bVitrine, photos.photo;

  ---

  Repasse en mode d'affichage Création
  Enregistre (sauve) la requête sous le nom R_fmPhotosListe
  Ferme la requête
• Ouvre le formulaire fmPhotosListe en mode création
  Ouvre la fenêtre des propriétés du formulaire.
  Va dans l'onglet «Données» et en face de la propriété «Source», sélectionne la requête R_fmPhotosListe
  Blanchis la propriété «Tri par»
  Sauve le formulaire et ferme le.

Maintenant la photo vitrine sera toujours la première de la liste (à cause du tri imposé dans R_fmPhotosListe)

A+

Bonjour Christophe,

J’ai lu, j’ai fait, tu as vaincus !

Tout est nickel, tes explications hyper claires.
Merci, merci.

Gérard

Bonjour Gérard,

Je suis content que ma solution alternative te donne satisfaction.

J'ai finalement réussi à aboutir à une solution vba, mais je ne pense pas qu'elle offre un grand intérêt par rapport à ma solution "alternative".
En effet, elle implique du code au niveau du formulaire principal et complique le code vba du formulaire fmPhotosListe.
Ma solution "alternative" me semble plus fiable (pas de code vba) et plus pérenne.

Cdlt,
Christophe

Bonjour Christophe,

Abusant peut être de ta disponibilité, j’aurai un autre problème à te soumettre, qui n’a rien à voir avec le sujet précédent, mais comme j’ai posté cette discussion sur le site depuis plusieurs semaines sans réponse...

J’ai 2 tables principales :

1. Piges (qui est constituée entre autre des biens à vendre)
2. Acquéreurs
Aucun lien entre ces 2 tables.
Mon but est de faire un rapprochement, jusque là c’est facile,… sauf que…


[Acquéreurs] possède différents champs de la recherche (surface, prix, type…) et 3 tables liées :

1) [Secteur], contenant la liste des codes postaux de la recherche.

2) [Rapprochement à faire], un seul champ, [A faire] devant contenir la liste la liste des noms des propriétaires (issu de la table Piges) qui ont un bien qui correspond.

3) [Rapprochement effectués], un seul champ, [réalisés] qui contient le nom des propriétaires pour lesquels j’ai déjà fait (travaillé) le rapprochement. Je rempli ce champ manuellement en m’aidant d’une liste de choix émanant de [Piges] pour qu’il n’y ait pas de fautes d’orthographes.


Mon but est de créer un bouton Rapprochement qui mettrait à jour pour chaque acquéreur, le champ de la table [rapprochement à faire] en ne mettant pas un nom s’il existe déjà dans [Rapprochement effectués].

J’ai beaucoup essayé, mais en vain.

Gérard

Bonjour Gérard,

Je suppose que tu as des difficultés avec des jointures qu'Access te refuse.
L'astuce est de passer par une requête intermédiaire.

Supposons que les clés des tables soient comme ci-dessous.

• Piges (cle_pige, ...reste des champs...)
• Acquéreurs (cle_Acqur, ...reste des champs...)
• [Rapprochement à faire] (cle_Acqur, cle_pige, ...reste des champs...)
• [Rapprochement effectués] (cle_Acqur, cle_pige, ...reste des champs...)

1. Tu crée une requête de type sélection R_Recherche pour mettre en correspondance les acquéreurs et les biens à vendre.
Cette requête devra inclure les clés Acquéreurs.cle_Acqur et Piges.cle_pige.

2. Tu crée une requête de type ajout dont la destination est la table [Rapprochement à faire].
Tu y insères la requête R_Recherche et la table [Rapprochement effectués].
Tu crée une jointure gauche entre les deux objets:

R_Recherche		Rapprochement effectués
cle_Acqur	------>	cle_Acqur
cle_pige	------>	cle_pige
...		...

Pour exclure les enregistrements déjà présents dans la table [Rapprochement effectués], il faut mettre comme critère Est Null dans la colonne cle_Acqur de la table [Rapprochement effectués] (attention à ce qu'Access n'assigne pas un champ destination sur la ligne "Ajouter à").
Ensuite, mettre sur la grille de la requête ajout, les champs de R_Recherche qui doivent être ajoutés à [Rapprochement à faire].

En résumé, on passe par une requête intermédiaire (R_Recherche), pour pouvoir réaliser la jointure gauche nécessaire à une requête dite de «non correspondance».

A+

Bonsoir,

j'ai essayé de suivre tes explications, et quelque chose ne fonctionne pas.
Les rapprochements à faire ne tiennent pas compte de ceux déjà effectués.

Petite question:

Citation:

---

Rapprochement à faire] (cle_Acqur, cle_pige, ...reste des champs...)
[Rapprochement effectués] (cle_Acqur, cle_pige, ...reste des champs...)

---

Dans ma base, ces 2 tables ne sont pas liées à la table [Piges]
J'ai pour essayé crée ces 2 champs et lié la table [Piges] avec [Rapprochement à faire] et [Rapprochement effectués], mais ça n'a rien changé dans la table [rapprochement à faire] après l'éxécution de la requête.

Citation:

---

R_Recherche
Rapprochement effectués
cle_Acqur ------> cle_Acqur
cle_pige ------> cle_pige
... ...

---

C'est bien la deuxième possibilité offerte dans propriétés ?

Citation:

---

Pour exclure les enregistrements déjà présents dans la table [Rapprochement effectués], il faut mettre comme critère Est Null dans la colonne cle_Acqur de la table [Rapprochement effectués] (attention à ce qu'Access n'assigne pas un champ destination sur la ligne "Ajouter à").

---

Là, à priori j'ai bien fait.

Où ai-je merdé ?

A+

Bonsoir,

Il n'est pas indispensable de créer des liens entre les tables.
Ce qui est important c'est de stocker la combinaison de clés (clé de Piges + clé de Acquéreurs) dans les tables [Rapprochement à faire] et [Rapprochement effectués].

Exemples (avec des clés NumAuto):

table [Rapprochement à faire]

cle_Acqur	cle_pige
1	1
1	9
2	3
2	5

table [Rapprochement effectués]

cle_Acqur	cle_pige
1	2
1	4
2	2

Si tu n'y arrive toujours pas, poste une base exemple (juste les tables et les requêtes impliquées).

A+

Bonsoir,

J'ai trouvé ce qui clochait.

En fait, dans [rapprochement effectués] la [clé pige] était toujours null.

J'ai donc remplacer par une autre variable [Rapprochement effectué.Nom mandant] et fait la jonction avec [Piges.Nom] et ça marche. (le seul pb qui pourra intervenir c'est avec 2 noms de propriétaires identiques, mas je ferai attention).

Merci pour tout
Bonne soirée,
Gérard

Bonsoir,

Citation:

---

Envoyé par GEGE1963

... (le seul pb qui pourra intervenir c'est avec 2 noms de propriétaires identiques, mas je ferai attention)...

---

Les clés de tables sont là, entre autre, pour éviter ce genre de soucis.
Elles ne sont pas "parlantes" (NumAuto), mais ...
-elles garantissent l'identification des enregistrements
-elles facilitent la conception des requêtes
-elles améliorent les performances des requêtes
-à partir des clés on retrouve facilement les information connexes (nom du propriétaire par exemple)
Si la table [Rapprochement à faire] n'était par exemple constituée que des deux champs (cle_Acqur, cle_pige), on pourrait quand même retrouver avec une requête de sélection toutes les informations venant des tables Acquéreurs et Piges.
Toujours avec ce même exemple, si je veux créer un formulaire qui me montre les détails de toutes les correspondances à un bien recherché, je construirai un formulaire basé sur Acquéreurs et un sous-formulaire basé sur une requête de sélection qui ferait la jointure entre les tables [Rapprochement à faire] et Piges sur le champ clé cle_pige.
La relation formulaire Père/Enfant se ferait quand à elle sur le champ clé cle_Acqur.

A+

Bonjour Christophe,

Toutes mes clés sont bien (NumAuto).
Dans le cas présent, les tables [Rapprochement à faire] et [Rapprochement effectués] ne sont pas liés à la table [Piges].
Lorsque que j’ai ajouté à la table [Rapprochement effectués] un champ [Clé Piges], il était et est toujours resté Null.
La solution ne serait-elle pas de créer une requête MAJ ? après la requête [R_Recherche] qui remplirait le champ [Clé Piges] ?

Question subsidiaire :
Je n’ai pas compris la logique de la double jonction à gauche.

Merci pour tout ce que tu fais pour moi, St Bernard de l’informatique.

Gérard

Bonjour,

Citation:

---

Lorsque que j’ai ajouté à la table [Rapprochement effectués] un champ [Clé Piges], il était et est toujours resté Null.

---

Les noms des champs clés que j'avais mis n'étaient pas à prendre au sens littéral.
Tu l'avais certainement compris, mais je préfère le préciser.
Il est normal qu'un champ ajouté à une table qui contient déjà des enregistrements soit Null.
Dans le cas de la table [Rapprochement à faire], les deux champs dont les valeurs proviennent des clés des tables Acquéreur et Piges sont censés avoir été alimentés à partir d'une requête de type ajout.
/!\ faire une copie de sauvegarde de la base de données au préalable.
Là il faut vider la table [Rapprochement à faire] et exécuter de nouveau la requête de type ajout, et bien s'assurer que la requête ajout alimente les deux champs.
Si je reprend le modèle...

• Piges (cle_pige, ...reste des champs...)
• Acquéreurs (cle_Acqur, ...reste des champs...)
• [Rapprochement à faire] (cle_Acqur, cle_pige, ...reste des champs...)
• [Rapprochement effectués] (cle_Acqur, cle_pige, ...reste des champs...)

... on devra avoir cela dans la requête ajout:

Code:

---

1 2 3 4 5 6 7 8 9

----------:-----------------:----------------:-------------------------- Champ : cle_Acqur : cle_pige : cle_Acqur ----------:-----------------:----------------:-------------------------- Table : R_Recherche : R_Recherche : Rapprochement effectués ----------:-----------------:----------------:-------------------------- Ajouter à : cle_Acqur : cle_pige : ----------:-----------------:----------------:-------------------------- Critères : : : Est Null ----------:-----------------:----------------:--------------------------

---

Citation:

---

La solution ne serait-elle pas de créer une requête MAJ ? après la requête [R_Recherche] qui remplirait le champ [Clé Piges] ?

---

Non, car ça me paraît compliqué. Tout du moins parce que je ne sais pas faire le lien entre ce que tu as stocké dans [Rapprochement à faire] et la clé de [Piges].
C'est pour ça que je recommande de vider la table [Rapprochement à faire] pour remplir à nouveau avec la requête ajout.

Citation:

---

Question subsidiaire :
Je n’ai pas compris la logique de la double jonction à gauche.

---

C'est parce que l'information clé est la combinaison des deux champs clés.
Si on ne faisait la jointure que sur [cle_Acqur] et que [cle_Acqur] soit déjà dans [Rapprochement à effectués] la condition "Est Null" serait toujours fausse.
Exemple:

Code:

---

1 2 3 4

[R_Recherche] [Rapprochement effectués] cle_Acqur 2 = cle_Acqur 2 cle_pige 12 cle_pige 4 VRAI => ([Rapprochement à effectués].[cle_Acqur] Est Null) est FAUX

---

Code:

---

1 2 3 4

[R_Recherche] [Rapprochement effectués] cle_Acqur 2 = cle_Acqur 2 cle_pige 12 = cle_pige 4 FAUX => ([Rapprochement à effectués].[cle_Acqur] Est Null) est VRAI

---

Enfin, la jointure est de type GAUCHE pour retourner tous les enregistrements de l'objet se trouvant à gauche de la jointure.
Lorsqu'il n'y a pas de correspondance, les champs de l'objet se trouvant à droite de la jointure (GAUCHE) sont Null, ce qui permet d'utiliser le critère "Est Null", et ainsi de réaliser une requête de non-correspondance.
Voir Comprendre les jointures dans Access (où c'est mieux expliqué, et avec des exemples visuels).

A+

Bonsoir,

Citation:

---

/!\ faire une copie de sauvegarde de la base de données au préalable.

---

C'est ce que je fais systématiquement.

Citation:

---

Là il faut vider la table [Rapprochement à faire] et exécuter de nouveau la requête de type ajout, et bien s'assurer que la requête ajout alimente les deux champs.

---

Comme je suis amené à faire des rapprochements à chaque nouveau bien ou nouvel acquéreur, j'exécute à chaque fois une requête qui vide [Rapprochement à faire] sinon les rapprochements se cumuleraient.

Citation:

---

.. on devra avoir cela dans la requête ajout:

Code txt :Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
----------:-----------------:----------------:--------------------------
Champ : cle_Acqur : cle_pige : cle_Acqur
----------:-----------------:----------------:--------------------------
Table : R_Recherche_CP : R_Recherche_CP : Rapprochement effectués
----------:-----------------:----------------:--------------------------
Ajouter à : cle_Acqur : cle_pige :
----------:-----------------:----------------:--------------------------
Critères : : : Est Null
----------:-----------------:----------------:--------------------------

---

Je viens d'essayer et...

Une chose m'échappe, pour que la requête ajout remplisse le champ [Clé Piges], il faut bien que la table [Piges] soit présente dans la requête ajout puisque c'est le seul endroit où cette clé est remplie.
Si j'intègre cette table, j'ai un message d'erreur.

Tout ça n'a pas vraiment d'importance puisque avec [Acquéreurs.Nom] ça marche.

Mais j'ai un autre petit souci.

Je souhaiterais que le formulaire présente (un à un) les acquéreurs pour lesquels des Rapprochements existent, c'est à dire où [Rapprochement à faire] n'est pas vide.

J'ai crée une requête :

Code:

---

1 2 3

SELECT Acquéreurs.* FROM Acquéreurs INNER JOIN [Rapprochement à faire] ON Acquéreurs.ID=[Rapprochement à faire].Lien WHERE ((([Rapprochement à faire].Lien) Is Not Null));

---

La requête fonctionne, là no problèm.

Mais dans une macro je demande l'ouverture du formulaire avec comme filtre la requête, j'ai comme message /

Entrer une valeur de paramètre
Rapprochement à faire.lien
et une case pour rentrer la valeur

où est le problème ?

Bonne soirée,

Gérard

Bonjour Gérard,

Citation:

---

Comme je suis amené à faire des rapprochements à chaque nouveau bien ou nouvel acquéreur, j'exécute à chaque fois une requête qui vide [Rapprochement à faire] sinon les rapprochements se cumuleraient.

---

Le cumul peut être évité avec une requête de non-correpondance par rapport à la table de destination
Ou bien plus simplement en mettant une clé dans la table de destination constituée de la paire de champs (cle_Acqur, cle_pige), si on accepte que l'on ait un message d'avertissement nous informant que l'on tente d'ajouter des enregistrements dont la clé est déjà présente dans la table de destination.

Citation:

---

Une chose m'échappe, pour que la requête ajout remplisse le champ [Clé Piges], il faut bien que la table [Piges] soit présente dans la requête ajout puisque c'est le seul endroit où cette clé est remplie.
Si j'intègre cette table, j'ai un message d'erreur.

---

Dans mon exemple les champs clés proviennent de la requête intermédiaire R_Recherche (j'ai corrigé mon message précédant dans lequel j'avais écrit R_Recherche_CP au lieu de R_Recherche).
C'est donc R_Recherche qui fournit Piges.cle_pige.

Citation:

---

Je souhaiterais que le formulaire présente (un à un) les acquéreurs pour lesquels des Rapprochements existent, c'est à dire où [Rapprochement à faire] n'est pas vide.

J'ai crée une requête :

Code:

---

1 2 3

SELECT Acquéreurs.* FROM Acquéreurs INNER JOIN [Rapprochement à faire] ON Acquéreurs.ID=[Rapprochement à faire].Lien WHERE ((([Rapprochement à faire].Lien) Is Not Null));

---

---

Ce sql est suffisant:

Code:

---

1 2	SELECT Acquéreurs.* FROM Acquéreurs INNER JOIN [Rapprochement à faire] ON Acquéreurs.ID=[Rapprochement à faire].Lien

---

Pas besoin de mettre un critère "Is Not Null". Le INNER JOIN fait le travail.

Citation:

---

Mais dans une macro je demande l'ouverture du formulaire avec comme filtre la requête, j'ai comme message

---

Je ne suis pas certain de comprendre car c'est quelque chose que je n'ai jamais fait.
Je viens de faire un essai, et voila la requête que je peux utiliser pour filtrer un formulaire dont la source est la table Acquéreurs:

Code:

---

1 2 3

SELECT * FROM Acquéreurs WHERE (((EXISTS (SELECT * FROM [Rapprochement à faire] AS TMP WHERE TMP.cle_Acqur = Acquéreurs.cle_Acqur))=True));

---

Je nomme la requête ci-dessus R_flt_Acqurs_a_rapprocher et ensuite je mets ce nom en argument en face de «Nom du filtre» dans la commande «OuvrirFormulaire» de la macro.
Ce faisant, la commande récupère le critère qui est derrière WHERE.
En revanche, je ne crois pas que le filtrage induit par le INNER JOIN puisse être exploité dans une requête utilisée à des fins de filtrages.
C'est peut-être çà ton soucis.
Ma requête s'appuie sur EXISTS(sous-requête) qui, bien que produisant le même résultat qu'un INNER JOIN, est un mot-clé SQL destiné à être derrière WHERE (c.à.d en tant que critère), et donc mieux exploitable pour filtrer avec «OuvrirFormulaire» et «Nom du filtre».

A+