Discussion :

[kluh]

Bonjour,
j'ai un petit soucis...
J'ai une requête avec plusieurs jointure, qui me renvoie des données provenant de 5 tables.
Je souhaite afficher ces données, dans un formulaire, afin de pouvoir en modifier certaines.
Je sais que je serais obligé de passer par du VBA pour mettre à jour les données, mais ce que j'aimerais pouvoir faire, c'est modifier ma donnée directement dans le champ où elle est affichée...
Hors, quand on lie un formulaire à un résultat de requête, les champs ne sont pas modifiables...:-(
J'aimerais éviter de passer par une requête qui me crerrait une table temporaire...
Je suis sous Access 2000...
Merci de votre aide...

[Heureux-oli]

Il n'est pas possible de modifier le résultat d'une requête sélection qui fait appel à plusieurs tables.
Ce n'est pas possible lorsqu'il y a des opérations dans la requête.

Tu dois trouver une autre solution.

[kluh]

La solution que j'ai trouvé, c'est de faire une requête qui me créée une table temporaire, ecrasé à chaque nouvelle execution de requête, et lier cette table à mon formulaire.
Ensuite, apres chaque modif sur un champ du formulaire (afterUpdate) j'irais faire un update de la table source...

Mais je voulais savoir s'il existait des solutions moins "lourdes"...

Voili!

[Invité]

Bonjour

L'autre solution sans passer par une table temporaire est :

- Ton formulaire doit être indépendant (non lié à une source)
- Tu remplis tes contrôles en récupérant les données de ta requête (en SQL) par DAO (Tuto DAO)
- Sur le click d'un bouton tu utilises DAO pour remplir ce que tu veux dans tes tables et faire les mises à jour

C'est la méthode que j'utilise lorsque j'ai des requêtes complexes

Starec

[kluh]

Bonjour

L'autre solution sans passer par une table temporaire est :

- Ton formulaire doit être indépendant (non lié à une source)
- Tu remplis tes contrôles en récupérant les données de ta requête (en SQL) par DAO (Tuto DAO)
- Sur le click d'un bouton tu utilises DAO pour remplir ce que tu veux dans tes tables et faire les mises à jour

C'est la méthode que j'utilise lorsque j'ai des requêtes complexes

Starec

Bonjour,
j'ai un petit souci...je ne vois pas comment faire pour renseigner les champs de mon formulaire...
Je connais les DAO, mais comment remplir les champs du formulaire à partir du recordSet?
Ca doit être assez simple, mais je ne vois pas trop comment on fait ça...

[kluh]

Je m'explique un peu mieux:
je vais avoir un code de type:

Code :

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

1
2
3
4
5
6
7
8
 
Set rs = CurrentDb.OpenRecordset("MaRequete")
 
If Not rs.BOF And Not rs.EOF Then
rs.MoveFirst
For j = 0 To rs.Fields.Count - 1
 
Me.Controls("MonControle").ControlSource = rs.Fields(j).Name

Pas de souci pour passer à l'enreg suivant du recordset, mais comment passer à la "ligne" suivante de mon formulaire?

[Invité]

Bonjour

Peut-être que cette petite réponse dans la devrait te convenir.

http://access.developpez.com/faq/?pa...m#PositionForm

Starec

[kluh]

Merci...mais je galere!

Voici mon code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Set rs = CurrentDb.OpenRecordset("maRequete")
 
If Not rs.BOF And Not rs.EOF Then
    rs.MoveFirst
    While Not rs.EOF
    DoCmd.GoToRecord , , acNewRec
    Me.Controls("DATE").ControlSource = rs.Fields(0).Value
    Me.Controls("MACHINE").ControlSource = rs.Fields(1).Value
    rs.MoveNext
    Wend
End If
rs.Close

2 pbs:
-mes nouveaux enregistrements ne se créés pas sur mon formulaire (je n'en ai qu'un seul, alors que la requête renvoie une centaine d'enreg)

-j'ai la valeur "#NAME?# dans mes champs...

Merci de votre aide...

[mickm06]

Bonjour
Je ne suis pas d'accord avec l'assertion que toute requête SELECT multitable n'est pas modifiable : c'est pour le moins un gros raccourci !

Bien sûr qu'une requête multitable PEUT être modifiable, à certaines conditions qui seraient longues à émunérées mais qui sont logiques : il faut que le moteur puisse identifier les records facilement, sans ambiguité.

Donc exclues les requêtes avec GROUP BY directement ou sous jacentes.

Lorsque l'intégrité référentielle n'est pas définie ou non utilisée pour une jointure, ou lorsqu'on n'utilise pas de JOIN mais une clause WHERE dans le select, alors pour rendre la requête modifiable, il faut positionner la propriété 'Type Recordset' de la requête à 'Feuille Rep.Dyn (MaJ globale)', pour faire comprendre au moteur qu'on est d'accord avec le risque de mettre un peu de bazar

Très facile à tester avec un SELECT avec qq tables avec/sans JOIN : on éxécute la requête hors formulaire, on essaie de modifier un champ d'une table ou d'une autre, et on voie le résultat à l'écran : si ACCESS accepte, au travers d'un form ce sera pareil (il faudra aussi mettre la propriété Type recordset sur le form). Si un champ d'une table côté 1 est modifié, on voit le champ se modifier sur les autres lignes du même père.

Bon, maintenant c'est pas parce que c'est possible que c'est à faire !
Il faut avant tout bien définir le scope du form, à savoir quelle est sa fonction, quelle données doit-il mettre à jour, ... et normalement on n'a pas plusieurs tables à mettre à jour (créer/modifier/supprimer) des enreg directement sur un form.
A mon sens, il y a sans doute des tables dans ta requête qui pourraient ne pas y être

[kluh]

Bon, j'ai résolu mon pb pour alimenter mon formulaire,
mais je ne peux toujours pas modifier mes données!!!
Voici mon code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Set rs = CurrentDb.OpenRecordset("maRequete")
Set Me.Recordset = rs
 
If Not rs.BOF And Not rs.EOF Then
    rs.MoveFirst
While Not rs.EOF
 
Me.Controls("DATE").ControlSource = "DATE"
Me.Controls("PRODUIT").ControlSource = "PRODUIT"
rs.MoveNext
Wend
End If