Discussion :

[Vivier481]

Bonjour,
J'utilise deux bases de donnés et je cherche un moyen de récupérer une valeur d'un champs de formulaire d'un fichier dans l'autre fichier.
J'ai déjà essayé avec du code mais sans succès.
J'ai essayé d'appeler le champs de formulaire, j'ai essayé avec des variables mais aucune ne permet de passer d'un projet à un autre.....
Si vous avez une idée je suis preneur.

[nico84]

Bonjour,

J'utilise deux bases de donnés et je cherche un moyen de récupérer une valeur d'un champs de formulaire d'un fichier dans l'autre fichier.
J'ai déjà essayé avec du code mais sans succès.
J'ai essayé d'appeler le champs de formulaire, j'ai essayé avec des variables mais aucune ne permet de passer d'un projet à un autre.....
Si vous avez une idée je suis preneur.

La demande est ambigue, en effet la donnée à récupérer ne peut pas être "dans un champ de formulaire" mais dans une table pour pouvoir être récupérée depuis un autre projet
Pour lire une donnée d'une table extérieure à un projet il y a 2 solutions :
- soit lier la table
- soit interroger la table par une requête sur la base externe

Exemple de code qui lit dans une table externe :

Code :

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

1
2
3
4
5
6
7
8
9
Dim wrk As DAO.WorkSpace, odb As DAO.Database, rst As DAO.Recordset, clecherchee as long, champlu as string
Set wrk = DBEngine.Workspaces(0)
Set odb = wrk.OpenDatabase("c:\...\baseexterne.accdb", False, False, "MS Access;PWD=toto")
cleclerchee=12 'par exemple...
Set rst = odb.OpenRecordset("SELECT monchamp from matable where macle=" & clecherchee & " order by 1")
if not rst.eof then champlu=rst!monchamp  'champlu peut ensuite être utilisé dans un update, un insert ou copié le champ d'un formulaire...
rst.close
set odb=nothing
set wrk=nothing

NB: odb et wrk peuvent être ouverts et fermés une fois pour toute dans le projet

[Vivier481]

Merci pour la réponse.
Pour être plus clair, j'ai deux formulaires ouverts : un dans chaque base.
Je cherche à alimenter une table de liaison (requête ajout) à partir de deux enregistrements ouvert dans chaque formulaire (un de chaque formulaire).

[nico84]

Il faudrait voir la pertinence d'avoir 2 projets, sinon je ne pense pas qu'il soit possible pour un projet access de lire dans le formulaire ouvert dans autre projet access

Avec les évènements il est peut-être possible d'écrire dans un fichier intermédiaire lorsque la souris quitte un formulaire et récupérer la donnée lorsque la souris arrive dans l'autre projet ?

Autres solutions :
- avoir 2 frontales mais une seule dorsale (mais je ne vois pas dans quel cas on peut avoir intérêt à faire 2 frontales ?)
- avoir 2 dorsales et une seule frontale (les 2 formulaires sont alors dans la même dorsale et peuvent communiquer...)

[Vivier481]

Merci pour le retour.
Je vais fusionner les deux bases. Cela simplifiera les choses.