Discussion :

[Michel DEMANET]

Bonjour à tous.
Je suis nouveau et j'ai un PB à vous soumettre.
J'ai WINDOWS XP PRO et le Pack Office 200 PRO.
Sous Access, je me suis créé une vidéothèque.
J'ai créé 8 champs Acteurs avec liste déroulante modifiable qui font appel à une table Acteur. Tout fonctionne.

Maintenant à l'usage je me rends compte que cela serait mieux si j'avais un seul champ Acteur qui fait toujours appel à ma table Acteur et que je transférerais chaque saisie dans un champ texte ou mémo. Surtout lorsque j'ai plus de 8 acteurs à saisir.

Est-ce possible et comment faire ? Car tous mes essais ont été un échec.

Merci pour votre aide.

[Dolphy35]

Salut et bienvenue sur le Forum,

Tu peux faire cela en crantr une table Avec 10 champs (exemple Acteur1, acteurs2, etc ...) et tu lis l'enregistrement à ta table de données des fims.

@+

[Michel DEMANET]

Salut Dolphy35

Je me suis mal expliqué. J'ai déja 8 champs Acteur1 à Acteur8 dans ma table.
Mais à la saisie j'ai 8 listes déroulantes et je n'en voudrais qu'une et que le nom choisi soit transféré dans une zone texte ou mémo.

Encore milles excuses pour ma mauvaise explication, et merci pour ta réponse.

Michel

[batou22003]

Bonjour,

Pourquoi pas créer un champs texte dans lequel tu sauvegardes tous tes acteurs sélectionnés de ta liste ,séparés par un délimiteur ";" à chaque nouvelle saisie.
Ensuite tu stockes dans un seul champs de ta table et tu extraits avec la fonction split(chaine,delimiteur) de vba.
Non?

[Michel DEMANET]

Salut batou22003

C'est exactement ce que je voudrais et c'est bien là le PB car je n'y arrive pas.

Tous ce que j'ai réussi c'est de garder mes 8 champs Acteur1 à Acteur8, en liste déroulante
et dans les propriétés de ma zone de liste "onglet Donnée" j'entre "= Acteur1 + ", " + Acteur2 ...".

Mais je voulais savoir si je pouvais faire la même chose avec une seule liste déroulante modifiable, encode par exemple.
Ce qui allègerait le formulaire et l'ensemble du programme.

Encore merci vous êtes tous très sympa de passer du temps à dépanner des ignares comme moi.

Michel

[ypicot]

Il te faut une table intermédiaire, nommée par exemple FilmActeur, qui contiendra l'ID du film et l'ID (ou le nom) de l'acteur.

Pour plus d'explications, l'excellent tuto de Maxence :
http://mhubiche.developpez.com/Access/cours/bases/

Yvan

[batou22003]

Pas besoin d'une table intermédiaire pour ca.
Tu crées simplement un champs texte (par exemple Texte0) sur un formulaire
Et dans ta liste, sur un événement OnChange (sur Changement )

tu lances l'action suivante :

Code :

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

1
2
3
4
5
Private Sub Liste_Change()
 
Me.Texte0 = Me.Texte0 & Liste.Value & ";"
 
End Sub

Et après il te reste à créer un bouton "submit" qui sauve tous les
elements du champs Texte0 en base.

Sur Click du bouton:

Code :

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

1
2
3
CurrentDb.execute "insert into TaTable (champs1,champs2,...) " _
& " values " _
& "(champs1,'" & Me.Texte0 & "',...)"

Pour extraire les acteurs tu utilises Split().

Simple non?

[ypicot]

Arg... Maxence, si je comprends bien, tu oses proposer de violer la 1ere forme normale ?
La valeur d'un champ doit être atomique.

Yvan

[Michel DEMANET]

Bonsoir à tous.

Je rentre du boulot et j'ai la surprise d'avoir plusieurs solutions à mon PB.

Je vais tout essayer et je vous dirais quelle solution je retiendrais.

Je n'ai pas compris Ivan quand il parle de violer serais-je tombé sur je ne sais quel forum peu recommandable. Hi hi hi mdr.

Merci à vous tous et @ très bientôt.

Michel

[argyronet]

Bonjour,

Si l'aspect reste uniquement visuel (c'est ce que je pense car j'ai déjà donné dans ce domaine), il doit exister une table TBLActeurs qui contient tous les acteurs de l'ensemble des films avec une colonne IDActeur, NomActeurs et infos autres si nécessaires.
De là, pour un film donné, on peut dynamiquement remplir une ComboBox qui irait effectivement charger son contenu d'après un tableau de Long qui correspondraient à un jeu d'IDActeur séparés par un séparateur.
La table TBLFilms contiendrait alors un champ texte IDActeurs qui serait alimenté par une sélection des acteurs depuis une liste dotée par exemple de case à cocher.

Argy

[Michel DEMANET]

Bonjour à tous.
Réponse à batou22003.
J'ai essayé ta solution qui me semble assez simple, malheureusement j'ai un message d'erreur pendant l'utilisation, qui est le suivant :

"L'expression Sur changement entrée comme paramètre de la propriété de type événement est à l'origine d'une erreur.
Un problème est survenu durant la communication entre Microsoft Access et le serveur OLE ou le contrôle ActiveX.
* Le résultat de l'expression n'est pas le nom d'une macro, le nom d'une fonction définie par l'utilisateur ou [Event Procédure],
* Une erreur a peut-être été commise lors de l'évaluation d'une fonction, d'un événement ou d'une macro."

J'ai réinstallé le pack office 2000 mais je reçois toujours le message d'erreur. Je ne vois pas ce que c'est.
@+

[Michel DEMANET]

Bonsoir à tous.

Réponse à argyronet.

J'ai utilisé le lien et j'ai trouvé des choses très intéressante.

Seulement ça me parle de la référence Microsoft DAO 3.6 Object Library.

dur dur ou puis-je trouver ça, comment savoir si je l'ai déja et sinon comment l'installersur mon micro?

Merci pour la réponse.

Michel

[Faw]

Salut,
Editeur vba/Outils/références

[Michel DEMANET]

Salut à Faw

OK bien reçu j'ai trouvé.

Merci @+

[Michel DEMANET]

Bonjour à tous.

Je tenais à remercier tous ceux qui m'ont aidé à résoudre ce PB.

J'ai opté pour la simplicité, la solution de batou22003.

je ne m'en sortais pas avec la création de table intermédiaire.

Mais promis je réessaierais un peu plus tard.

Encore merci

Cordialement Michel