Salut tt le monde!
voila je suis o boulot et g un pti prob sur access:
On m'a demandé de fair en sorte que un champ d'une table soit mise a jour par rapport a un autre champ d'une autre table...
ex: j'ai une table "gestion du matériel" contenant un champ "utilisateur" et une autre table "service" contenant un champ "utilisateur". J'aimerai, via un module ou autre que quand je rentre une info ds le chmps utilisateur de la table service, elle soit retranscrit ds le meme chpms de la table gestion du matos.

J'espere avoiré été asser clair ds mes explications.

merci d'avance

JOK

Bonjour,

Le champ que tu modifies (et qui doit permettre de modifier l'autre), tu le modifies à partir d'un formulaire ?

Par ailleurs, autre précision, tu veux changer un champ utilisateur par rapport à un autre champ utilisateur. Y a t-il des doublons d'utilisateur sur chaque table ?
Car pour aller modifier un champ, il faut que tu saches quelle ligne tu as à modifier.
Et ici, si tu veux modifier un nom d'utilisateur par rapport à celui que tu viens de modifier, il faut que tu saches comment récupérer la ligne de l'utilisateur correspondant de la table service.

Tu peux modifier une ligne en faisant :
Dim db As Database
Dim requete As String
Set db = CurrentDb
requete = "UPDATE service SET utilisateur = '" & txtChamp1.text & "' WHERE ??"
db.Execute (requete)

Ici, il reste à savoir sur quelle ligne tu dois effectuer la mise à jour.

Je ne sais pas si je me fais comprendre sur ce que je ne comprend pas dans ta demande
Réexplique nous

Fanny

en fait
D'une, oui il y a des doublons, de deux, j'ai un champs ou il y a les info et je veu ke dans deux autres champs des 2 tables (vides) , les info y soient aussi sans que j'ai a les retaper et qu'elles soient mises a jour au fur et a mesur que je rentre les info ds ds la premiére table...
put.... j'ai du mal a te fair comprendre ce que je veu mais bon j'espere que ca t'aidera a me repondre.
méchi
JOK

Hihi, comment t'expliquer ce dont j'ai besoin pour écrire le bout de code dont tu as besoin ...

En fait, pour mettre à jour un enregistrement dans une table, il faut savoir QUEL enregistrement mettre à jour (quelle ligne si tu préfères).

Ici, tu modifies donc un champs x de ta table A, et tu voudrais que le champs x de la table B soit mis à jour ? C'est bien ça ?

Mais tu dis que tes champs sont vides ...
En fait le problème c'est comment sais-tu quelle ligne de B mettre à jour lorsque tu modifies ton champs de la table A ?

En gros, il faut que la requête sache quel champ elle doit modifier. C'est à dire que tu ne peux pas faire un UPDATE sans clause WHERE car cela mettrait à jour TOUS les champs utilisateurs de ta table service.

La question (plus précisément) Y a t'il un lien entre tes 2 tables qui permettrait de trouver la ligne à modifier de la table service ?
A partir de cette réponse, il suffira de baser la requete UPDATE avec cette condition.

Ca m'énerve de ne pas te comprendre car je suis sure que je saurais t'aider ...

Fanny

C vraiment mignon de ta part fanny!
je v en parler a mon boss kilm mexplique le prob en profondeur et je te dirai ca, ca serra surement demain,
pck en fait je t'ai dit des nom ki n'avaien rien a voir avec le vrai prob, ct juste histoir de les nommer...
en tout cas fanny (si tel est ton vrai nom) je te remerci bien et je te dirai tt demain.

people like u deserve a fanclub =)


JOK

c marrant mais j'ai presque le même problème...par contre je pense pouvoir récuperer ma ligne car je dispose dans ma table de deux champs: Pour une ligne qcq, je connais la valeur d'un des champ et je veux modifier la valeur du second

par conséquent, il doit y avoir moyen de remonter à ma ligne...
qu'elle serait la syntaxe exacte à ce moment là?
S'il te plait Fanny?
yaf_yaf

moi j'ai laché l'affaire j'ai laissé le travail a un stagiaire vu qu'il s'y connaissait pas mal mai il n'a pas reussi je pense.
en tt cas fanny je t'ai dit que j'allai ten parler le lendemain....
désolé mai le lendemain gt trop oqp. tt ca pour dir ke la reponse pour yafi ne ma laisse pas indifferent, je n'aime pas rester sur un probleme non résolu!
MERCI BIEN miss fanny

p.s: fanny veux tu m'épouser???

p.s²: c pas une blague!



jok

Yasifab,
si tu connais la valeur d'un champ et que tu veux modifier le second, ta requête sql doit être du style :

Dim requete As String
Dim db As Database

Set db = CurrentDb

requete = "UPDATE nom_table SET champ_a_changer = " & nouvelle valeur & " WHERE champ_connu = " tavaleurconnue

db.Execute (requete)


Si tes valeurs sont des chaines de caractères, alors il faut que tu les mettes entre cotes ... mais ça on verra après si tu n'y arrives pas.

Voilà, j'espère que ça te va Yafisab !

Et sinon jok ...
je suis pas sûre que mon copain me laisse épouser quelqu'un d'autre .


Fanny

ok merci

hum entre temps y'a mon maitre de stage qui a eu une nouvelle idee et du coup je dois modifier quelque chose que j'avais fait:
je sais à présent ajouter des items dans un combobox ou listbox, par contre je ne sais pas comment afficher une partie d'une table dans un listbox:
il faut que j'affiche deux champs voisins de noms:mettons "codes" et "descriptions"
et cela de manière dynamique, car ce n'est pas la totalité des champs que je veux mettre mais seulement une partie,

A ma table il existe un troisième champ:c'est ce champ qui délimite le nombre de ligne vu que tant que la valeur de ce champ à une ligne quelquonque est identique à une valeur connue ,le contenu des deux autres champs doit être affiché.

si cela avait été statique,access permet de le faire très bien, j'ai vu, mais pas en dynamique, et avec vb je ne sais comment faire....à moins peut-être qu'avec des macros?

peux tu m'aider la-dessus aussi ?
(je fais mon stage en allemagne, et l'aide en allemand du logiciel est loin dZêtre aussi limpide que la tienne)

merci

lool jok, tu t'attendais à quoi?
yaf_yaf

Ok, pour faire cela il faut que tu fasses une requête de sélection avec une condition :

dim requete as string requete = "SELECT noms, codes, désignations FROM tatable WHERE tonchamp3 = '" & tavaleur.text & "'"

Cette requête de sélection te permet de ne récupérer que les enregistrements dont la valeur du champ 3 est égale à la valeur que tu souhaites.

Puis tu ouvres un jeu d'enregistrements (recordset)

Dim rs As Recordset Set rs = db.OpenRecordset (requete, dbOpenDynaset).

Ensuite tu peux parcourir ce Recordset pour mettre les éléments 1 à 1 dans ta listebox :

rs.MoveFirst While Not rs.EOF 'ici tu utilises ton additem listbox.Additem rs.Fields("noms") rs.MoveNext Wend

J'espère que c'était bien ça que tu voulais.
Ou bien tu fais une requête de sélection sans le WHERE et tu fais le test sur le champs dans ta boucle, mais ce sera plus long :

Dim requete As String requete = "SELECT * FROM tatable" Dim rs As Recordset Set rs = db.OpenRecordset(requete, dbOpenDynaset) rs.MoveFirst While Not rs.EOF If rs.Fields("champ3") = tavaleur Then 'ici tu remplis ta listBox listbox.Additem rs.Fields("noms") End If rs.MoveNext Wend

Bon courage

Fanny