OVH Cloud OVH Cloud

Ecriture d'une table

3 réponses
Avatar
Albert
Bonjour

Sur un formulaire j'ai une liste déroulante qui
à partir d'une table à deux colonnes récupère la colonne N°2
l'orsque l'on choisi la colonne N°1, et avec le code ci-dessous
l'écrit (col N°2) dans une zone de texte (Texte2)
(cela fonctionne bien)
---------------
"Option Compare Database
Private Sub ville_AfterUpdate()
Me![Texte2] = ville.Column(0)
End Sub
Private Sub ville_Enter()
End Sub"
------------------------
Mais je voudrais récupérer les deux valeurs pour les écrirent dans une autre
Table
Tous les essais que j'ai fait "nada" rien à faire je n'y arrive pas !!
QQ1 a t'il la soluce si oui merci d'avance
A.

3 réponses

Avatar
eric
tu peux faire simple Texte1 et Texte2 sont 2 champs de ton
formulaire.
Tu peux dans ton script exécuter une requête de type ajout
ou Maj (convertie en SQL) du type DoCmd.openquery qui
réalise ce que tu veux. Cette requête exploite directement
les champs Texte1 et texte2 du formulaire ([Forms].
[toto].texte1...

Attention, il peut être nécessaire par commencer par
sauvegarder l'enregistrement en cours avant de lancer le
SQL

Le plus facile, c'est de faire une macro, puis la
convertir en VB, récupérer les instructions VB


-----Message d'origine-----
Bonjour

Sur un formulaire j'ai une liste déroulante qui
à partir d'une table à deux colonnes récupère la colonne
N°2

l'orsque l'on choisi la colonne N°1, et avec le code ci-
dessous

l'écrit (col N°2) dans une zone de texte (Texte2)
(cela fonctionne bien)
---------------
"Option Compare Database
Private Sub ville_AfterUpdate()
Me![Texte2] = ville.Column(0)
End Sub
Private Sub ville_Enter()
End Sub"
------------------------
Mais je voudrais récupérer les deux valeurs pour les
écrirent dans une autre

Table
Tous les essais que j'ai fait "nada" rien à faire je n'y
arrive pas !!

QQ1 a t'il la soluce si oui merci d'avance
A.


.



Avatar
3stone
Salut,

| Sur un formulaire j'ai une liste déroulante qui
| à partir d'une table à deux colonnes récupère la colonne N°2
| l'orsque l'on choisi la colonne N°1, et avec le code ci-dessous
| l'écrit (col N°2) dans une zone de texte (Texte2)
| (cela fonctionne bien)
| ---------------
| "Option Compare Database
| Private Sub ville_AfterUpdate()
| Me![Texte2] = ville.Column(0)
| End Sub
| Private Sub ville_Enter()
| End Sub"
| ------------------------
| Mais je voudrais récupérer les deux valeurs pour les écrirent dans une autre
| Table


Humm hummm... pas bon ca...

Comme ces données existent, il ne faut pas les "copier" à un autre endroit...
Les seules donnés qui sont "doublées" sont les les clés primaires... dans une clé extérieure.
Ou un prix, un taux... mais pas une ville ou un code postal... naaaa !

Faut revoir la structure... sinon ce n'est plus une bd relationnelle.
Et la suite deviendra d'autant plus difficile, voire impossible.

--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------
Avatar
Albert
3stone wrote:
OK merci à vous deux je vais revoir ma manière de faire cela.